VB .Net - Validasi TextBox Hanya Bisa Diisi Oleh Angka

Kembali di Validasi pada Visual Basic .Net. Kali ini saya akan membahas cara memvalidasi TextBox hanya bisa diisi oleh huruf / tidak bisa diisi oleh angka. Fungsi ini menurut saya sangat penting, karena jika anda mempunya sebuah tabel yang data fieldnya adalah numeric dan anda ingin menginput data pada sebuah form VB .Net, maka anda harus memvalidasinya karena jika tidak maka program akan error jika anda atau user yang menggunakan aplikasi input sebuah huruf.

Fungsi validasi kali ini biasanya digunakan pada sebuah Form Transaksi, atau Form Barang. Dimana form barang biasanya terdapat input data Harga Barang atau Jumlah Barang yang diharuskan Input angka bukan Huruf.

Berikut langkahnya :
Buka Aplikasi VB .Net anda, kemudian anda buat sebuah Form.

Silahkan anda klik gambar diatas untuk lebih detail
Gambar diatas terdapat TextBox1, TextBox2, TextBox3, TextBox4.
Yang akan kita Validasi adalah TextBox3 dan TextBox4.
Karena pada TextBox tersebut kita harus menginput Angka bukan Huruf.

Untuk kodingnya seperti dibawah ini :

Public Class Form1
 Private Sub TextBox3_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox3.KeyPress
        If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True
    End Sub
    Private Sub TextBox4_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox4.KeyPress
        If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True
    End Sub
End Class

Sesuai penjelasan saya diatas, bahwa yang kita validasi hanya TextBox3 dan 4.
Untuk mempraktikannya silahkan anda Run atau Jalankan Project VB .Net anda

Maka jika sudah Run, anda tidak bisa memasukan Huruf pada TextBox3 dan 4.
Demikian pembahasan saya mengenai Validasi TextBox Hanya Bisa Diisi Oleh Angka semoga bermanfaat untuk anda.

Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.