看流星社区 › 其它编程技术 › vb webbrowser 模仿鼠标点击

songzihui 发表于 2014-7-22 08:21:55

vb webbrowser 模仿鼠标点击

就是用几条语句，写出链接的文字，就能模仿鼠标点击该链接，求代码
注：不用mouse_event

Qrimkiss 发表于 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

查看完整版本: vb webbrowser 模仿鼠标点击