# MapValue 映射键值
CreateObject("Stock.MapValue")
MapValue对象支持用户按照映射键值进行数据存储及快速查找的方法, 用户可以对频繁使用的一些变量存放于该方法中, 使用时进行快速调取.
属性
| 属性 | 说明 |
|---|---|
| Count | 数组大小，只读. |
方法
| 方法 | 说明 |
|---|---|
| SetKey | 设置映射键值,若键值存在则新设置的键值覆盖原先的键值数据 |
| GetValue | 读取映射键值。返回值：若键值存在返回1, 否则返回0。 |
| RemoveKey | 删除指定键值的数据, 例如 d.RemoveKey("2") 表示删除键为"2"的数据 |
| RemoveAll | 清空映射对象的全部数据 |
| GetAt | 读取指定基于0索引的键值数据。 |
示例
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)
'取键值为2的数据并打印下来
Dim DataVal
Result = d.GetValue("2",DataVal)
If result = 1 Then
Application.MsgOut DataVal
End IF
'释放对象
set d = nothing
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20