SoloCodigo

Hola

Alguien sabe como puedo validar un número de identificación. es de longitud fija (10) y debe estar formado solo por números y las letras mayusculas A,B,C  (p.e. 0101C4387A), bien tengo el siguente codigo:


Ahora el problema es como saber si esa variable esta formada solo por números y las letras A,B,C. ojala puedan ayudarme.

Gracias.

mira lo puedes hacer asi:
Private Sub Command1_Click()
For i = 1 To Len(Variablestring)
 x = Mid(Variablestring, i, 1)
 If (x < "0" Or x > "9") And (x < "A" Or x > "Z") Then
   MsgBox "error"
   Exit Sub
 End If
Next
MsgBox "todo bien"
End Sub

Amigos del visual basic, soy nuevo en este foro y aca les envio una funcion que resuelve el tema de la aceptacion de solo numeros

' ESTE EL EL TEXTBOX QUE SOLO ACEPTARA NUMEROS
Private Sub Text1.text_KeyPress(KeyAscii As Integer)
    KeyAscii = SoloNumeros(KeyAscii)
End Sub


' ACA ESTA LA FUNCION
Function SoloNumeros(ByVal KeyAscii As Integer) As Integer
    If InStr("0123456789", Chr(KeyAscii)) = 0 Then ' si no se ha ingresado numero
       SoloNumeros = 0
    Else
       SoloNumeros = KeyAscii
    End If
    If KeyAscii = 8 Then SoloNumeros = KeyAscii   ' borrado atras
    If KeyAscii = 13 Then SoloNumeros = KeyAscii ' return
End Function
  AGRADECER SIEMPRE ES BIEN RECIBIDO