在网页源代码中提取所有 <CC>标签的内容
<cc><p id="post_content_16976106210" class="d_post_content">太热了吧- -。。</p></cc>
并加入list1.box
VB如何从网页源代码中 提取<cc>整段标签
答案:2 悬赏:30 手机版
解决时间 2021-02-10 00:12
- 提问者网友：美人性情
- 2021-02-09 06:45
最佳答案
- 五星知识达人网友：舍身薄凉客
- 2021-02-09 06:55
Private Sub Command1_Click()
Dim i As Integer, j As Integer
ss = ""
'ss中放入你的网页源码
Do While InStr(ss, "<cc>") <> 0
i = InStr(ss, "<cc>")
j = InStr(ss, "</cc>")
List1.AddItem Mid(ss, i + 4, j - i - 4)
ss = Mid(ss, j + 5)
Loop
End Sub
Dim i As Integer, j As Integer
ss = ""
'ss中放入你的网页源码
Do While InStr(ss, "<cc>") <> 0
i = InStr(ss, "<cc>")
j = InStr(ss, "</cc>")
List1.AddItem Mid(ss, i + 4, j - i - 4)
ss = Mid(ss, j + 5)
Loop
End Sub
全部回答
- 1楼网友：三千妖杀
- 2021-02-09 07:35
你好！
字符串处理啊。
我的回答你还满意吗~~
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯