VB二级的两个小问题

来源:百度知道 编辑:UC知道 时间:2024/05/27 11:43:28
option base 1
dim arr()as integer
private sub form_click()
dim i as intege,j as integer
redim arr(3,2)
for i =1to 3
forj=1to2
arr(i,j)=i*2+j
next j
next i
redim arr(3,4)
for j=3to4
arr(3,j)=j+9
next j
print arr(3,2);arr(3,4)
end sub

区别option base 1
dim arr()as integer
private sub form_click()
dim i as intege,j as integer
redim arr(3,2)
for i =1to 3
forj=1to2
arr(i,j)=i*2+j
next j
next i
redim preserve arr(3,4)
for j=3to4
arr(3,j)=j+9
next j
print arr(3,2)+arr(3,4)
end sub

为什么第一个的答案是0,13而第二个的答案是21.。。就是arr(3,2)的问题。。。谢谢啊

第一次:print arr(3,2);arr(3,4) 打印2个数

第二次:print arr(3,2)+arr(3,4) 打印一个数
注意:这次使用 redim preserve arr(3,4) 时,preserve 关键字,即保留数组arr中的数据

是这两个的区别
redim arr(3,4) 会把之前的arr(3,2)前掉
redim preserve arr(3,4) 延用之前的arr(3,2)