VBS基础篇 - 数组
来源:互联网 发布:侠客风云传前传优化差 编辑:程序博客网 时间:2024/05/17 02:31
数组变量:有时需要向一个单一的变量赋于多个值,那么您可以创建一个可包含一系列值的变量,这种变量被称为数组。
'静态数组dim a(2)a(0)="George"a(1)="john"a(2)="Ethon"for i =0 to 2 msgbox a(i)nextfor 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) '循环遍历数组,并输出数组值 NextNext
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基础篇 - 数组
- VBS基础篇 - 动态数组
- VBS基础篇 - 变量(6) - 数组变量
- VBS基础篇 - 数据类型
- VBS基础篇 - 数据类型
- VBS基础篇 - 变量
- VBS基础篇 - 常量
- VBS基础篇 - 循环
- VBS基础篇 - class
- VBS基础篇 - 队列
- VBS基础篇 - 堆栈
- VBS基础篇 - VBScript过程
- VBS基础篇 - 杂项 - 字符集
- VBS基础篇 - 杂项 - Sendkeys
- VBS基础篇 - 运算符
- VBS基础篇 - 条件语句
- VBS基础篇 - Dictionary对象
- VBS基础篇 - FileSystemObject对象
- Java 基础学习1 -- 基础语法
- Activity生命周期与onNewIntent
- SVN服务器搭建和使用(一)
- VBS基础篇 - 变量
- 使用Linux命令使用U盘制作启动盘
- VBS基础篇 - 数组
- VBS基础篇 - 常量
- Vue路由的使用
- SQLite operations
- VBS基础篇 - 运算符
- Android6.0权限适配之WRITE_EXTERNAL_STORAGE(SD卡写入)
- 第4周项目4 猴子选大王
- VBS基础篇 - 条件语句
- Head First设计模式——策略设计模式