Объектно-ориентированный подход в программировании. Проектирование и реализация приложений в среде Microsof Office. Евсеева О.Н. - 138 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

2.8. Пример разработки приложения 139
139
Глобальные объявления приложения содержатся в файле GLOBAL.BAS.
Объявления типа не могут быть помещены в раздел объявлений модуля формы,
поэтому необходим отдельный файл. Определенный пользователем тип
Coordinates используется как тип данных массива PertChartLinks.
Массив PertChartLinks используется для хранения адресата (наследника)
связи. Значения х и у типа Coordinates используются для указания позиции
наследника в двухмерном массиве PertChart. Глобальная константа
gDBname предназначена для хранения имени файла базы данных Access.
Глобальная переменная gDB используется для хранения объекта типа
database при обработке его в первичном коде:
Type Coordinates
х As Integer
у As Integer
EndType
Global Const gDBname = "ProjPlan.MDB" ' Имя файла базы данных
Global gDB As database ' База данных, содержащая шаблоны проектов
Объявления главной формы. В модуле формы (в файле MAIN.FRM)
находятся весь исходный код приложения и следующие объявления.
Const maxRows = 10
Rem 0бъявление двумерного массива кодов этапов PERT-схемы
Dim pertChart() As Long
Dim pertChartLinks() As Coordinates
Dim pendingLinks() As Long
Dim curMaxRow As Integer
Dim curMaxCol As Integer
Dim pertChartDrawing() As Object
Константа maxRows используется для определения максимального размера
массивов. Максимальные размеры любого сетевого графика установлены как
10 на 10 этапов. Объявлены, но не определены три массива. Массивы не
определены, потому что они будут переопределяться в процессе выполнения
программы для уменьшения объемов необходимой памяти в процессе
генерации небольших сетевых графиков. Переменные формы curMaxRow и
curMaxCol предназначены для хранения текущего размера массивов в
процессе выполнения программы. Наконец, массив объектов
PertChartDrawing объявлен для хранения экранных образов ячеек в среде
Visio. Этот массив объектов используется для идентификации образов при
прорисовке связей:
Методы главной формы. Метод главной формы Form_Load открывает базу
данных Access и заполняет поле со списком ProjPlanList названиями
шаблонов проектов. Для заполнения объекта типа snapshot содержимым
таблицы
Шаблон
, отсортированным по значениям поля
Название
, используется
оператор SQL. Цикл while выполняется один раз для каждого названия

Страницы