UC知道关于 VBS中的 数组变量
来源：百度知道 编辑：UC知道 时间：2024/06/24 23:52:00
VBS中，数组 的维数，可以用变量吗？
str01=abcdefg
k=Len(str01)
Dim aaa()
total=0
i=0
j=1
For k
aaa(i)=asc(mid(str01,j,1))
total=total+aaa(i)
i=i+1
j=j+1
EndFor
MessageBox total
为什么结果显示 0
数组 aaa(i) 的用法不对吗？
str01=abcdefg
k=Len(str01)
Dim aaa()
total=0
i=0
j=1
For k
aaa(i)=asc(mid(str01,j,1))
total=total+aaa(i)
i=i+1
j=j+1
EndFor
MessageBox total
为什么结果显示 0
数组 aaa(i) 的用法不对吗？
可以
aaa()是动态变量
首先声明动态变量：Dim aaa()
然后在要用的时候（改变它的时候）使用
Redim preserve aaa([一维下标 to ]一维上标[,[二维下标 to]二维上标……])
如
Dim aaa()
i = 2
Redim preserve aaa(i)
aaa(2)="123"
redim preserve aaa(i+1)
aaa(3)="321"
msgbox (aaa(2) & " " & aaa(3))
二维：
redim preserve aaa(i,j)
懂了吗？redim preserve是改变动态数组并且保留原来的数据（如果是增加的话）；如果你要顺便清空动态数组原来的数据直接redim aaa(i)即可
另外这个是VBS吗。。？为什么是endfor不是next？
好像不能用变量吧