Kode Listing VB6 Agar Textbox tidak bisa diketik huruf alfabet.
Mengapa hal ini diperlukan di program visual basic?
untuk mencegah terjadinya kesalahan/bug, misalnya pada kolom ISI NOMOR yang harusnya diisi oleh karakter angka numerik dan seharusnya tidak bisa diisi oleh huruf alfabet.
Berikut ini penjelasannnya :
1. buka Visual basic 6.0 anda2. Buat form baru > masukkan textbox
3. Double klik pada textbox dan ubah deklarasi menjadi Keypress
4. Pastekan kode 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 Sub5. Coba Running programnya.
0 Komentar untuk "Kode Listing VB6 Agar Textbox tidak bisa diketik huruf alfabet"