1.7.4. Элемент управления CommandButton (Командная Кнопка)

Э

лемент управленияCommandButtonявляется инструментом, позволяющим дать программе команду на выполнение.

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

Командные кнопки служат для управления программой. С каждой такой кнопкой связана процедура обработки события, которая будет выполняться, после того, как пользователь щелкнет по кнопке. При размещении командной кнопки на экранной форме VisualBasicавтоматически устанавливает некоторые свойства этого объекта, но ряд свойств устанавливается пользователем.

Свойства элемента управления CommandButton

Name.Как и текстовому окну или метке, командной кнопке можно задать уникальное имя, например,cmdCalculate(по умолчанию для первой командной кнопки имя Command1, для второйCommand2 и т.д.). Это имя будет использовано в программе для ссылки на командную кнопку.

Свойство Caption определяет надпись на кнопке. По умолчанию значение свойстваCaptionCommand1. Его можно заменить более информативным в зависимости от назначения командной кнопки, например, «Очистка», «Выход», «Вычисление».

Для командной кнопки возможно также установление ранее рассмотренных свойств, таких, как Font (название, начертание и размер шрифта);Left, Top, Height, Width (положение и размеры кнопки на форме).

Свойство BackColor (цвет фона) действует только в том случае, если свойствоStyleимеет значение, равное 1 (Grafical).

События, связанные с командной кнопкой

Как уже отмечалось ранее, любое действие пользователя (щелчок мыши, нажатие клавиши и т.п.) рассматриваются VisualBasicкак событие, распознаваемое объектом управления, формой или программой. В программе каждый объект управления настроен так, чтобы распознавать определенный тип событий. Одни объекты управления могут реагировать на одинарные и двойные щелчки мыши, другие объекты управления реагируют на изменение значений. Чтобы объект управления реагировал на определенное событие, в процедуру обработки события этого объекта надо поместить код. В противном случае программа проигнорирует это событие. Какие события связаны с командной кнопкойобъектомCommandButton? Как уже говорилось, просмотреть их можно в окне кодов. Активизируется окно кодов с помощью:

• клавиши F7;

• двойного щелчка на объекте или на форме;

• щелчка на кнопке ViewCodeв окне проекта.

В списке объектов (Object) выбирается требуемый объект, например,Command1. В правой половине окна кодов можно раскрыть список процедур обработки событий, связанных с данным объектом (Procedure). У каждого объекта может быть несколько связанных с ним событий. Основное назначение командной кнопкиотследить событиеClick, возникающее при щелчке мыши на кнопке. Программа (программный код или просто код) обработки события оформлена вVisualBasicкак процедура.

Процедура обработки события Clickдля объекта управления с именемCommand1имеет следующий вид:

Private Sub Command1_Click()

End Sub

Первая строка кода определяет начало или заголовок процедуры. Последняя строка кода определяетконец процедуры. Между этими двумя строками помещается код, который должен быть выполнен после того, как пользователь щелкнет мышью на командной кнопке. В заголовке процедуры ключевое словоPrivateозначает, что данная процедуралокальная, т. е. доступна только внутри модуля данной формы и не может быть вызвана из других модулей проекта. СловоSubговорит о том, что мы имеем дело с процедурой. Далее следует имя процедуры,Command1_Click, которое состоит изимени объекта(в нашем случае имени командной кнопки) иимени события. Имя объекта и имя события соединены между собой символом подчеркивания. Если мы хотим, чтобы действием данной процедуры была, допустим, очистка текстового окна с именемText1, расположенного на формеForm1, то процедура должна иметь следующиий вид:

Private Sub Command1_Click()

Form1!Text1.Text=””

End Sub

В лабораторных работах, завершая их, необходимо организовать выход в среду VisualBasic. Это означает, что на экранной форме должна быть кнопка, отвечающая за это действие, допустим, что это кнопка с именем Command2. Тогда процедура обработки этого события имеет вид:

Private Sub Command2_Click()

End ‘выход из программы в средуVisualBasic

End Sub

5. Элементы управления VScrollBar и HScrollBar (Вертикальная и Горизонтальная Линейки Прокрутки)

В

ертикальная Линейка Прокрутки

Горизонтальная Линейка Прокрутки

Не следует путать свойство ScrollBarэлемента управленияTextBoxи линейки (или полосы) прокрутки, которые сами являются элементами управления. СвойствоScrollBarиспользуется для перемещения по тексту объектаTextBox. Линейки же прокрутки служат:

• для увеличения или уменьшения некоторого значения (например, изменения интенсивности цвета, звука на мультимедийных устройствах);

• для упрощения ввода чисел из заданного диапазона, т.е. не через клавиатуру, а с помощью мыши (перемещением ползунка на линейке прокрутки). При этом исключаются ошибки ввода.

Полоса прокрутки позволяет вводить целые числа в диапазоне от -32768 до 32767.

Свойства линеек прокрутки

Name  по умолчанию задаются имена VScroll1, VScroll2, HScroll1, HScroll2 и т.д.

Min, Max  эти свойства определяют диапазон прокрутки (по умолчанию Min=0, Max=32767). При этом значение Min соответствует верхнему концу полосы, Max  нижнему (для вертикальной полосы прокрутки). Соответственно Min  левому концу, Max  правому (для горизонтальной полосы прокрутки).

Value  значение этого свойства определяет положение бегунка на линейке прокрутки (по умолчанию =0). При прокрутке ползунка сверху вниз (слева направо) значение свойства Value увеличивается. Чтобы изменить направление свойства Value, достаточно поменять местами значения свойств Min и Max. При проектировании формы (режим design) в свойстве Value указывается начальное значение, определяющее положение бегунка на полосе при запуске программы.

Свойство SmallChange определяет величину, на которую изменится значение Value при щелчке по стрелкам на концах линейки прокрутки. По умолчанию значение свойства = 1.

Свойство LargeChange определяет величину, на которую изменится значение Value при щелчке по линейке прокрутки между стрелкой и ползунком. По умолчанию значение свойства = 1.

Можно передать значение, задаваемое с помощью линейки прокрутки (свойство Value) другому объекту, например, вывести в текстовое окно:

Text1.Text=Str(HScroll1.Value)

Функция Str(), используемая в данном выражении, преобразует число в строку.

События, связанные с объектами VScrollBar и HScrollBar

Полосы прокрутки имеют два основных события, связанных с изменением положения бегунка, отображаемого в свойстве Value.

Событие Change (изменение) возникает когда:

• щелкаем мышью на стрелках или на самой полосе прокрутки;

• отпускаем левую кнопку мыши после протяжки бегунка на новое место.

Событие Scroll (прокрутка) возникает во время протяжки бегунка.

И то, и другое событие, вызывает изменение положения бегунка, а значит, и изменение свойства Value, т.е. изменение данного, считываемого с линейки прокрутки. Процедуры, обрабатывающие эти два события, позволяют передавать значение свойства Value в текстовое окно для отображения или в любую другую процедуру для использования.