Access 2002

Создание  формы


Создание такой формы — процесс довольно трудоемкий, в основном из-за того что во время выполнения формы вкладки нельзя добавлять и удалять. Выполняя наш пример, необходимо создать в режиме конструктора достаточное количество вкладок для размещения данных по всем странам (число которых будет точно известно только во время выполнения приложения). Лишние вкладки придется скрыть сразу же после загрузки формы. Если их численность превысит 30, пользователю будет неудобно с ними работать. Это видно даже на рисунке.

Создание набора вкладок

Включение в набор одной или двух вкладок не является проблемой, но добавление в него 20 или 30 вкладок становится уже утомительным занятием. Для упрощения этой задачи можно использовать процедуру PrepareTab из модуля bas- TabSetup базы данных CH06.MDB. Эта процедура принимает два параметра: ссылку на набор вкладок и число вкладок, которые должны в нем выводиться.

Если в данном примере число вкладок в коллекции Pages больше того, что вы задали, процедура РгерагеТаЬ просматривает эту коллекцию с конца и удаляет ее элементы с помощью метода Remove, пока их не останется столько, сколько нужно. Если число вкладок в коллекции Pages меньше заданного вами, процедура РгерагеТаЬ добавляет их посредством метода Add.

Чтобы в форме frmTabCustomers создать набор из 30 вкладок, поместите в нее набор вкладок, присвойте ему имя (в этом примере — tabCustomers) и вызовите процедуру РгерагеТаЬ, введя в окне отладки такую команду:

Call PrepareTab(Forms("frmTabCustomers").tabCustomers, 30)

Модификация вкладок во время выполнения приложения

Когда создание элемента управления с нужным числом вкладок завершено, изменение этих вкладок выполняется следующим образом. Для каждой вкладки, которая должна отображаться на экране, следует присвоить подпись свойству Caption и значение True свойству Visible. Свойству Visible остальных вкладок надлежит присвоить значение False.

Комментарии закрыты