Visual Basic - Ayuda Visual Basic 6

Life is soft - evento anual de software empresarial
   
Vista:

Ayuda Visual Basic 6

Publicado por Martin (5 intervenciones) el 20/02/2009 21:41:07
Bueno miren tengo una duda, quiero hacer sesto

en un text box (text1) quiero poner "perro - malo"

y kiero ke en un text2 y en un text3 se separen

ejemplo

(text1) perro - malo

(text2) perro

(text3) malo

no se si me entiendan
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:Ayuda Visual Basic 6

Publicado por gmike (7 intervenciones) el 20/02/2009 23:30:23
usando la funcion mid(), Algo asi:
For i = 1 To Len(text1)
letra = (Mid(text1, i, 1))
If letra = "-" Then
text 2= Mid(text1, 1, i - 2)
text3=Mid(text1, i+2, Len(text1))
i = Len(text1)
End If
Next i
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

RE:Ayuda Visual Basic 6

Publicado por Martin (5 intervenciones) el 21/02/2009 01:21:50
Muchas GGracias Me has Ayudado Mucho ;)
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