Membuat Validasi Textbox VB.Net

Kali ini saya akan berbagi bagaimana caranya membuat validasi dari sebuah objek/tools di VB.Net, tools yang dimaksud adalah "Textbox". Sebelumnya, apa sih validasi itu? validasi jika dilihat dari arti katanya yaitu keabsahan, namun jika kita pasangkan kata validasi tersebut ke textbox itu sendiri, maka ia lebih menitik beratkan pada fungsi dari textbox itu sendiri. Agar tidak lebih berpanjang lebar, silahkan simak beberapa fungsi dari textbox yang telah divalidasi berikut ini :

1. Textbox hanya bisa diisi oleh huruf dan beberapa simbol serta tombol yang ada di keyboard (seperti backspace, dll). Hal ini berfungsi ketika textbox tersebut digunakan sebagai penyimpanan data seperti nama, dimana pada data nama tidak boleh ada angka. Berikut source code yang dapat digunakan

Private Sub txtnmcust_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtnmcust.KeyDown
If e.KeyCode = 48 Or e.KeyCode = 49 Or e.KeyCode = 50 Or e.KeyCode = 51 Or e.KeyCode = 52 Or e.KeyCode = 53 Or e.KeyCode = 54 Or e.KeyCode = 55 Or e.KeyCode = 56 Or e.KeyCode = 57 Then
txtnmcust.ReadOnly = True
Else
txtnmcust.ReadOnly = False
End If
End Sub

2. Textbox hanya bisa diisi angka dan beberapa tombol yang tombol yang ada di keyboard (seperti backspace, dll). Hal ini berfungsi ketika textbox tersebut digunakan sebagai penyimpanan data seperti no telp, no rekening, dll dimana pada data no telp, dsb tidak boleh ada huruf. Berikut source code yang dapat digunakan

Private Sub txthrgsoft_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txthrgsoft.KeyPress
If Not (Char.IsDigit(e.KeyChar)) And e.KeyChar <> ChrW(Keys.Back) Then
e.Handled = True
End If
End Sub

Sedangkan untuk validasi lainnya bisa menggunakan method bawaan dari VB.Net itu sendiri seperti "Enabled", "Clear", dll. Mungkin cukup sekian, jika ada kritik, saran, atau tambahan bisa dilayangkan pada komentar.