在循环内给数组赋值,循环外数组却为空?
Dim fw as Doublefor i=0 to ds-1
Doevents
bi(i)=bi(i)+(-1)*(fb/3600)/ds
Redim fwj(0 to ds-1) as _Double
fwj(i)=fw=fw+bi(i)-180
fw=fwj(i)
print fw
fwj(i)=deg(fw)
next i
在这个循环里面我给数组fwj()赋值,
在循环内print,显示的值是对的 但是出了循
环,print fwj(“任意一个”)都是0
这是为什么呀,这样的话后面的计算都是错误的了