¿Cómo leer las filas y columnas de un archivo TXT en VB.NET?

Dim v Open "" amp.Path amp "\1.txt" para entrada como #1

Hacer mientras no sea EOF ( 1)

Entrada de línea #1, temp

x = x 1

Si x = 1 entonces

v = Split( temp , " ")

For i = 0 To UBound(v)

Texto1(i).

Bucle

Cerrar # 1

' MsgBox CStr(x) "line"

End SubPrivate Sub Command2_Click() 'Segunda línea

Dim v Open "" amp App.Path amp; ; "\1.txt" Para entrada como #1

Hacer mientras no sea EOF(1)

Entrada de línea #1, temp

x = x 1

Si x = 2 Entonces

v = Split(temp, " ")

Para i = 0 a UBound(v)

Texto2(i).Texto = v(i)

Siguiente

Finalizar si

Bucle

Cerrar #1

' MsgBox CStr(x) "línea"

End Sub