Шаг 79 - Событие проверки Validate

Вы можете использовать это событие для проверки данных после ввода и в момент потери фокуса элемента. Генерация этого события зависит от настройки свойства CauseValidate оно должно быть установлено в TRUE.

gif/79_1.gif (4510 b)

Установив это свойство у всех элементов можно обрабатывать это событие.

Private Sub Text1_Validate(Cancel As Boolean)
MsgBox "Text1_Validate"
End Sub

Private Sub Text2_Validate(Cancel As Boolean)
MsgBox "Text2_Validate"
End Sub

Запускаем и при переходе на другой элемент управления Вы увидите окно сообщения.

gif/79_2.gif (3142 b)

Соотвесвенно у Вас есть возможность внести в это код проверку, например на число.

Private Sub Text1_Validate(Cancel As Boolean)
If Not IsNumeric(Text1.Text) Then
 MsgBox "Ну число нужно, число, какой шаг уже подряд"
End If
End Sub

Private Sub Text2_Validate(Cancel As Boolean)
MsgBox "Text2_Validate"
End Sub

Будет проверять на число первое поле.

gif/79_3.gif (3675 b)


Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем - 14.12.2001