# GetAt 方法
GetAt(Index, KeyVal,DataVal)
读取指定基于0索引的键值数据, 该方法主要用于遍历整个映射数组内的数据, 由于该映射对象使用的是二分法检索方式,因此使用SetKey方法设置的键不是依次存放的,而是使用键值进行从小到达排序的方式存储.
返回值:若成功返回1, 否则返回0。
参数
参数 | 说明 |
---|---|
Index | 输入参数, 基于0至Count-1范围内的索引 |
KeyVal | 输出参数, 返回键数据.注意:如果频繁调用该属性,请注意使用完毕后释放返回值。 |
DataVal | 输出参数, 返回键值数据。 |
示例
Sub Test()
Dim d '创建一个变量
'创建Mpp外部对象,将对象实例置变量d中
Set d = CreateObject("Stock.MapValue")
'创建完Map对象后往其内部插入3个数据
call d.SetKey("1",123.5)
call d.SetKey("3","你好")
call d.SetKey("2",1000)
'依次遍历键数据并打印下来
Dim KeyVal
Dim DataVal
For I = 0 to d.Count-1
Result = d.GetAt(i,KeyVal,DataVal)
If result = 1 Then
Application.MsgOut KeyVal&":"&DataVal
End IF
Set KeyVal = nothing
Next
set d = nothing
End Sub
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
应用于