DDR爱好者之家

vbscript基础篇 - vbs数组Array的定义与使用方法
站长资源 2024/12/26 佚名
63 1538
DDR爱好者之家 Design By 杰米

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

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

DDR爱好者之家 Design By 杰米
广告合作：本站广告合作请联系QQ：858582 申请时备注：广告合作（否则不回）
免责声明：本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除！
DDR爱好者之家 Design By 杰米
ddrfans.com DDR爱好者之家
8,675无损音乐
1,324高清电影
213破解软件
70,141收录资讯

P70系列延期，华为新旗舰将在下月发布

3月20日消息，近期博主@数码闲聊站 透露，原定三月份发布的华为新旗舰P70系列延期发布，预计4月份上市。

而博主@定焦数码 爆料，华为的P70系列在定位上已经超过了Mate60，成为了重要的旗舰系列之一。它肩负着重返影像领域顶尖的使命。那么这次P70会带来哪些令人惊艳的创新呢？

根据目前爆料的消息来看，华为P70系列将推出三个版本，其中P70和P70 Pro采用了三角形的摄像头模组设计，而P70 Art则采用了与上一代P60 Art相似的不规则形状设计。这样的外观是否好看见仁见智，但辨识度绝对拉满。

更新日志

友情链接

杰晶网络 DDR爱好者之家 南强小屋 黑松山资源网 白云城资源网
DDR爱好者之家 Design By 杰米