站长网_站长创业_站长主页_站长之家_易采站长站

会员投稿 投稿指南 站长资讯通告: vbscript基础篇 - vbs数组Array的定义与使用方法
搜索:
您的位置: 主页 > 教程 > 脚本教程 > VBS > » 正文

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

来源: 易采站长站

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

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

Tags:
最新图文资讯
1 2 3 4 5 6
相关文章列表:
易采站长站 - 联系我们 - 广告服务 - 友情链接 - 网站地图 - 版权声明 - 人才招聘 - 帮助 -