Programlama DilleriDelphi, Visual Basic, C, C++,C#, ASP, Perl, Php, Html vb. diller hakkında bilgi ve birikimlerinizi paylaşabilir ve yardım alabilirsiniz.
VB'de Text Box'a Sadece Sayı GirmeBu konu 505 defa okundu ve 0 yorum yazildi.
Sub Text1_KeyPress (KeyAscii As Integer)
Dim N$
N = "0123456789."
If KeyAscii <> 8 Then
If InStr(N, Chr(KeyAscii)) = 0 Then
Beep
KeyAscii = 0
Exit Sub
End If
End If
End Sub