看流星社区

 找回密码
 注册账号
查看: 2329|回复: 1

[VB] vb webbrowser 模仿鼠标点击

[复制链接]

该用户从未签到

发表于 2014-7-22 08:21:55 | 显示全部楼层 |阅读模式
就是用几条语句,写出链接的文字,就能模仿鼠标点击该链接,求代码
注:不用mouse_event

该用户从未签到

发表于 2014-7-22 08:22:04 | 显示全部楼层
循环Document中的对象
Dim S As Boolean
Dim Word as String '文字
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    For Each a In WebBrowser1.Document.getelementsbytagname(Word)
           a.Click
    Next
End Sub
点击按钮快速添加回复内容: 支持 高兴 激动 给力 加油 苦寻 生气 回帖 路过 感恩
您需要登录后才可以回帖 登录 | 注册账号

本版积分规则

小黑屋|手机版|Archiver|看流星社区 |网站地图

GMT+8, 2024-3-29 06:20

Powered by Kanliuxing X3.4

© 2010-2019 kanliuxing.com

快速回复 返回顶部 返回列表