主题：[求助]阿里妈妈 我要哭死了

Dim web = Forms("窗口1").Controls("WebBrowser1").BaseControl
For Each tr As object In web.Document.GetElementsByTagName("包含着A的元素啊")
    If tr.GetAttribute("ClassName") = "可以定位到A的Class啊"
        Dim a = tr.GetElementsByTagName("a")(要不你就用这个看哪个数字是啊)
        output.show(a.GetAttribute("href"))
    End If
Next