AllBasic
TextBox’a Sadece Rakam Girilmesini Sağlamak
TextBox’a Sadece Rakam Girilmesini SağlamakPrivate Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
If KeyAscii <> 8 Then
KeyAscii = 0
End If
End If
End Sub