|
привет! Может это сообщение и опоздало безнадежно, но можно попробовать такой вариант. процедурка отслеживает все нажатия на кнопы и разрешает только цифири и пробелы
Private Sub txt_info_KeyPress(KeyAscii As Integer)
If txt_info.Text = "" Then KeyAscii = 0
If Not IsNumeric(Chr(KeyAscii)) And KeyAscii <> 32 Then
KeyAscii = 0
Exit Sub
End If
End Sub
|