extraer palabras textbox

[andrer03]

hola compañeros ustedes siempre me audan a ver si me pueden ayudar con esto plz

tengo un texbox1 y un texbox2

en el texbox1 escribo por ejemplo: foro*elhacker*net (las palabras del texbox1 uno siempre van hacer separadas con asteriscos y no con espacios)

como puedo hacer que la palabra foro(esta palabra puede variar y la cantidas de letras tbm) se pase al texbox2? gracias de antemano?

[Novlucker]

Con la función split

Código (vb) [Seleccionar] Expandir

Palabras = Split(textbox1.text,"*")
textbox2.text = Palabras(0)

Saludos 

[andrer03]

okay gracias por tu ayuda Novlucker. y si quiero que en este caso *elhacker* aparezca en un textbox3 que le puedo añadir a la funcion Split

[seba123neo]

definitivamente no sabes lo que hace la funcion Split ni lo que es un Array...

[cassiani]

okay gracias por tu ayuda Novlucker. y si quiero que en este caso *elhacker* aparezca en un textbox3 que le puedo añadir a la funcion Split

No le tienes que agregar nada, como te dicen debes leer un poco, el Split corta la cadena por el delimitador y las subcadenas restantes pasan a formar parte de una array.

En este caso, la cadena que buscas esta en el elemento "1" creo que eso es bastante fácil de entender.

[andrer03]

bueno ya lo resolvi el codigo o que use fue este

Private Sub Command1_Click()
Dim separacion() As String
palabras = Split(Text1.Text, "*")
Text2.Text = palabras(0)
Text3.Text = palabras(1)
End Sub

[seba123neo]

el array es "palabras" no "separacion"