Membatasi Textbox agar bisa diInput Angka saja dengan VB.NET

Untuk membatasi textbox agar bisa diinput angka saja, kita cukup menambahkan coding di event KeyPress pada textbox tersebut. Berikut source code-nya :

Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
    'JIKA YANG DITEKAN ADALAH TOMBOL 0-9 ATAU TOMBOL BACKSPACE
    If IsNumeric(e.KeyChar) = True OrElse e.KeyChar = vbBack Then
        e.Handled = False 'LANJUTKAN INPUT
    Else 'SELAIN ITU
        e.Handled = True 'STOP INPUT
    End If
End Sub