[.NET] 請問一個讀檔的問題

[sgygs ()]

請輸入專案類型(網站專案或者應用程式專案)： VB2008 express

小弟想寫一個程式可以讀文字檔內的數據，並放入2維陣列中以進行相關運算
文字檔的格式如下，共二個行N個欄位，二行數據間隔5個空格。
34.253     56.588
22.685     63.475
  .           .
  .           .
  .           .

一開始小弟先簡單試做一文字檔(test.dat)，裡面只放1個數字。
按下表單的button後進行檔案選擇並將檔案內的值
用隨機讀檔(OpenMode.random)的方式讀到變數rec.V1中，
最後再把rec.V1的值秀在表單的textbox內。
依照書上的範例修改如下，但顯現在textbox內的值一直不正確。
請各位能否幫小弟看一下，究竟是那邊有問題呢?非常謝謝!!

Public Class Form1

  Structure record
    Public V1 As Single
  End Structure

  Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       '開檔
        Dim rec As record
        OpenFile.FileName = ""
        OpenFile.Filter = "資料檔 (*.dat)|*.dat"
        OpenFile.ShowDialog()

       '讀檔
        FileOpen(1, cdlOpenFile.FileName, OpenMode.Random, OpenAccess.Read,,4)
        FileGet(1, rec)

        '將讀到的檔案秀在textbox中
        TextBox1.Text = rec.V1

        Exit Sub
    End Sub
End Class

--

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 218.34.41.70
→ MOONRAKER:是怎樣不正常。
→ MOONRAKER:另外random access使用甚為複雜 不是表面這麼簡單
→ MOONRAKER:讀取如你說明的文字檔 用streamreader卡實在
→ MOONRAKER:random access是依照變數的內部格式存入檔案中
→ MOONRAKER:阿拉伯數字要用random access讀取是繞遠路
推 horngsh:FileOpen是不是VB6用法?
→ MOONRAKER:沒印象，VB6老屁股的開檔:open <檔案> for <模式> as #k
→ MOONRAKER:k是阿拉伯數字，接下來操作檔案全要指明 #k
→ MOONRAKER:這個至少有25年歷史。
→ jwjeng:這個從DOS時代的BASIC就這樣用了
→ MOONRAKER:所以才有25年。
→ williewillie:什麼叫2行 n個欄位...應該是欄是直的 列是橫的
→ williewillie:2欄n列才對吧