乡民大家好
小小有个简单的观念一直转不过来
还请大家帮忙指点一下
待读入档案如下:
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以来就有。