Тестирование программы на наличие ошибок проходит под наблюдением системного администратора. По окончании тестирования исходный файл компилируется в исполняющий двоичный файл, то есть создается независимый от среды исполнения файл (с расширением ехе), библиотека динамической компоновки (с расширением dll) и компоненты ActiveX (с расширением осх).
При необходимости создается инсталляционный модуль программы в виде самораспаковывающегося архива RAR с помощью программы WinRAR.
2.6.4 Описание функций модуля и принципы их работы
Программы Visual Basic хранятся в программных модулях, которые бывают трех видов: модуль формы, стандартный модуль и модуль класса.
Простое приложение, состоящее из одной формы, содержит, как правило, только модуль формы. По мере усложнения приложения повторяющиеся функции, выполняемые с нескольких модулей формы, можно выделить в отдельный программный код, который будет являться общим для всех. Такой программный код называется стандартным модулем.
Программа «Медиаплан» содержит модуль (код) формы и стандартный модуль.
Стандартные модули могут содержать объявления глобальных и локальных переменных, констант, типов, внешних процедур и процедур общего характера, доступных для других модулей данного приложения. Они хранятся в файлах с расширением bas.
Стандартный модуль программы «Медиаплан» использует процедуры Function
Процедуры Function в отличие от процедур sub могут возвращать значение в вызывающую процедуру. Синтаксис процедуры Function выглядит следующим образом:
[Private] [Public] [Static} Function имяПроцедуры (аргументы) [As type]
операторы
End Function
Процедуры Function, как и переменные, имеют тип, задаваемый с помощью ключевого слова As. Если тип процедуры не задан, по умолчанию ей присваивается тип Variant. Тип процедуры определяет в свою очередь тип возвращаемого ею значения. Возвращаемое процедурой значение присваивается имени процедуры имяПроцедуры и может быть использовано в выражениях программного кода аналогично стандартным функциям Visual Basic.
Синтаксис модуля разрабатываемой программы имеет следующую структуру:
Option Explicit `объявляется список переменных
[Public] имяПеременной [As type] ` объявляется переменная
..............................................................' следующая переменная
[Public} Function имяПроцедуры (аргументы) [As type]
…………………………………………' следующая функция
Список используемых в программе глобальных переменных, объявленных в начале модуля и вызываемых командой Dim по мере их необходимости приведен в таблице 2.3:
Таблица 2.3 - Глобальные переменные модуля
Имя
Тип
Размер
Назначение
PathProgramLow
String (строковая переменная)
1 байт на символ
Хранит путь программы (без учета каталога с договорами)
PathProgram
Хранит путь программы + папка с договорами
OnDay
Variant (универсальная; может хранить любые типы данных)
Не менее 16 байт
В процессе загрузки программы этой переменной приравнивается значение, равное одному дню.
TrEditMode
Boolean (логический тип данных)
2 байта
Триггер для определения режима редактирования договора
allPos
Integer (Целочисленная переменная)
Кол-во позиций в создаваемом договоре
numPos
Номер активной позиции в создаваемом договоре
TrVidAct
Триггер для определения активного режима работы программы: 0-Просмотр, 1-Создать, 2-Поиск, 3-Настройки
SelectedFile
Хранит имя файла, выбранного в режиме Просмотра
TrBitAct
Триггер для определения нажатых кнопок в Главном меню
MassView(11)
Массив, в который заносятся данные из выбранного файла в режиме Просмотра
Ниже приведены описания функций модуля программы и алгоритмы их работы и взаимодействия.
CreateMGF - функция создания договора. Функция служит, во-первых, для сохранения новых договоров в файл, во-вторых, для перезаписи редактируемых договоров.
Принцип работы:
- сначала идет проверка, заполнил ли пользователь все нужные поля формы, если есть пустые поля, то выводится диалоговое окно с текстом «Заполнены не все поля! Заполните оставшиеся поля и повторите процедуру», при этом функция прекращает работу;
- если все поля заполнены, и режим редактирования не выбран, то программа считывает с полей и с таблицы данные, создает новый файл с договором и записывает туда информацию. После этого функция завершает работу;
- если все поля заполнены и выбран режим редактирование, то программа выводит диалоговое окно с пояснениями и кнопками «Да», «Нет» и «Отмена». Если пользователь нажал «Отмена», то файл не создается и функция прекращает работу. Если нажата кнопка «Нет», то программа создает новый файл договора с текущей датой и дальше делает то, что описано в пункте 2. Если выбрана кнопка «Да», то программа сначала удаляет файл редактируемого договора, а затем создает файл с таким же именем и записывает туда все данные из полей и таблицы, после чего программа переходит в режим «Просмотра»;
Функция режима редактирования EditMGF активизируется тогда, когда пользователь выбрал в режиме Просмотра файл договора и нажал на кнопку «Правка».
- переходим в режим «Создать»;
- далее программа заносит в поля формы данные выделенного файла, причем эти данные она берет из массива MassView, который заполняется при работе функции ViewCode;
- очищаются данные таблицы, затем открывается файл редактируемого договора, из которого считываются нужные данные, после чего их заносят в таблицу;
- оставшиеся поля таблицы заполняются по формулам, на основе данных, взятых из файла;
- переставляем указатель позиций на крайнюю позицию, потом заносим в поля «Дата Начала», «Дата Окончания», «Периодичность» и «Цена за секунду» данные из крайней позиции;
- складываем суммы из всех позиций, затем в нижней строке таблицы выводим итоговую сумму;
- конец работы функции.
Функция скрытия всех элементов управления формы EraseAll скрывает все элементы управления на форме.
Функция реализации поиска FindAll предназначена для проведения поиска в режиме «Поиск» по одному из трех критериев.
- очищаем таблицу поиска;
- в зависимости от выбранного критерия поиска, программа по очереди считывает все файлы с договорами, сканирует в каждом из них нужную строку, где содержится данные, которые нужно найти;
- если программа нашла в каком-либо файле совпадение, то она выводит имя файла, где найдено совпадение, а также некоторые данные, вроде названия организации или имени ролика;
FindCode - функция режима «Поиск».
Функция запускается при выборе режима «Поиск».
- показывает нужные элементы управления;
- считывает из всех файлов с договорами все имена организаций и роликов, после чего записывает их в выпадающие списки;
Функция режима «Создать» NewCode запускается при выборе режима «Создать».
- показываем нужные элементы управления;
- выводим в нужном окне текущую и общее количество позиций.
Функция добавление записей в таблицу в режиме «Создать» NewCodeAdd
предназначена для считывания данных из формы в таблицу режима «Создать». Активизируется всякий раз, когда пользователь изменяет элементы управления режима «Создать».
- считывание из нужных элементов управления данных (Даты начала, окончания, периодичность, цена за секунду);
- занесение этих данных в таблицу;
- на основе этих данных по формулам просчитываем оставшиеся данные и записываем в таблицу;
- просчитываем все суммы и внизу таблицы выводим итоговую сумму;
Функция печати PrintCode служит для печати договора.
Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13
