Membatasi Jenis Karakter yang Boleh Diinput Pada TextBox – Kode VB Net

Misalkan Anda mempunyai Kontrol TextBox untuk mengisi nilai mata uang, pastinya TextBox tersebut hanya boleh diisi dengan karakter angka saja. Maka dari itu untuk mengurangi resiko kesalahan pengisian, perlu dibuat kode khusus untuk membatasi jenis karakter yang boleh diketikkan di TextBox.
Berikut pilihan kode untuk membatasi karakter di TextBox yang harus ditulis di event TextBox1_KeyPress :

• Karakter angka saja

 e.Handled = Not (Char.IsDigit(e.KeyChar) Or e.KeyChar = Chr(Keys.Back))

• Atau jika ingin disertai karakter tambahan seperti titik dan koma, maka gunakan kode ini :

e.Handled = Not (Char.IsDigit(e.KeyChar) Or "-.,".Contains(e.KeyChar) Or e.KeyChar = Chr(Keys.Back))

• Karakter huruf saja

e.Handled = Not (Char.IsLetter(e.KeyChar) Or e.KeyChar = Chr(Keys.Back))

• Dan jika ingin disertai juga dengan karakter spasi, maka gunakan kode ini :

e.Handled = Not (Char.IsLetter(e.KeyChar) Or Char.IsWhiteSpace(e.KeyChar) Or e.KeyChar = Chr(Keys.Back))

• Karakter angka dan huruf saja

e.Handled = Not (Char.IsLetterOrDigit(e.KeyChar) Or e.KeyChar = Chr(Keys.Back))

• Karakter khusus

Dim Boleh As String
'daftar karakter yg diperbolehkan
Boleh = "abcde12345"

e.Handled = Not (Boleh.Contains(e.KeyChar) Or e.KeyChar = Chr(Keys.Back))