鄉民大家好
小小有個簡單的觀念一直轉不過來
還請大家幫忙指點一下
待讀入檔案如下:
1 2 3
4 5 6
7 8 9
.....(有N行)
希望檔案逐行讀入後能轉變成一維或二維的陣列
方便後續使用
以後直接呼叫如 out(1) 或 out(1,2)
以下是我寫的CODE部分:
Dim file01 As New System.IO.StreamReader("D:\file01.txt")
Dim xx As String
Dim i As Integer
Dim out()() As String
i = 0
Do While file01.Peek > -1
xx = file01.ReadLine
out(i, i) = Split(xx, "") <== 似乎是卡在這行 QQ ?
i = i + 1
Loop
file01.Close()
還請鄉民們幫忙指點一下 QQ
感謝

少一個空白?Split(xx, " ")這樣?

加入空白後有改善些 但還有個問題是這樣只抓到最後一行

split得到的結果是一個陣列 裡面有幾項可以用ubound()得到 這樣知道怎麼改了吧

你把vbCrlf取代為空格後再用空格Split這作法對想處理成二維來說還蠻找自己麻煩的

""是空字串不是空格，存以前先檢查strArr()各項是否""就行了。split()的這個問題(或特色)VB6以來就有。