vb6.0读取xml的问题

时间:2013.07.13 发布人:**_Wcy

vb6.0读取xml的问题

已解决问题

谷歌**_Wcy用户在2013.07.13提交了关于“刘昊然考编vb6.0读取xml的问题”的提问,欢迎大家涌跃发表自己的观点。目前共有1个回答,最后更新于2024-08-16T17:33:06。<htmllang="zh-CN">
<head><Title></title></head>
<bodyclass="rank">
<divclass="wp">
<divclass="hd"monkey="hd">
<p>ILoveIt!</p>
</div>
</div>
</body>
</html>
上面是一小段网页代码,我想提取“ILoveIt!“这部分,该怎么写代码?希望大家能够帮助她。

详细问题描述及疑问:<htmllang="zh-CN">
<head><Title></title></head>
<bodyclass="rank">
<divclass="wp">
<divclass="hd"monkey="hd">
<p>ILoveIt!</p>
</div>
</div>
</body>
</html>
上面是一小段网页代码,我想提取“ILoveIt!“这部分,该怎么写代码?期待您的答案,滴水之恩,来日我当涌泉相报 !

希望以下的回答,能够帮助你。

第1个回答

用户名:lov受套e15484447  

'没有网址我只能给你写个函数
OptionExplicit
PrivateSubCommand1_Cl来自ick()
Dims1AsString,s2AsString,sAs问答String,tempAsString
s1="<p>":s2="</p>"
s="<ah应聚杂制紧够每价来ref=""/"">百掉甲差确孔友周度贴吧</a>><ahref=""/兵品随冷攻议战f?kw<p>ILoveIt!</p>><cb>郑允浩</cb>吧</a>><span>浏览贴子</span>"
temp=fc(s1,s2,各眼配s)
MsgBoxtemp
E贵路ndSub
Functionfc(a,b,s)AsString
fc=Mid(s,InStr(s,a)+Len(a),InStr(InStr(s,a),s,b)-InStr(s,a)-Len(a))
EndFunction