Шаг 76 - Проверка ввода пользователя используя KeyPress

Данное событие возникает, когда пользователь нажимает какую-нибудь клавишу. Это событие не будет генерироваться при нажатии функциональных или специальных клавиш. Многие элементы управления позволяют обрабатывать это событие.

gif/76_1.gif (3329 b)

Нашем код который просто запрещает вводить что либо кроме цифр в первое поле.

Private Sub Text1_KeyPress(KeyAscii As Integer)
If (KeyAscii < 47) Or (KeyAscii > 57) Then
MsgBox "Enter numeric pleas, елы палы"
KeyAscii = 0
End If
End Sub

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

gif/76_2.gif (3615 b)

И именно в этом поле.


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