vbscript基础篇 – vbs数组Array的定义与使用方法（vb variant 数组）速看

随心笔谈2年前发布编辑

162 0

🌐 经济型：买域名、轻量云服务器、用途：游戏网站等《腾讯云》特点：特价机便宜适合初学者用点我优惠购买

🚀 拓展型：买域名、轻量云服务器、用途：游戏网站等《阿里云》特点：中档服务器便宜域名备案事多点我优惠购买

🛡️ 稳定型：买域名、轻量云服务器、用途：游戏网站等《西部数码》特点：比上两家略贵但是稳定性超好事也少点我优惠购买

vbs数组定义和用法

Array 可返回一个包含数组的变量。

注释：数组中的第一个元素是零。

语法

Array(arglist)

参数描述

arglist 必需的。数组中元素值的列表（由逗号分割）。

实例

例子 1

dim a
a=Array(5,10,15,20)
document.write(a(3))

输出：

例子 2

dim a
a=Array(5,10,15,20)
document.write(a(0))

输出：

数组变量：有时需要向一个单一的变量赋于多个值，那么您可以创建一个可包含一系列值的变量，这种变量被称为数组。

‘静态数组
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函数,返回指定数组维数的最大可用下标
msgbox a(i)
next

‘动态数组
dim a()
for i=0 to 2
　　redim preserve a(i) ‘ReDim语句,用于过程级声明动态数组变量并分配或重新分配存储空间
　　a(i)=i+1
　　msgbox a(i)
next

动态二维数组

‘动态二维数组
Dim MyArray() ‘首先定义一个一维动态数组
ReDim MyArray(1,1) ‘重新定义该数组的大小
MyArray(0,0)=”A” ‘分别为数组赋值
MyArray(0,1)=”a”
MyArray(1,0)=”B”
MyArray(1,1)=”b”
ReDim Preserve MyArray(1,2) ‘重新定义该数组的大小
MyArray(0,2)=”A-a” ‘继续为数组赋值
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) ‘循环遍历数组，并输出数组值
Next
Next

一维动态数组

Dim MyArray() ‘首先定义一个一维动态数组
ReDim MyArray(3) ‘重新定义该数组的大小
MyArray(0)=”我” ‘分别为数组赋值
MyArray(1)=”要”
MyArray(2)=”学”
MyArray(3)=”习”
ReDim Preserve MyArray(5) ‘重新定义该数组的大小
MyArray(4)=”测” ‘继续为数组赋值
MyArray(5)=”试”
For i=0 To UBound(MyArray)
MsgBox MyArray(i) ‘循环遍历数组，并输出数组值
Next

这篇文章就介绍到这，需要的朋友可以参考一下。