Создание форм, элементов управления, изменения свойств объектов (Лабораторная работа № 4), страница 3

Создайте ленточную форму, основанную на таблице УчебныйГод, и измените значения следующих свойств:

Свойство

Значение

Подпись

Учебные года

Режим по умолчанию

Ленточная форма

Допустимые режимы

Форма

Полосы прокрутки

Только по вертикали

Область выделения

Да

Кнопки перехода

Нет

Разделительные линии

Нет

Выравнивание по центру

Да

Тип границы

Окна диалога

Кнопка оконного меню

Да

Источник записей

УчебныйГод

Разрешить изменения

Да

Разрешить удаление

Да

Разрешить добавление

Да

Ввод данных

Нет

Всплывающее окно

Да

Модальное окно

Да

Разрешить изменение макета

Только режим конструктора

Наличие модуля

Да

Надписи формы

В заголовке формы УчебныеГода поместите надписи, установите необходимое значение свойства Подпись и измените значения следующих свойств надписей:

Свойство

Значение

От верхнего края

0см

Высота

0,7см

Тип фона

Прозрачный

Оформление

Обычное

Тип границы

Отсутствует

Шрифт

Arial

Размер шрифта

11

Насыщенность

обычный

Выравнивание текста

По центру

Верхнее поле

0,1см

Текстовые поля формы

В области данных формы УчебныеГода поместите текстовые поля, установите необходимое значение свойства Имя и Данные. Измените значения следующих свойств текстовых полей:

Свойство

Значение

От верхнего края

0см

Высота

0,6см

Тип фона

Обычный

Цвет фона

-2147483643 (белый)

Оформление

Обычное

Тип границы

Сплошная

Цвет границы

0 (чёрный)

Ширина границы

Сверхтонкая

Цвет текста

0 (чёрный)

Шрифт

Times New Roman Cyr

Размер шрифта

14

Насыщенность

обычный

Выравнивание текста

По центру

Доступ

Да

Блокировка

Нет

Форма содержит в примечании два элемента управления типа DTPicker, позволяющие выбирать даты начала и конца учебного года из списка, который похож на календарь.

Для создания элемента управления типа DTPicker выберите на Панели элементов кнопку Другие элементы и в открывшемся списке выберите Microsoft Date and Time Picker Control, version 6.0.

В качестве значения свойства Данные для элементов управления типа DTPicker выберите поля Начало и Конец. Установите значение свойства MinDate равным 01.09.95.

Модуль формы

Модуль формы УчебныеГода содержит команды передачи кода выбранного учебного года в главную форму и обновления списков на других формах, которые позволяют открыть форму УчебныеГода, при закрытии формы УчебныеГода.

Option Compare Database

Option Explicit

'процедура обработки события перехода на другую запись

Private Sub Form_Current()

'передаёт значение кода группы с текущей формы в Главную

Forms!Главная!КодГода = Me.КодГода

'вычисляет значение кода первой группы выбранного учебного года

'выбранной специальности и передаёт его в Главную форму

Forms!Главная!КодГруппы = ПерваяГруппа

End Sub