VALIDASI HURUF DAN ANGKA PADA VISUAL BASIC 6

LAMA SUDAH TIDAK POSTING

VALIDASI INPUT HURUF DAN ANGKA PADA VISUAL BASIC 6.

BUAT FORM SEPERTI BERIKUT.


ISIKAN KODE BERIKUT PADA COMMAND1


Private Sub Command1_Click()
If IsNumeric(Text1.Text) = True Then
MsgBox ("input berupa angka")
End If
If Not IsNumeric(Text1.Text) = True Then
MsgBox ("input bukan angka tapi huruf")
End If
End Sub