Validasi Inputan Hanya Huruf Atau Angka Saja VB.Net

Beberapa textbox untuk keperluan inputan data mungkin memerlukan validasi agar inputan sesuai dengan yang diharapakan serta untuk meminimalisir bug program. Sebagai contoh 2 textbox yang digunakan untuk penginputan nomor yang akan dikalikan tentu akan error jika kita inputkan data berupa huruf.

Berikut beberapa contoh validasi yang banyak digunakan. Perlu diketahui koding tersebut diletakkan pada textbox denga event keypress.

1. Validasi inputan hanya 0-9 dengan pengecualian tombol backspace :  

   If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled() = True

Teknik lain :

Dim KeyAscii As Short = Asc(e.KeyChar)

        If (e.KeyChar Like "[0-9]" _

            OrElse KeyAscii = Keys.Back) Then

            KeyAscii = 0

        End If

        e.Handled = CBool(KeyAscii)

2.  Validasi inputan hanya A-Z a-z dengan pengecualian tombol backspace :

Dim KeyAscii As Short = Asc(e.KeyChar)

        If (e.KeyChar Like "[A-Z,a-z]" _

            OrElse KeyAscii = Keys.Back _

             OrElse KeyAscii = Keys.Space _

            OrElse KeyAscii = Keys.Return _

            OrElse KeyAscii = Keys.Delete) Then

            KeyAscii = 0

        End If

        e.Handled = CBool(KeyAscii)

 Semoga Bermanfaat.