- •Программирование в ms Access. Часть 3. Программирование в формах
- •Обращение к элементам формы
- •Обзор основных свойств всех объектов формы
- •Свойства формы
- •Обзор основных методов формы
- •Обзор основных событий формы
- •Обзор основных элементов Надпись
- •Поле со списком
- •Группа переключателей
- •Подчиненная форма
- •Список некоторых свойств и их английские аналоги для справки
Группа переключателей
Пример 7.
Создать на форме ФормаКлиентыгруппу переключателей с названиями городов: Омск, Москва, Новосибирск, Томск, - сохранить группу с названиемГруппаГорода(проверьте, чтобы свойствоИмя содержало указанное значение). В зависимости от выбранного значения переключателя автоматически подставлять соответствующее слово в поле Город формыФормаКлиенты. В методеПосле обновленияу компонентаГруппаГороданаписать следующий код:
If Me.ГруппаГорода.Value = 1 Then
Me.Город = "Омск"
ElseIf Me.ГруппаГорода.Value = 2 Then
Me.Город = "Москва"
ElseIf Me.ГруппаГорода.Value = 3 Then
Me.Город = "Новосибирск"
ElseIf Me.ГруппаГорода.Value = 4 Then
Me.Город = "Томск"
End If
Задание 10.
Создать главную форму с группой из 3 переключателей. На событие Двойное нажатие кнопкигруппы создать процедуру, которая будет запускать соответствующую форму из ранее созданных: ФормаКлиенты, ФормаПрограммирование, ПростейшаяМатематика.
Флажок
Пример 8. В зависимости от состояния флажка делать соответствующие поля доступными для редактирования или нет.
Создать на форме ФормаКлиентытри элементаФлажокс подписями: Фамилия, Организация, Город. Созданные флажки переименовать соответственно вФлажокФамилия,ФлажокОрганизация,ФлажокГород.
В зависимости от выбранного набора флажков автоматически включать или отключать доступ к одноименным полям формы, для этого в методе После обновлениякаждого флажка написать соответствующий код:
Для ФлажокФамилия:
If Me. ФлажокФамилия = -1 Then
Me.ФлажокКонтакта.Enabled = True
Else
Me.ФлажокКонтакта.Enabled = False
End If
Для ФлажокОрганизация:
If Me.ФлажокОрганизация.Value = -1 Then
Me.ОрганизацияИлиОтдел.Enabled = True
Else
Me.ОрганизацияИлиОтдел.Enabled = False
End If
Для ФлажокГород:
If Me.ФлажокГород.Value = -1 Then
Me.Город.Enabled = True
Else
Me.Город.Enabled = False
End If
Задание 11. Выполнить пример №8. Проверить работу.
Подчиненная форма
Пример 9.
Настроить свойства формы ..., чтобы она стала подчиненной для родительской формы ... и расположить ее элемент подчиненная форма на родительской.
Задание.
Список некоторых свойств и их английские аналоги для справки
Цвет фона (BackColor)
Тип фона (BackStyle)
Цвет границы (BorderColor)
Тип границы (BorderStyle)
Ширина границы (BorderWidth)
Подпись (Caption)
Всплывающая подсказка (ControlTipText) (формы)
Тип элемента, с которым работаем (ControlType)
Режим вывода (DisplayWhen) (формы)
Наклонный (FontItalic)
Шрифт (FontName)
Размер шрифта (FontSize)
Подчеркнутый (FontUnderline)
Насыщенность (FontWeight)
Цвет текста (ForeColor)
Высота (Height)
Идентификатор справки (HelpContextID)
InSelection(формы)
От левого края (Left)
Имя (Name)
Нажатие кнопки (OnClick) (формы)
Двойное нажатие кнопки (OnDblClick) (формы)
Кнопка вниз (OnMouseDown) (формы)
Перемещение указателя (OnMouseMove) (формы)
Кнопка вверх (OnMouseUp) (формы)
Контекстное меню (ShortcutMenuBar)
Оформление (SpecialEffect)
Дополнительные сведения (Tag)
Выравнивание текста (TextAlign)
От верхнего края (Top)
Вывод на экран (Visible)
Ширина (Width)