回复 8楼 wp231957
我是在调试,所以想看看中间计算的结果,我想问的是我的代码应该没有什么问题,可是为什么不循环呢
Dim SAdd As Boolean
I = 0 '断面
Open App.Path & "\jilu.txt" For Input As #1
...
Case Is = 4
'SAdd = Not (SAdd)
'If SAdd = False Then I = I + 1
I = I + 1
L(I) = Val(temp(1))
...
再把二维数组定义为固定的