√ Arahan Listing Vb6 Supaya Textbox Tidak Dapat Diketik Karakter Alfabet

Kode Listing VB6 Agar Textbox tidak dapat diketik karakter alfabet.

Mengapa hal ini diharapkan di kegiatan visual basic?

untuk mencegah terjadinya kesalahan/bug, contohnya pada kolom ISI NOMOR yang harusnya diisi oleh karakter angka numerik dan seharusnya tidak dapat diisi oleh karakter alfabet.

Baca Juga : Kode Listing VB6 Agar Textbox tidak dapat diketik Angka/Numerik

Berikut ini penjelasannnya :

1. buka Visual basic 6.0 anda
2. Buat form gres > masukkan textbox

3. Double klik pada textbox dan ubah deklarasi menjadi Keypress
4. Pastekan arahan listing berikut ini :

Private Sub tnoktp_KeyPress(KeyAscii As Integer)

If Not (KeyAscii >= Asc("0") And KeyAscii <= Asc("9") Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyReturn) Then KeyAscii = 0

End Sub

5. Coba Running programnya.
Sumber http://www.hendrisetiawan.com