Курсовая работа: Разработка элементов информационной системы средствами СУБД MS Access и языка программирования VBA

, "Ввод пароля"

blnOk = True

Else

'Имя и пароль введены неверно,

'подготавливаем диалоговое окно к новому запросу

MsgBox "Имя или пароль введены неверно!", _

vbExclamation, "Ввод пароля"

blnOk = False

End If

strFrm = "Кнопочная форма"

If blnOk Then

'Дальнейшие действия

DoCmd. OpenForm strFrm,,,,, acDialog

End If

End Sub

Private Sub cmdCancel_Click ()

CloseCurrentDatabase

End Sub

Предварительно создадим само окно формы с соответствующими полями и кнопками. В итоге получим форму, представленную на рисунке 3.3.1.

Рисунок 3.3.1-окно формы ввода пароля.

Для облегчения доступа к таблицам, отчетам, запросам и т.д., а также наилучшего представления базы данных используют кнопочную форму. Создают её с помощью Конструктора форм. На ней создают кнопки, нажатию которых соответствует вызов различных процедур.

3.4 Создание главной кнопочной формы. Программирование элементов управления формы

Создадим главную кнопочную форму "Кнопочная форма", которая будет содержать следующие кнопки: создание таблицы в объектных моделях DAO и ADO, удаление таблицы в объектных моделях DAO и ADO, создание запроса DAO. Главная кнопочная форма представлена на рисунке 3.4.1.

Рисунок 3.4.1-главная кнопочная форма.

Создадим макрос на выполнение запроса DAO. Для этого указываем макрокоманду открыть запрос, в окне аргументов макрокоманды указываем имя запроса "DAO-запрос (Цена >500)", режим "Таблица", режим данных "Только чтение". На рисунке 3.4 2 представлен макрос режиме конструктор.

Рисунок 3.4.2-макрос в режиме конструктора.

На рисунке 3.4.3 представлен результат выполнения макроса.