hallo programmer
sedikit trik nih utk membuat validasi inputan, contoh ini biasanya dibuat
spy user ga salah menginput.
ketik kodingnya spt dibawah ini pada event keypress
Private Sub Text1_KeyPress(KeyAscii As Integer)
If (Not KeyAscii >= Asc("A") Or Not KeyAscii <= Asc("Z")) _
And (Not KeyAscii >= Asc("0") Or Not KeyAscii <= Asc("9")) _
And KeyAscii <> Asc(vbBack) Then
MsgBox "Hanya huruf dan Angka aja"
End If
End Sub
kode diatas hnya membatasi user utk menginput huruf atau angka dan backspace
utk menghapus kalo ada kesalahan
dan hurufnya nya pun cuma bisa huruf besar aja jadi perlu ditambah spy bisa
juga utk huruf kecil dan juga mungkin
perlu ditambah spasi ( itu PR yg hrs diselesaikan ) dan kalo diperhatikan,
aku menggunakan sintak Asc daripada Chr, kenapa?
karena kalo memakai chr kombinasinya kan dgn angka sehingga bacanya agak
susah bagi orang awam spt aku.
tapi kalo menggunakan asc spt diatas, kodenya jadi jelas dan maksudnya dapat
dimengerti.
ok semoga bermanfaat, sampe ketemu di trik berikutnya :-)
salam
lilis
