Membuat Validasi Huruf dan Angka Pada TextBox Visual Basic 6.0
Membuat Validasi Huruf dan Angka Pada TextBox Visual Basic 6.0
Validasi merupakan sebuah cara untuk menghindarkan dan mengarahkan seorang user dalam pengisian sebuah form, kali ini penulis akan berbagi bagaimana cara agar textbox pada visual basic hanya bisa diinput atau diisi oleh angka atau huruf saja.
Maka silahkan sediakan dua buah object TextBox pada form visual basic dan beri name "huruf" dan "angka"
lalu isikan listing berikut :
Private Sub angka_KeyPress(KeyAscii As Integer)
If Not (KeyAscii >= Asc("0") And KeyAscii <= Asc("9") Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete Or KeyAscii = vbKeySpace) Then
Beep
KeyAscii = 0
End If
End Sub
Private Sub huruf_KeyPress(KeyAscii As Integer)
If Not (KeyAscii >= Asc("A") And KeyAscii <= Asc("Z") Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete Or KeyAscii = vbKeySpace) Then
Beep
KeyAscii = 0
End If
End Sub
#keterangan :
jika melakukan kesalahan maka akan terdengar bunyi "beep" (eksekusi listing "Beep")
untuk huruf hanya bisa diinput huruf besar,untuk validasi huruf kecil silahkan ganti huruf A dan Z pada listing mejadi huruf kecil (a dan z).
Sekian.. semoga bisa membantu.. :)
thankz
BalasHapus