老师,我代码如下:
Dim web As new System.Windows.Forms.WebBrowser
Dim web1 As New System.Windows.Forms.WebBrowser
web.Navigate("http://125.35.6.84:81/xk")
Do Until web.ReadyState = 4 AndAlso web.Document.GetElementById("gzlist").GetElementsByTagName("li").count > 0
Application.DoEvents
Loop
For Each dl As object In web.Document.GetElementById("gzlist").GetElementsByTagName("li")
Output.show(dl.GetElementsByTagName("i")(0).innerText)
next
怎么会报错啊?要怎么写?