Visual Basic: Membuat Inputan Hanya Angka Atau Huruf Saja

Dalam membuat program menggunakan visual basic atau vb 6, seperti halnya program nilai pastinya inputan dalam textbox tidak boleh berbentuk huruf. Apa jadinya kalau di inputan nilai yang harusnya angka kok diisi huruf? Bisa-bisa pengolahan nilainya akan jadi berantakan bahkan error. Nah untuk mengantisipasinya, saya akan memberikan caranya supaya inputan hanya berbentuk angka atau huruf saja. 

Silahkan jalankan dulu program visual basic di laptop/PC kalian. Nanti silahkan kalian desain form dengan 2 komponen Textbox. Satu untuk inputan huruf dan satunya lagi untuk inputan angka. Silahkan masukkan script berikut di dalam event Keypress:

Inputan Angka

If Not (KeyAscii >= Asc("0") & Chr(13) And KeyAscii <= Asc("9") & Chr(13) Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete Or KeyAscii = vbKeySpace) Then
MsgBox "Hanya Angka Saja", 48, "STOP"
KeyAscii = 0
End If

Inputan Huruf

If Not (KeyAscii >= Asc("a") & Chr(13) And KeyAscii <= Asc("z") & Chr(13) Or (KeyAscii >= Asc("A") & Chr(13) And KeyAscii <= Asc("Z") & Chr(13) Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete Or KeyAscii = vbKeySpace)) Then
MsgBox "Hanya Huruf Saja", 48, "STOP"
KeyAscii = 0
End If

Sript di atas sudah dilengkapi kotak pesan sebagai validasi. Semoga bermanfaat.