Duda con textbox

[UNFORMAT]

Hola, se me ha planteado un pequeño problema que no se resolver es el siguiente:
Tengo un textbox primario (text1) y otros 3 (text2,3,4) en el text1 quiero introducir un texto dividido en 3 partes por algún caracter.

Código [Seleccionar] Expandir


Texto1
Texto1
Texto1
-------
Texto2
Texto2
Texto2
*****
Texto3
Texto3
Texto3
//////


Lo que quiero hacer es que el texto del text1 me lo divida (utlizando los separadores anteriores * / -) automaticamente para luego poder pasarlo a los otros text
osea pasar el Texto1 a un text, el Texto2 a otro y así con los demás

¿cómo puedo hacer esto?


Gracias por adelantado

[cassiani]

juega con el evento change y la función split

Código [Seleccionar] Expandir

*http://www.elguille.info/vb/vb6/stringFunctions.htm#vb6_06

[UNFORMAT]

Hola, muchas gracias por tu consejo, ¿pero no sabes de algún ejemplo?

No soy especialista en VB, me estoy iniciando


Salud2

[BlackZeroX]

Código (vb) [Seleccionar] Expandir



Dim spli() As String
spli = Split("algo|que|hacer", "|")
MsgBox spli(0)
MsgBox spli(1)
MsgBox spli(2)



otra forma

Código (vb) [Seleccionar] Expandir



msgbox split("algo|que|hacer","|")(0)
msgbox split("algo|que|hacer","|")(1)
msgbox split("algo|que|hacer","|")(2)