Leer archivo de texto

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