Cara Validasi Hanya Number/Numeric Boleh Di Input ke TextBox VB6

Berikut ini adalah bagaimana cara  agar hanya tipe data number/numeric yang boleh dimasukkan ke dalam textbox di visual basic 6, untuk mempraktekannya ikuti langkah berikut :

• Buat 1 Project baru STANDAR.EXE, masukkan satu buah textbox, seperti gambar berikut

• Double klik pada textbox untuk membuka code editor, Lalu copykan code berikut :

   Public Sub HanyaAngka(ByRef KeyAscii As Integer)
    'http://ilkomunived.blogspot.com/
    If ((KeyAscii < 48 And KeyAscii <> 8) Or KeyAscii > 57) Then
        KeyAscii = 0
    End If
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
    'http://ilkomunived.blogspot.com/
    HanyaAngka KeyAscii
End Sub

Coba tekan F5 untuk run program...
Demikian tutorial cara validasi hanya angka textbox vb 6.0,silahkan dikembangkan dan semoga bermanfaat...

Baca juga validasi hanya huruf pada textbox vb 6.0