Skip to content Skip to sidebar Skip to footer

√ Arahan Listing Vb6 Supaya Textbox Tidak Dapat Diketik Karakter Alfabet

Konten [Tampil]
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.
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