Hay formas de leer el archivo y obtener linea por linea. Creo que era

Open "Archivo.txt" For Input As #1
Line Input #1, miVariable1
Line Input #1, miVariable2
Line Input #1, miVariable3
Close #1
 

De todas formas puedes leer el archivo entero y separar por split

Gracias a ambos por la respuesta tan rápida

El código de Raúl funciona bien.

El de Elemental Code supongo que funciona también, sólo le cambié el while en vez de q sea hasta q se termine el texto que sea mientras lineas es menor a 3.

Dim Cadenas() As String
Dim lineas As Long
        Open "C:\separar.txt" For Input As #1
            While lineas < 3
                ReDim Preserve Cadenas(lineas)
                Line Input #1, Cadenas(lineas)
                lineas = lineas + 1
            Wend
        Close #1
 

Como tomo la data de cada linea después? supongamos para hacerle un msgbox del valor de cada línea por separado, pregunto en el caso que propone elemental code.

edit: listo, funciona precioso.

MsgBox Cadenas(1)
MsgBox Cadenas(2)
MsgBox Cadenas(3)

Gracias elemental code, sin querer queriendo me quedó clarisimo el concepto de las arrays por primera vez

Hola black, gracias pero el texto va a tener siempre al menos 3 lineas, no sería innecesario poner el and Not EOF(1) ?

Ya lo tengo funcionando, pregunto de curioso nomás.

Con las dos lineas que te acabamos de corregir Hasseds y un servidor, SIEMPRE tendrás 3 lineas.

Dulces Lunas!¡.

Los adoro! ^^

Pensar que hace unos meses no sabía setear una variable en vb, y ahora no sabía sacar las líneas de un .txt ajajaj pero por lo menos hice cosas bastante/muy copadas, y siempre que me tranco con algo ustedes son mi última parada, pero es seguro obtener una respuesta acertada con gente como ustedes.

Gracias por existir y compartir conocimientos, realmente es apreciado.

Ni se imaginan lo que está programando este script kiddie ^^

Hay algún subforo de javascript?