Duda con splits

[$Edu$]

Bueno mira, te dejo como hacerlo, pero la idea es que lo hagas vs, asique intenta mejorarlo a tu gusto y hacer lo de guardar tambien.

Código (vb) [Seleccionar] Expandir


Private Sub Command1_Click()

Dim data As String ' variable que contendra la linea del texto
Dim datos() As String ' el array que contendra las palabras divididas por " "
Dim FF As Integer ' usamos esto siempre para
FF = FreeFile '  asegurarnos de abrir un archivo que no abrimos antes

Open "C:\data.txt" For Input As #FF ' abrimos el archivo
   
Do ' bucle para leer todas las lineas por si usaras mas textbox
    ' y en ese caso tendrias que crear una matriz de control para ir agregandole valor al Index del textbox
   
    Line Input #FF, data ' obtenemos la linea y la guardamos

    datos = Split(data, " ") ' creamos el array para sacar Nombre, Apellido y telefono, separados
    Text1.Text = datos(0) ' guardamos el Nombre
    Text2.Text = datos(1) ' guardamos el Apellido
    Text3.Text = datos(2) ' guardamos el telefono
   
Loop While Not EOF(FF) ' el bucle sigue hasta que no sea el fin
                    ' EOF = End Of File

Close #FF ' cerramos el archivo

End Sub


Si no entiendes algo decime

[marisagirl]

gracias por la respuesta.
El codigo es parecido a lo que ya tenia yo.

Y no me sirve u.u
Pero bueno no pasa nada,ya no os mareo mas.
Muchas gracias por todo 

[$Edu$]

Te rindes facil xD, yo con lo que te deje, y el codigo si miras los comentarios entenderias como modificarlo pero bueno.. va en gusto dijo una vieja..