Cita:
Iniciado por andrer
hola tengo un apregunta para ustedes :D
pues lo que quiero hacer es pasar un line de un texto .txt a un texbox1 en vb
por ejemplo quiero pasar la linea 20 del texto a un textbox como hacer eso ayudarme :)
Hola, el procedimiento es sencillo; primero abres el archivo de texto y cargas su contenido en una variable de tipo String y después cargas en un vector cada una de las líneas de la variable. Ahí va el ejemplo
Código:
Private Sub Command1_Click()
Dim s As String, a() As String
Open App.Path & "\Archivo.txt" For Input As #1
s = Input(LOF(1), #1)
Close #1
a = Split(s, vbNewLine)
Text1.Text = a(19)
End Sub
Nota: El elemento 19 del array es la línea 20 del archivo ya que el índice inferior del array es cero.