目前手上的資料檔格式長成下列這樣
2222 33.02 2.6 7.7
2222 33.02 2.6 7.7
2222 33.02 >0 7.7
2222 33.02 2.6 <0
裡有>或<的符號
但是隨機出現
由於陣列必須宣告形式
好像無法讀浮點數又讀文字
想請問如何將檔案內的文去除或取代成9999之類
好讓檔案可以讀入陣列
(目前做法是先丟到EXCEL裡面取代)
感謝

先讀成字串，確定是數字再放到陣列裡

如一樓所述，可以開啟檔案後先以字串方式讀取，有特殊符號的地方用空白取代後，寫進另一個新的只有單純數字的檔，然後 rewind 重新讀取數字放進陣列，例如：doread (11, '(a)', iostat = ios) stringif (ios /= 0) exitdo i = 1, len_trim(string)if (string(i:i) == '>' .or. string(i:i) == '<')end dowrite (21, '(a)') trim(string)end dorewind (21)

read(string,"(f4.2)")number ! 字串轉數字

read配合iostat 讀到有錯rewind後再重新處理

可以試試轉成ascii指定0~9去讀不過你的狀況可能還需要查.的ascii當然這一樣是以一樓的方法為基礎