以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 嵌套字典操作咨询 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=149381) |
-- 作者:guosheng -- 发布时间:2020/4/30 9:28:00 -- 嵌套字典操作咨询 当字典还有某个 key时,将字典中内部的字典子元素进行 运算操作 Dim cnn As New Dictionary(Of String, Dictionary(Of String,Decimal)) Dim cdd As New Dictionary(Of String,Decimal) cdd.Add("未付金额",1) If cnn.ContainsKey(1001) = False Then \'是否存在键 cnn.Add(1001,cdd) else 未付金额 对应的value 变成 1+200 1001对应的字典是否有key “未付金额”,该怎么判断啊 End If [此贴子已经被作者于2020/4/30 9:32:14编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/4/30 10:20:00 -- If cnn.ContainsKey(1001) = False Then \'是否存在键 cnn.Add(1001,cdd) else dim d as Dictionary(Of String,Decimal) = cnn(1001) if d.ContainsKey("未付金额") then d("未付金额") += 200 else d.Add("未付金额",1) end if End If |