· Элемент управления CommandButton (кнопка) вызывает событие Click при щелчке на нем левой кнопкой мыши. Они используются для выполнения каких-либо действий.
· Элемент управления CheckBox– создает ячейку, которая может быть помечена пользователем как имеющая значение истина или ложь. Этот элемент управления может иметь три состояния. Пользователь может установить неопределенное значение для объекта CheckBox: не ложь и не истина.
· Элемент управления Frame является контейнером и служит для объединения других элементов в группу. Это дает возможность управлять объектами как единым целым.
· Элемент управления TextBox(Текстовое поле) используется для отображения информации, вводимой пользователем во время выполнения, или присвоенной свойству Text элемента управления во время разработки или выполнения. Текстовое поле следует использовать для редактируемого текста, но его можно сделать и только читаемым (read-only), установив значение свойства Locked (Заблокирован) равным True. Текстовые поля также позволяют отображать несколько строк, переносить текст в размерах элемента управления и добавить базовое форматирование.
· Элемент управления ComboBox (раскрывающийся список) объединяет в себе список и текстовое поле. Пользователь может ввести данные в поле или выбрать их из списка. ComboBox занимает в форме меньше места, но в отличие от ListBox, в нем нельзя выбрать несколько элементов сразу.
· Элемент управления ListBox(Список) отображает список, из которого пользователь может выбрать один или несколько элементов. Элементы управления ListBox предоставляют пользователю список возможных вариантов выбора. По умолчанию варианты выбора отображаются вертикально в одном столбце, хотя можно задать и несколько столбцов отображения. Если число элементов в списке превышает число элементов, которые могут быть отображены в списке, на этом элементе управления автоматически появляются полосы прокрутки. Пользователь в дальнейшем может прокручивать список вверх-вниз, вправо-влево, а так же в обе стороны, если предусмотрены обе полосы прокрутки.
· Элемент управления Timer (Таймер) независимы от пользователя, и их можно использовать для программирования действий, которые должны выполняться периодически. Их типичное применение-определение времени выполнения некоторого действия.
· Элемент управления ToolBar (Панель инструментов) используется для создания кнопок, обеспечивающих быстрый доступ к существующим пунктам меню, и для наглядности приложения.
· Элемент управления Calendar (Календарь) представляет собой календарь, с помощью которого можно выбирать дату. В его верхнем правом углу расположены раскрывающиеся списки, в которых можно выбрать год и месяц соответственно. В другой его части имеется возможность выбора числа и дня недели.
· Элемент управления StatusBar (Строка состояния) используется в приложении для информирования пользователя о текущем состоянии приложения.
· Элемент управления OptionButton представляет собой ячейку выбора. Из всех таких ячеек, размещенных на одном объекте, пользователь может выбрать только одну или не выбрать ни одной.
· Элемент WebBrowser используется для отображения web-страниц на форме. Для этого в данном проекте используется его метод navigate(<адрес файла>).
· Элемент управления Image. Прямоугольная область, в которую можно поместить изобажение. Так же может использоваться для хранения изображения внутри программы.
· Элемент управления ImageList используется как контейнер для изображений, которые потом могут применяться для оформления программы.
Программный продукт представляет собой исполняемый файл MyDataBase.exe, созданный при компиляции проекта, написанного на языке VisualBasic 6.0 и файлы справки (web-страницы и изображения). Для систем, на которых не установлен пакет VisualBasic 6.0, может так же понадобиться библиотека MSVBVM60.DLL.
При создании программы использовалось следующее программное обеспечение:
1. Microsoft Visual Basic 6.0
2. Microsoft Word 2003
3. Графическиередакторы MS Paint, Adobe Photoshop 7.0, Macromedia Dreamweaver 8.
После запуска программы первой загружается форма frmStart (Приложение 2. с.61), так как она является объектом запуска. При ее загрузке запускается процедура Private Sub Form_Load() (Приложение 1. с.62), которая устанавливает начальное значение переменной х, используемой в таймере анимации, равным нулю. Далее происходит запуск заставки. Запускается процедура таймера: Private Sub tmrAni_Timer() (Приложение 1. с.33). Это таймер, управляющий анимацией. Он работает, используя переменную х. По значению переменной программа определяет какое изображение следует отобразить на экране. После завершения работы таймера, управление передается форме frmDatabase (главная форма программы. Приложение 2. с.62). При ее запуске, выполняется ее процедура Private Sub Form_Load() (Приложение 1. с.39)
При входе в базу данных выполняется процедура init из модуля modAbout (Приложение 1. с.58), которая используется в процедуре Form_Load главной формы программы. Она устанавливает начальные значения переменных, создает надписи с названиями полей и применяет дизайн форм программы. Форма загрузилась – база данных уже создана. Если в процессе работы потребуется создать новую базу данных, например, при помощи меню «Файл -> Создать (Ctrl+N)», то запускается процедура Create() (Приложение 1. с.33), которая запрашивает подтверждение создания базы, после чего очищает все поля таблицы и устанавливает занчение переменной OpenFile=””, что означает, что на данный момент нет активного файла, с которым производится работа. Его можно будет создать при сохранении базы, либо открыть.
Управление получит процедура Open_File() (Приложение 1. с.33). С помощью элемента ComonDialog будет создано окно открытия файла, в котором вам будет предложено выбрать файл расширения *.mdb (MyDataBase). Далее процедура из файла считывает информацию и размещает ее в listBox-элементах главной формы. OpenFile принимает значение, равное имени выбранного файла.
Управление получит процедура Save(intSave As Byte) (Приложение 1. с.34). Если переменная OpenFile пуста, то в процедуру будет передан параметр «1», обозначающий то, что необходимо сохранить базу в новый файл. С помощью элемента ComonDialog будет создано окно сохранения файла, в котором вам будет предложено ввести имя и выбрать путь для нового файла (можно без расширения, программа создаст его автоматически). Сразу же после выбора имени, информация считывается из listBox-элементов главной формы и помещается в указанный файл. Если же OpenFileне пуста, то старый файл будет удален, а на его место будет записан новый с тем же именем, но с новой информацией. В процедуру в этом случае передается «0».
При выборе меню «Файл -> Сохранить как (Ctrl+S)» в любом случае передается параметр «1».
Управление получит Form_QueryUnload(CancelAsInteger, UnloadModeAsInteger) (Приложение 1. с.39). События, описанные в этой процедуре, выполняются при попытке закрыть форму. Если параметр Cancel этой процедуры будет равен 1, то происходит отмена выхода и форма не закрывается. Это лежит в основе процесса выхода из программы. В случае отрицательного ответа на предложенное сообщение выход осуществлен не будет. Завершение работы программы происходит только при подтверждении выхода.
Если запись выделена, то управление получит Процедура Edit("Add", 0) (Приложение 1. с.35). Эти параметры обозначают, что необходимо добавить запись. Второй параметр для добавления записи не имеет значения. Он нужен при редактировании. Затем будет показана форма добавления записи frmAdd (Приложение 2. с.62), в которой необходимо заполнить правильно все поля. Ввод контролируется модулем modInspect (Приложение 1. с.60) и функцией Date_raz(date1 AsString, date2 AsString) AsLong из модуля modData (Приложение 1. с.59), которая возвращает число, равное разности сумм произведений <число>+<месяц>*30+<год*365> двух дат, передаваемых в качестве параметров При нажатии кнопки «Добавить». В случае правильного ввода, запись появится в listbox-элементах главной формы.
Если запись выделена, управление получит Процедура Edit("Del", lstZapis(0).ListIndex). Эти параметры обозначают, что необходимо удалить запись с номером выделенной записи. После подтверждения удаления запись будет удалена из всех полей таблицы.