ник: час
Private Sub цена_KeyPress(KeyAscii As Integer)
If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii <> 8 And KeyAscii <> 110 Then
KeyAscii = 0
End If
End Sub
|
Подскажите почему запятая не хочет вводиться??
Надо русскую раскладку и
If (KeyAscii < 48 Or KeyAscii > 57) And (KeyAscii <> 8 And KeyAscii <> 44) Then
KeyAscii = 0
End If
|