Обработка информации текстового файла

Dim X1 As Single = Число1 '(Другой вопрос где это число находится)

Dim Read As New IO.StreamReader("C:\Users\ADMIN\Desktop\проба.txt", System.Text.Encoding.Default)
 'Переменная Read откроет нам файл для чтения
 
Dim X1 As  string = Read.Readline 
' Вот так в переменную Х1 считается Первая строка из указанного файла. Как добраться до 'каждого символа в строке как раз и написано у затертого до дыр Лукина.
'Да чуть не забыл - следует закрывать файл для чтения иначе он будет занят этим процессом и 'не даст почитать другому)))
Read.Close

Public Class Form1
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim water_dat As New System.IO.StreamReader("water.dat")
        Dim water As String
        water = water_dat.ReadLine
        Debug.WriteLine(water)
 
        Dim splitmassiv
        splitmassiv = (Split(water))
        Debug.WriteLine(splitmassiv(6))
    End Sub
End Class

Dim splitmassiv() As String
        splitmassiv = water.Split(" ")

, StringSplitOptions.None)

Public Class Form1
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim water_dat As New System.IO.StreamReader("water.dat")
        Dim water As String = water_dat.ReadLine
 
        Debug.WriteLine(water)
 
        Dim waterarray() As String = water.Split
 
        Debug.WriteLine(waterarray(29))
    End Sub
End Class