vbs數(shù)組定義和用法
Array 可返回一個包含數(shù)組的變量。
注釋：數(shù)組中的第一個元素是零。
語法
Array(arglist)
參數(shù) 描述
arglist 必需的。數(shù)組中元素值的列表（由逗號分割）。
實例
例子 1
dim a
a=Array(5,10,15,20)
document.write(a(3))
輸出：
20
例子 2
dim a
a=Array(5,10,15,20)
document.write(a(0))
輸出：
5
數(shù)組變量：有時需要向一個單一的變量賦于多個值，那么您可以創(chuàng)建一個可包含一系列值的變量，這種變量被稱為數(shù)組。
'靜態(tài)數(shù)組
dim a(2)
a(0)="George"
a(1)="john"
a(2)="Ethon"
for i =0 to 2
msgbox a(i)
next
for i =0 to ubound(a) 'ubound函數(shù),返回指定數(shù)組維數(shù)的最大可用下標(biāo)
msgbox a(i)
next
'動態(tài)數(shù)組
dim a()
for i = 0 to 2
redim preserve a(i) 'ReDim語句,用于過程級聲明動態(tài)數(shù)組變量并分配或重新分配存儲空間
a(i)=i+1
msgbox a(i)
next
動態(tài)二維數(shù)組
'動態(tài)二維數(shù)組
Dim MyArray() '首先定義一個一維動態(tài)數(shù)組
ReDim MyArray(1,1) '重新定義該數(shù)組的大小
MyArray(0,0) = "A" '分別為數(shù)組賦值
MyArray(0,1) = "a"
MyArray(1,0) = "B"
MyArray(1,1) = "b"
ReDim Preserve MyArray(1,2) '重新定義該數(shù)組的大小
MyArray(0,2) = "A-a" '繼續(xù)為數(shù)組賦值
MyArray(1,2) = "B-b"
MsgBox UBound(MyArray,1)
MsgBox UBound(MyArray,2)
For i=0 To UBound(MyArray,1)
For j=0 To UBound(MyArray,2)
MsgBox MyArray(i,j) '循環(huán)遍歷數(shù)組，并輸出數(shù)組值
Next
Next
一維動態(tài)數(shù)組
Dim MyArray() '首先定義一個一維動態(tài)數(shù)組
ReDim MyArray(3) '重新定義該數(shù)組的大小
MyArray(0) = "我" '分別為數(shù)組賦值
MyArray(1) = "要"
MyArray(2) = "學(xué)"
MyArray(3) = "習(xí)"
ReDim Preserve MyArray(5) '重新定義該數(shù)組的大小
MyArray(4) = "測" '繼續(xù)為數(shù)組賦值
MyArray(5) = "試"
For i=0 To UBound(MyArray)
MsgBox MyArray(i) '循環(huán)遍歷數(shù)組，并輸出數(shù)組值
Next
這篇文章就介紹到這，需要的朋友可以參考一下。
