比如代码
Dim web As System.Windows.Forms.WebBrowser = e.Form.controls("webbrowser1").basecontrol
Dim Inputs = web.Document.GetElementsByTagName("a")
For Each Input As object In Inputs
If Input.getAttribute("className") = "page-next" Then
Input.InvokeMember("click")
Exit For
End If
Next