Cargar un archivo en una lista

Public dataTxt As New List(Of String)
dataTxt = File.ReadAllLines("archivo.txt").ToList()

Leer y separar datos

El separador es un caracter

Dim readconex() As String = File.ReadAllLines(conex, vencode)(0).Split(";")

Cuando el separador es una palabra

Dim query As String = "SELECT * FROM tabla WHERE campo=1"

Dim data() As String = query.Split(New String(){"WHERE"},StringSplitOptions.None)

Resultado: " campo=1"

For each reverse

Dim datatxt() As String = File.ReadAllLines("archivo.txt")

For Each s As String In datatxt.Reverse
Next

Limpiar un arreglo (array)

Dim readtext() As String = File.ReadAllLines("archivo.txt")
Array.Clear(readtext, 0, readtext.Length)

fuente: https://stackoverflow.com/questions/713867/what-is-the-best-way-to-clear-an-array-of-strings

ReDim readtext(0)

ReDim Preserve

Erase array fuente

Leer archivo de texto

Dim readtext() As String = File.ReadAllLines("archivo.txt", Encoding.UTF8)

Contar la cantidad de líneas de un archivo

Dim n As Integer = File.ReadAllLines("C:\file.txt").Lenght fuente: https://stackoverflow.com/questions/119559/determine-the-number-of-lines-within-a-text-file