números y letras
wuenas.
¿cómo hago para que un textbox identifique si los datos que se introducen en él son números o letras?
Necesitaría un ejemplo para que cuando introduzca un número en el textbox salga el mensaje el dato introducido es un número o letras, según el caso.
GRACIAS DE ANTEMANO.
¿cómo hago para que un textbox identifique si los datos que se introducen en él son números o letras?
Necesitaría un ejemplo para que cuando introduzca un número en el textbox salga el mensaje el dato introducido es un número o letras, según el caso.
GRACIAS DE ANTEMANO.
'Primero crea un textbox1 y un label1
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKey0 Or KeyAscii = vbKey1 Or KeyAscii = vbKey2 Or KeyAscii = vbKey3 Or KeyAscii = vbKey4 Or KeyAscii = vbKey5 Or KeyAscii = vbKey6 Or KeyAscii = vbKey7 Or KeyAscii = vbKey8 Or KeyAscii = vbKey9 Then
Label1.Caption = "numero"
Else
Label1.Caption = "Letra"
End If
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKey0 Or KeyAscii = vbKey1 Or KeyAscii = vbKey2 Or KeyAscii = vbKey3 Or KeyAscii = vbKey4 Or KeyAscii = vbKey5 Or KeyAscii = vbKey6 Or KeyAscii = vbKey7 Or KeyAscii = vbKey8 Or KeyAscii = vbKey9 Then
Label1.Caption = "numero"
Else
Label1.Caption = "Letra"
End If
End Sub