Foxtable(狐表)用户栏目专家坐堂 → foxtable.XObject的问题


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

主题:foxtable.XObject的问题

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


加好友 发短信
等级:幼狐 帖子:122 积分:1290 威望:0 精华:0 注册:2020/5/16 10:30:00
foxtable.XObject的问题  发帖心情 Post By:2022/5/13 10:34:00 [只看该作者]

<xml><ToUserName><![CDATA[gh_a9d0fc56fe1c]]></ToUserName>
<FromUserName><![CDATA[ofRouwuV0m_ukAgGtE_YgUuvplrk]]></FromUserName>
<CreateTime>1652357098</CreateTime>
<MsgType><![CDATA[event]]></MsgType>
<Event><![CDATA[LOCATION]]></Event>
<Latitude>30.116600</Latitude>
<Longitude>120.958298</Longitude>
<Precision>15.000000</Precision>
</xml>

请问一下老师,要怎么样才可以循环上字符串里的每一项 ,我如何判断出上面这个没有aabbcc的这个信息,谢谢

Dim xo As Foxtable.XObject = Foxtable.XObject.Parse(s)

Output.Show(xo("ToUserName"))  

Output.Show(xo("aabbcc"))

[此贴子已经被作者于2022/5/13 10:34:39编辑过]

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/13 11:05:00 [只看该作者]

遍历

For Each it As Object In xo
        Output.Show(it.key & "-" & it.value)
Next

判断

Output.Show(xo("aabbcc") is nothing)

 回到顶部