2. 2. Управляющие кнопки

Для добавления кнопки на форму используется элемент Command Button, который имеется в стандартной панели элементов управления. Затем для нее описываются необходимые свойства, в частности, расположение на экране, видимость, внешний вид и т. д. – аналогично приведенным свойствам формы в табл. 2. Однако управляющие кнопки имеют и другие свойства, которые отсутствуют у форм (табл. 5).

Таблица 5

Отличительные свойства элемента Command Button

Название	Описание
Cancel	Является ли элемент кнопкой Cancel
Default	Выбор кнопки по умолчанию
DisabledPicture	Рисунок, изображаемый на кнопке, когда она недоступна (свойство Enabled = False ), если свойство Style = 1
DownPicture	Картинка, выводимая на кнопке, когда она нажата, если свойство Style = 1
Style	Стиль кнопки: 0 – Standard (обычный) 1 – Graphical (графический)
TabIndex	Порядковый номер в последовательности перехода (при нажатии Tab)
TabStop	Присутствие в последовательности перехода
ToolTipText	Всплывающая подсказка для кнопки

Реализация определенных действий, предусмотренных для управляющей кнопки, осуществляется после щелчка на ней мышью во время работы приложения. В этом случае выполняется процедура обработки события Click (если она была создана), причем вид кнопки изменяется соответствующим образом, т. е. она изображается нажатой, а затем – отпущенной.

2.2.1. Работа с фокусом

При запуске приложения, как правило, один из имеющихся на форме объектов должен быть активным, т. е. обрабатывать определенным образом информацию, получаемую от мыши или клавиатуры. В этом случае данный объект имеет фокус. Например, если на форме находятся две управляющие кнопки и одна из них имеет фокус, то нажатие клавиши Enter (или Пробел) приводит к вызову для нее процедуры обработки события Click.

Если объект получает фокус, то выполняется событие GotFocus. При потере фокуса объектом происходит событие LostFocus.

Получение фокуса объектом может быть реализовано несколькими способами:

1 способ – щелчок на нем мышью;

2 способ – с помощью клавиши Tab или стрелки управления курсором;

3 способ – выполнения для объекта метода SetFocus;

4 способ – использования клавиши доступа.

Объект может получить фокус с помощью клавиши Tab, но при этом он должен находиться в последовательности перехода для данной формы (например, последовательно расположены три кнопки).

Для определения порядка перехода, в соответствии с которым объекты будут получать фокус при последовательных нажатиях клавиши Tab, а также для исключения элемента из последовательности используются свойства TabIndex (порядковый номер для перехода) и TabStop (отсутствие в последовательности).

Объекту, который на форме был создан первым, автоматически устанавливается значения свойства TabIndex = 0. Соответственно, каждый последующий элемент получает номер в последовательности на единицу больше. Для изменения порядка перехода необходимо изменить для определенных объектов значения их свойства TabIndex соответствующим образом.

Если создаваемый на форме элемент получает фокус, то его свойству TabStop по умолчанию присваивается значение True. Если объект необходимо исключить из последовательности перехода, то для него надо установить свойство TabStop = False. Данное действие может быть выполнено как на этапе разработки, так и в программном коде.

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

Использование клавиши доступа при работе с кнопками также приводит к вызову процедуры обработки события Click для соответствующей кнопки. Для описания такой клавиши необходимо в названии заголовка элемента (свойства Caption) поставить знак "&" перед символом, который будет являться клавишей доступа. На кнопке он будет изображен с подчеркиванием. Событие Click в этом случае возникает для элемента при нажатии сочетания клавиш Alt + символ.

2.2.2. Пример работы с фокусом

Задание. Создать форму с тремя кнопками: "1", "2", "3". При нажатии одной из них выводится надпись, например: "Кнопка 1". Также организовать доступ к кнопкам при помощи быстрых клавиш: Alt+1, Alt+2, Alt+3. Последовательность доступа задать в порядке обратном нумерации, т. е. при загрузке формы фокус будет у кнопки "3".

Выполнение. Для создания приложения используются элементы управления, свойства которых приведены в табл. 6.

Таблица 6

Элементы управления и их свойства в приложении "Кнопки"

Элемент	Свойства	Значения
Форма	(Name)	frmButtons
	Border Style	1 – Fixed Single
	Caption	Кнопки
	StartUpPosition	2 – Center Screen
Метка	(Name)	lblText
Кнопка 1	(Name)	cmd1
	Caption	&1
	TabIndex	2
Кнопка 2	(Name)	cmd2
	Caption	&2
	TabIndex	1
Кнопка 3	(Name)	cmd3
	Caption	&3
	TabIndex	0

Программный код.

Option Explicit

Private Sub cmd1_ Click( )

Call WriteCaption (1)

End Sub

Private Sub cmd2_ Click( )

Call WriteCaption (2)

End Sub

cmd3_ Click( )

Call WriteCaption (3)

End Sub

Private Sub WriteCaption(Index As Byte)

lblText.Caption = "Кнопка" & Index

End Sub