vbscript基础篇 – vbs数组Array的定义与使用方法

2023-12-01 0 365

vbs数组定义和用法

Array 可返回一个包含数组的变量。
注释:数组中的第一个元素是零。

语法

Array(arglist)
参数描述
arglist必需的。数组中元素值的列表(由逗号分割)。

实例

例子 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

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

\’静态数组
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

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

收藏 (0) 打赏

感谢您的支持,我会继续努力的!

打开微信/支付宝扫一扫,即可进行扫码打赏哦,分享从这里开始,精彩与您同在
点赞 (0)

悠久资源 VBS vbscript基础篇 – vbs数组Array的定义与使用方法 https://www.u-9.cn/jiaoben/vbscript/9123.html

常见问题

相关文章

发表评论
暂无评论
官方客服团队

为您解决烦忧 - 24小时在线 专业服务