→ MOONRAKER:不需要，讀取整行以後拿出第一個字元比較即可 11/15 23:27
→ MOONRAKER:現在記憶體限制很少，不要學那種60年代磁帶時期的寫法。 11/15 23:29
→ MOONRAKER:視比較結果再把後面數字用split拆開轉換 11/15 23:30
請輸入專案類型(網站專案或者應用程式專案)：
各位先進：
最近看了一個老FORTRAN寫的程式
裡面有一個函數
基本上功能是：讀取文字檔中的數值資料
但是文字檔中會有一些註解列以*開頭
所以需要判別該列的最開頭是不是*
下面是那個FORTRAN程式的片段
10 READ(50,'(A80)') LTEXT
IF (LTEXT(1:1) .EQ. '*') GOTO 10
BACKSPACE 50
最後的BACKSPACE陳述，在FORTRAN中表示將讀取檔案
的指標指回該列之首
如下面的一個文字檔
---------------------
* 一些註解 '第一列
5 6 7 '第二列
...........
...........
----------------------
因為第一列字首是*，所以會忽略（應該說讀過去）
但第二列字首不是*，所以判別後會用BACKSPACE
返回第二列的起始，以便後續變數讀入 5 6 7等數值
我試了好久
不曉得VB2005有沒有類似變更檔案讀取位置的指令
可以達到前述BACKSPCE相同功能的
還請先進指教
謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.228.56.167