ТОП 10:

Диалоговые окна пользователя



Представленные диалоговые окна позволяют реализовать лишь относительно небольшой объем информации. В то же время мы можем предположить, что возможности Excel в части диалоговых панелей гораздо шире. Для этого у нас есть все основания - мы знаем о существовании "форм" (Данные/Форма). Мы уже частично знакомились с диалоговыми окнами пользователя (п. 2.10.2). Здесь более подробно представлена специфика работы с окнами и кнопками. В MS office - 97 имеется два практически равноценных варианта окна пользователя - "Окно диалога Excel-5.0" и "UserForm".

Рис. 4.6 UserForm. Элементы управления

В первом случае окно вызывается при нажатии ПК мыши в поле листов и выборе команды "Добавить/Окно диалога Excel-5.0". Во втором случае окно вызывается из среды VB командой "Вставка / UserForm" или кнопкой "Вставить UserForm". Мы будем ориентироваться на второй, более современный способ. В результате появляется новый, чистый бланк (рис. 4.6), куда можно выводить окна и кнопки пользователя. Набор элементов управления (кнопки и окна) расположен рядом с полем, но его можно передвинуть куда угодно.

Группа UserForms является семейством, компоненты которого представляют все загруженные формы UserForm в приложении. У семейства UserForms имеются свойства Count и Item, а также метод Add. Свойство Count указывает число компонентов в семействе; свойство Item (компонент, используемый по умолчанию) указывает определенный компонент семейства; метод Add помещает в семейство новый компонент UserForm.

При конструировании форм пользователя следует задать методы Show и Hide, чтобы делать форму соответственно видимой и невидимой во время выполнения программы.

Элементы управления

Элементы управления позволяют предложить пользователю выбор параметров или дать возможность запуска макросов для автоматизации задач.

Назначение элементов управления представлено в табл. 4.7, рис. 4.6

 

 

Таблица 4.7

Название элемента Описание
1-й ряд
Выбор объектов По аналогии с объектами рисунков
Надпись Текстовая, нередактируемая метка
Поле Редактируемое текстовое окно
Поле со списком Выпадающее окно списка
Список Окно списка
2-й ряд
Флажок Контрольный индикатор
Переключатель Кнопка выбора с заголовком для исключающего выбора
Выключатель Кнопка - индикатор состояния
Рамка Группировка элементов
Кнопка Командная кнопка
3-й ряд
Набор вкладок Аналог вкладок меню
Набор страниц Выбор страницы
Полоса прокрутки Вертикальная или горизонтальная линейка прокрутки
Счетчик Линейка прокрутки с индикацией состояния
Рисунок Включение объекта-рисунка

 

Чтобы наполнить диалоговое окно необходимыми элементами, выберите в пиктографическом меню нужный объект, переместите его в бланк путем нажатия ЛК мыши в нужном месте или создания габаритного прямоугольника (по аналогии с рисунком). Габариты объекта можно менять после его создания. Правой клавишей мыши можно вызвать окно свойств и изменить некоторые из них. Название объекта лучше всего изменять на самом объекте.

Если объект связан с выполнением некоторой процедуры, ее можно подключить, выбирая в контекстном меню (ПК мыши) "Программу", в результате чего будет сформирована первая и последняя строки программы (sub) с именем объекта. Здесь можно создать собственную программу или включить в тело программы вызов иной процедуры, например процедуры хх():

Private Sub CommandButton1_Click()

xx

End Sub

Среди свойств объекта имеются свойства Default и Cancel. Если установлены эти свойства (True) , то объект активизируется при нажатии соответственно кнопок Enter или Esc. Только один объект на панели должен обладать свойством Default или Cancel.

Для того чтобы получить доступ к объектам диалогового окна, необходимо знать имя каждого объекта. VB присваивает имена объектам при их создании (свойство Name), однако это свойство (имя) можно изменить.

Командная кнопка (CommandButton)

Аналоги - кнопки ( ) - ОК, Cancel, Да, Нет и др. Основное назначение - при нажатии вызвать на исполнение некоторую процедуру.

Самостоятельная работа

· Создайте командную кнопку с названием "Да! Да! Да!".

· Вызовите панель свойств. Найдите свойства "Name" и "Caption". Чем отличаются эти свойства? Найдите свойство "Font" и замените стиль символов на Arial - 14 - курсив - подчеркнутый. Опробуйте действие кнопки (запустите диалоговую панель на выполнение).

· Измените размер кнопки и найдите свойство, которое при этом изменилось.

· Найдите свойство, которое отвечает за цвет кнопки, и сделайте кнопку голубой.

· Подключите к кнопке процедуру хх(), изменяющую формат ячейки "А1" (см. выше).

· Создайте еще одну командную кнопку. Как различить эти кнопки в программе?

Надпись (Label)

Надпись (кнопка ) - это строка текста, которая не может редактироваться пользователем. Аналог - функция MsgBox(). Обычно надпись используется для посылки сообщения пользователю или дополнительной информации о других кнопках и окнах бланка.

Для изменения текста программным путем необходимо изменить свойство Caption, например:

Public Sub bbb()

UserForm3.Label2.Caption = "Доброе утро!"

End Sub
Следует заметить, что автономное выполнение этой процедуры не приведет к желаемому результату. Необходимо, чтобы она активизировалась в режиме диалога, например, через другую процедуру, подключенную к какой-либо кнопке:

Private Sub CommandButton1_Click()

bbb

End Sub

Самостоятельная работа

· Создайте на вашей панели 2 наклейки. Назовите вторую " Привет". Вызовите свойства метки и поменяйте что-либо по своему желанию.

· Активизируйте диалог. При активном диалоге попробуйте поменять текст метки. Вряд ли у вас что-нибудь получится.

· Выполните отладку описанной выше процедуры замены второй метки программным путем.







Последнее изменение этой страницы: 2016-08-26; Нарушение авторского права страницы

infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 3.235.30.155 (0.004 с.)