جستجو در فایل و جدا کردن چند رشته از یک خط؟

[majid325]

با سلام :
دوستان نمونه زیر را نگاه کنید!

09/23/06 11:56AM 108 07 <I>01318830828 0'02 00:05'58
09/23/06 11:56AM 111 11 33651179 00:05'55
09/23/06 11:56AM 102 08 <I>04112369142 0'01 00:02'14
09/23/06 11:56AM 105 02 22448276 00:04'16
09/23/06 11:56AM 110 0 <I>02188924828 0'03 00:01'53

حالا من میخوام هر قسمت را جدا کنم وداخل یک متغییر بریزم (که به داخل گرید ببرم)!
قسمت ها هم شامل (زمان-11:56AM)(خط داخلی-108)(شماره خط اصلی -07)(شماره تلفن- 013188....) و.....
حالا کسی از دوستان تابعی یا راه حلی برای جدا کردن اینها دارد(با توجه به این که ما طول حدودی اینها را میدونیم)
با تشکر

[m_nejad]

توسط حلقه خطهای فایل را بخون و پس از split کردن با کارکتر space هر کدام از محتویات اطلاعات را در محل مورد نظر بنویس.

[majid325]

توسط حلقه خطهای فایل را بخون و پس از split کردن با کارکتر space هر کدام از محتویات اطلاعات را در محل مورد نظر بنویس.
منظور شما را متوجه نشدم.
با این کد من فایل را میخونم:

Dim utf8 As New Text.UTF8Encoding
Dim OpenFile As New OpenFileDialog
OpenFile.ShowDialog()
If OpenFile.FileName <> "" Then
TextBox1.Clear()
Dim fs As New FileStream(OpenFile.FileName, FileMode.Open, FileAccess.Read)
Dim ar(fs.Length) As Byte

For i As Integer = 0 To fs.Length - 1
ar(i) = fs.ReadByte
Next

TextBox1.Text = utf8.GetString(ar)
fs.Close()

End If
اگر میشه روی کد من نظر بدین و با یک نمونه کد کوچک بگین چی کار کنم.
با تشکر