Visual Basic - cómo Recorrer las posiciones de un textbox

Life is soft - evento anual de software empresarial
 
Vista:

cómo Recorrer las posiciones de un textbox

Publicado por mildred (1 intervención) el 12/09/2005 23:28:32
Hola...

Tengo que hacer un programa que valide el contenido de un cuadro de
texto en visual basic.

Por ejemplo, las cuatro primeras posiciones deben ser únicamente
letras las dos siguiente dígitos de 6 al 9, etc.

Mi problema es que no sé como se cuentan las posiciones del cuadro de texto.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:cómo Recorrer las posiciones de un textbox

Publicado por Salvador Mendoza (2 intervenciones) el 13/09/2005 00:10:53
puedes usar la funcion mid("texto",inicio, tamaño) donde el valor de inicio seria el númer de caracter en el que quieres empezar a leer y el tamaño es el número de caracteres que quieres ver...

Podría ser algo como esto:

Dim texto As String
Dim cont As Integer
Dim I As Integer


texto = Text1.Text
cont = 0
For I = 1 To Len(texto)
cont = cont + 1
If cont <= 4 Then
If IsNumeric(Mid(texto, I, 1)) Then
MsgBox "los primeros cuatro caracteres deben ser LETRAS" & vbCr & "Caracter: " & Mid(texto, I, 1) & vbCr & "Posición: " & cont, vbCritical, "Error"
End If
End If
If cont >= 5 And cont <= 10 Then
If Not IsNumeric(Mid(texto, I, 1)) Then
MsgBox "Los caracteres que siguen al cuarto deben ser NÚMEROS" & vbCr & "Caracter: " & Mid(texto, I, 1) & vbCr & "Posición: " & cont, vbCritical, "Error"
End If
End If
Next I

espero que te sirva...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar