Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторные работы SQL-2012.doc
Скачиваний:
0
Добавлен:
01.04.2025
Размер:
1.36 Mб
Скачать

2.2 Создание поля со списком без использования мастера.

  • Создать элемент управления Поле.

  • Правой клавишей мыши Преобразовать элемент в - выбрать Поле со списком.

  • Переименовать поле в cboIm

  • В окне свойств на вкладке Данные в строке Источник строк прописать запрос:

Select Имя from Клиенты

  • Надпись, связанную с полем cboIm переименовать в Имя (В окне свойств: вкладка Макет, Свойство Подпись)

  • Перейти в режим формы, проверить правильность работы элемента управления на основе запроса.

2.3 Создание списка с помощью vba

  • Создать Элемент управления Поле, правой клавишей мыши преобразовать в Поле со списком.

  • Присвоить ему имя cboDolg, надпись переименовать в Должность.

  • Формировать источник данных для поля со списком cboDolg будем, используя процедуру VBA, которая связана с событием После обновления значения в поле cboFam. Для этого необходимо:

  • Выделить поле cboFam

  • В окне свойств на вкладке События для свойства После обновления выбрать Процедура обработки событий и нажать

  • В окне программного кода набрать текст по образцу:

  • В конструкторе формы отредактировать ширину столбцов списка и надписи в соответствии с размером значений.

  • Перейти в режим формы, проверить правильность работы элемента управления на основе запроса.

Примечание. Для проверки правильность работы обязательно измените значение в поле cboFam.

Задание №3

3.1 Создание списка на основании выбора данных из поля со списком

  • Создать обычное поле.

  • Преобразовать его в список.

  • Присвоить ему имя lstFio, для этого необходимо в Окне свойств на вкладке Другие изменить значение свойства Имя на lstFio.

  • Создать кнопку . В появившемся окне Создание кнопок нажать кнопку Отмена. Изменить ее имя на cmdFam. На кнопке расположить текст Поиск по фамилии, для этого изменить свойство Подпись на вкладке Макет в Окне свойств. Свойство Рисунок очистить.

  • Для события Нажатие кнопки cmdFam создать Процедуру обработки событий со следующим программным кодом:

3.2 Создание списка на основании выбора данных из двух полей

  • Создать элемент управления Кнопка с именем cmdFD с надписью Поиск по двум полям.

  • В окне свойств, на вкладке События в строке Нажатие кнопки выбрать Процедура обработки событий

  • Для списка lstFio изменить свойство Количество столбцов – 2 на вкладке Макет.

Для проверки работы формы внесите в таблицу Клиенты следующие изменения:

  • Столбец Фамилия отсортируйте по возрастанию

  • Замените фамилию Вронский на Иванов

  • Закройте таблицу, сохранив изменения.

Задание №4 Сортировка элементов списка

  • На форме создать группу переключателей. В открывшимся окне Создание группы переключателей задайте имена элементам группы: Фамилия и Должность. Нажмите кнопку Далее и в следующем окне выберите переключатель, используемый по умолчанию. В следующих окнах задайте значения, запрашиваемый Мастером (это 1,2) и выберите тип элементов управления переключатель. Задайте имя группы Сортировка и нажмите кнопку Готово.

  • Группе переключателей присвоить имя optSort

  • Создать элемент управления Кнопка с именем cmdSort и надписью Сортировка.

  • В окне свойств кнопки с именем cmdSort, на вкладке События в строке Нажатие кнопки выбрать Процедура обработки событий, для которой набрать следующий программный код:

  • Перейти в режим формы, проверить правильность работы элемента управления на основе запроса.

Указание. Для выполнения следующей части работы необходимо подключить библиотеки Microsoft DAO 3.6 Objects Library и Microsoft ActiveX Data Object 2.1 Library. Это можно сделать с помощью команды ToolsReferences, которая доступна в окне программного кода: