(vb6) Cara supaya TextBox hanya bisa diisi dengan angka atau huruf saja
validasi TextBox |
1. Yang akan kita gunakan adalah procedure keyPress, contoh kali ini kita akan menyeting supaya hanya angka yang dimasukan pada text1.text saat ditekan enter.
Double klik pada text1.text dan pilih procedure KeyPress. Masukan syntax berikut diantara Private Sub Text1_KeyPress(KeyAscii As Integer) dan End Sub.
If KeyAscii = 13 Then
If IsNumeric(Text1.Text) = False Then
MsgBox "Maaf Data Yang Di masukan Harus Angka / Numeric...!", vbInformation
Exit Sub
End If
End If
Catatan : Ketika ada huruf di text1 dan ditekan enter, maka akam muncul msgbox / pemberiahuan "Maaf Data Yang Di masukan Harus Angka / Numeric...!"
2. Kali ini hanya huruf yang boleh ada pada textbox.
Double klik pada text1.text dan pilih procedure KeyPress. Masukan syntax berikut diantara Private Sub Text1_KeyPress(KeyAscii As Integer) dan End Sub.
If KeyAscii = 13 Then
If IsNumeric(Text1.Text) = True Then
MsgBox "Maaf Data Yang Di masukan Harus Huruf", vbInformation
Exit Sub
End If
End If
Catatan : Ketika ada angka di text1 dan ditekan enter, maka akam muncul msgbox / pemberiahuan "Maaf Data Yang Di masukan Harus Huruf"
Mungkin cuma itu tutorial yang dapat saya bagikan untuk kali ini. Semoga bermanfaat. Terimakasih..
kalo misalnya cara atur karakter yang bisa kita input itu gimana caranya?
BalasHapus