Foxtable(狐表)用户栏目专家坐堂 → 字典值类型是否能为object?


  共有1635人关注过本帖树形打印复制链接

主题:字典值类型是否能为object?

帅哥哟,离线,有人找我吗?
luodang2050
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:585 积分:5674 威望:0 精华:0 注册:2014/5/21 10:30:00
字典值类型是否能为object?  发帖心情 Post By:2016/8/21 19:23:00 [只看该作者]

如题,定义一个字典,其值有可能存放date、string、boolean、table等,故需定义为object,不知行得通不?

如果可行,如何快速判断其变量类型?

另字典值是否可定义为另一字典或数组?


 回到顶部
帅哥哟,离线,有人找我吗?
cbt
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:569 积分:4210 威望:0 精华:0 注册:2015/5/13 8:32:00
  发帖心情 Post By:2016/8/21 20:10:00 [只看该作者]

 '直接试试

Dim zd As new Dictionary(of object,object )
Dim a As new Dictionary(of object,object )
a.add("1","11")
zd.Add("a",a)
zd.add(1,1)
zd.add(Date.Today ,1)
output.show(zd("a")("1"))

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/22 8:43:00 [只看该作者]

Dim zd As new Dictionary(of object,object )
Dim a As new Dictionary(of object,object )
a.add("1","11")
zd.Add("a",a)
zd.add(1,1)
zd.add(Date.Today ,1)

For Each key As object In zd.Keys
    If Typeof key  Is String Then Output.Show("字符串")
    If Typeof key  Is Integer Then Output.Show("数字")
    If Typeof zd(key) Is Dictionary(of object,object ) Then Output.Show("字典")
    Output.Show(key.Gettype().name & " - " & zd(key).Gettype().name)
Next

 回到顶部