# 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

应用于

MapValue 对象