Текстовое поле (TextBox)

Является основным элементом управления, предназначенным для ввода данных.

События:

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

Пример контроля вводимых данных (ввод в текстовое поле только числового значения):

Private Sub txtNomGr_Change()

If Not IsNumeric(txtNomGr) Then

MsgBox “Вводите только цифры”

EndIf

End Sub

Validate – используется для проверки введенного в текстовое поле значения. Событие Validate возникает только в том случае, если для текстового поля свойству Causes Validation задано значение True.

Пример контроля вводимых данных (на соответствие вводимого значения заданному диапазону значений):

Private Sub txtNomGr_Validate(Cancel_

As Boolean)

If Val(txtNomGr.Text)<100 Or _

Val(txtNomGr.Text)>9999 Then

MsgBox “Номера групп от 100 до 9999”

EndIf

End Sub

Примечание: При проверке работы процедуры примера для перемещения между элементами лучше использовать клавишную команду Tab.

LostFocus - используется для анализа введенного в поле текста. Событие возникает, когда текстовое поле становится неактивным (после передачи фокуса другому элементу). Однако, если это поле является единственным элементом в форме, то оно не может потерять фокус.

Первым возникает событие Validate, затем LostFocus.

GotFocus - используется для удаления или инициализации содержимого текстового поля. Вызывается, когда курсор устанавливается в текстовое поле.

Пример:

Private Sub txtNomGr_LostFocus()

Stud.NomGr=txtNomGr.Text

End Sub

Свойства текстового поля:

Text - содержит отображаемый в поле текст.

Enabled – определяет, будет ли элемент управления реагировать на событие или нет. Если свойству задано значение False, то элемент недоступен.

Visible – управляет видимостью элемента на экране. Если значение свойства False, то элемент “скрыт” от пользователя

Пример:

Private Sub Command1_Click()

Command1.Enabled = False

Command2.Visible = False

End Sub

ToolTipText – содержит текст всплывающей подсказки.

PasswordChar – задает символ, отображаемый в поле вместо вводимых символов.

– определяет максимальное число символов, вводимых в текстовое поле.

С помощью свойства PasswordChar и MaxLength можно предназначить текстовое поле для ввода пароля.

Примечание: В VISUAL BASIC существует стандартный шаблон формы Log in Dialog создания диалогового окна для ввода пароля пользователя.

Для управления текстом используются следующие свойства:

MultiLine - для ввода в текстовое поле нескольких строк.

ScrollBars - определяет, какую полосу прокрутки будет иметь текстовое поле (горизонтальную, вертикальную или обе).

SelStart - определяет начальную позицию выделенного текста в символах.

SelLength - содержит количество выделенных символов.

SelText - можно прочитать или изменить выделенный текст.

Пример выделения всего текста в текстовом поле и замена его новым:

Private Sub Text1_GotFocus()

Text1.SelStart =0

Text1.SelLength = Len(Text1.Text)

End Sub