# ArrayString 字符型数组
CreateObject("Stock.ArrayString")
ArrayString对象支持动态的字符型数组,必要时可以动态压缩并扩展。数组索引从0开始。此数组主要用来扩展VBS语法上对字符串数组支持的不足.
属性
属性 | 说明 |
---|---|
Count | 数组大小,只读。 |
方法
方法 | 说明 |
---|---|
AddBack | 在数组末尾添加一个数据 |
InsertAt | 在指定数组位置插入一个数据 |
RemoveAt | 删除指定位置的数据 |
RemoveAll | 清空数组内所有数据 |
GetAt | 取数组指定位置的数据,注意使用该函数方法调用的字符串返回值使用完毕后需要释放内存,否则频繁使用将导致内存泄漏 |
SetAt | 设置数组指定位置的数据 |
SetSize | 初始或者重置数组大小 |
Sort | 排序数组数据,参数含义 0正序 1反序. 例如 Sort(0)表示对数据进行正向排序 |
示例
'创建一个Array数组对象并排序
Dim d '创建一个变量
'创建Array外部对象,将对象实例置变量d中
Set d = CreateObject("Stock.ArrayString")
'创建完Array对象后往其内部插入两个数据
d.AddBack("张三")
d.AddBack("李四")
d.AddBack("王五")
'按正序排列数组数据
d.Sort(0)
'依次显示数组对象数据
For i = 0 To 2
MsgBox d.GetAt(i)
Next
set d = nothing
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
← Array 数值型数组 Form 用户窗体 →