Dim web As System.Windows.Forms.WebBrowser = e.form.controls("webbrowser1").Basecontrol
Do Until web.ReadyState = 4
Application.DoEvents
Loop
Dim elems As object = web.Document.GetElementsByTagName("div")
For Each elem As object In elems
If elem.getattribute("classname") = "login_body___QdPPt" Then
msgbox(elem.innerText)
End If
Next
这样好像可以获取到三个按钮标题,不知道怎么模拟点击