Menu Horisontal

Kamis, 12 April 2012

Membatasi Karakter Input TextBox

Berikut ini satu baris kode yang bisa Anda gunakanuntuk melakukannya. Sebagai contoh, buatlah sebuah kontrol TextBox di dalam Form. Lalu ketikkan kode berikut di bagian 'TextBox1_KeyPress' -nya :

[ VB 6.0 ]
If (InStr("RTAB", Chr(KeyAscii)) = 0) And (KeyAscii <> 8) Then KeyAscii = 0

[ VB .NET ]
If (InStr("RTAB", e.KeyChar) = 0) And (e.KeyChar <> Chr(8)) Then e.KeyChar = Chr(0)

Contoh diatas menunjukkan bagaimana TextBox hanya bisa diisi karakter "R", "T", "A", dan "B" saja. Jika Anda menginginkan karakter yang lain, tinggal menggati teks yang berwarna merah dengan karakter-karakter yang hanya boleh diinputkan. Misalnya Anda ingin hanya krakter "J" dan karakter angka saja, tinggal menggantikannya dengan "J0123456789".

2 komentar:

リアン mengatakan...

apakah hanya terbatas pada textbox saja mas, kalo komponen lain seperti label bisa tidak dibatasi karakternya?

リアン mengatakan...

Error 1 'KeyChar' is not a member of 'System.EventArgs'. C:\Users\1218220\documents\visual studio 2010\Projects\HRDTMC\HRDTMC\Form2.vb 192 27 HRDTMC