Cara Membuat TextBox Hanya Dapat Diisi Dengan Angka

Cara Membuat TextBox Hanya Dapat Diisi Dengan Angka...
Cara Membuat TextBox Hanya Dapat Diisi Dengan Angka
Pernahkan anda membuat userform kemudian disitu terdapat textbox, dan textbox tersebut hanya diisi dengan angka saja. Serperti cotohnya disamping, saya membuat userform input incoming man power, saya membuat textbox NIK (yang dilingkari merah), dimana nik tersebut hanya diisi dengan karakter angka, Naah untuk meminimalisir kesalahan terkadang hal tersebut harus di filter dengan bagaimana caranya textbox yang diisi hanya bisa diisi dengan format angka, tidak bisa diisi dengan karakter huruf atau yang lainnya.



Ok langsung saja akan saya bahas caranya disini.

Ketika anda membuat textbox pada userform masukan scrip di bawah ini pada textbox yang akan dibuat formatnya nya hanya dapat diisi dengan angka saja.

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

    'Script ini diasumsikan jika nama dari textboxnya "TextBox1"
    'Rubah TextBox1 jika nama nya berbada, sesuaikan dengan nama textbox yang akan dibuat formatnya angka

Select Case KeyAscii
   Case Asc("0") To Asc("9")
   Case Else
     KeyAscii = 0
End Select
End Sub

Script di atas saya assumsikan jika textbox yang akan dibuat formatnya menjadi angka bernama "TextBox1". Jika nama textbox yang anda gunakan lain, tinggal diganti kata textbox1 yang berada paling atas (Private Sub TextBox1).

Terima kasih
Semoga bermanfaat.
Advertisement

© 2014 Blognya Cep Ruddi - ALL RIGHTS RESERVED
Template By FIANESIA Diberdayakan oleh Blogger