18.07.2009, 07:31
общий
это ответ
Здравствуйте, fomservl.
Для этого нужно обрабатывать событие KeyPress соответствующего текстового поля и следить какой символ пользователь хочет ввести:
Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii 'Какой символ вводит пользователь
Case 44, 46, 48 To 57 'запятая, точка или цифра
Case Else: KeyAscii = 0 'что-то другое
End Select
End Sub