Visual Basic - leer un archivo texto

tengo un archivo de texto hecho con wordpad y tengo 3 o 4 o 5 lineas
no importa la cantidad de lineas
pero me gustaria hacer un arreglo que sea el tamaño de la lineas
si el teco tiene 5 lineas pues el arreglo tendra 5 lineas y luego
talvez se puede leer como un archivo

for i=1 to cantidad de lineas del texto
arreglo(i)=texto linea 1
next

esa es la idea general, pero talvez es imposible.
o si no tengo predeterminado que el archivo de textos
tiene 5 lineas y hago esto

dim campo1,campo2,coampo3,campo4,campo5 as string
campo1=linea1 del texto
campo2=linea2 del texto
campo3=linea3 del texto
etect tec,

tienen una idea de la idea en general como se codificaria.

Hola. Tu duda es fácil de resolver.
Se supone que tienes un fichero de texto plano de N líneas y quieres leerlo y guardar cada línea en una variable.

1. Abre el fichero para lectura.
Dim f as integer
f = freefile
open "C:\mifichero.txt" for input access read as #f
Dim s as string 'aquí vas a ir guardando cada línea del fichero leido
2. Ahora puedes hacer dos cosas...
2.1 Crea un array de cadenas dinámico
Dim arr() as string
lee cada línea del fichero y guárdala en el array
dim i as integer
i=1
do while not EOF(f)
redim preserve arr(1 to 1)
line input #f, s
arr(i) = s
i = i + 1
loop

El problema es que consume bastante...

2.2. En lugar del array dinámico, guárdalo todo en la variable S.

Dim vPartes as variant
Dim s as string

'mientras no se acabe el fichero
'lee línea
s = linea_leida & CARACTER_ESPECIAL

vPartes = Split(s, CARACTER_ESPECIAL)

Ahora, en VPartes(0) tienes la primera línea del fichero, en VPartes(1) la segunda....

Nota: CARACTER_ESPECIAL debe ser un único carácter que NO exista en el fichero. Por ejemplo ~ (ALT-126).

Un saludo.