如何在网页上等待,同时查找id



在我的网页中,当HTMLdoc.getElementById("gen__1007"(不是时,我想等待

我该怎么做?

Do Until IE.Businy=False:DoEvents:LoopDo Until IE.ReadyState=4:DoEvents:Loop它们不起作用。。。

Sub POPUP_CONTROL()
Dim MSG_DIV = ""
WEB_LOAD2.Text = ""
TIME = 0
Do
Application.DoEvents()
On Error Resume Next
MSG_DIV = WebBrowser1.Document.GetElementById("pb-popup-message").InnerText 
On Error GoTo 0  
System.Windows.Forms.Application.DoEvents()
WEB_LOAD2.Text = MSG_DIV
If TIME >= 20 Then GoTo CIK 
Loop While MSG_DIV = ""
WEB_DURUM2.Text = "Loaded! " 
Exit Sub
CIK: 
MsgBox("NO INTERNET CONNECTION OR VERY SLOW " & vbLf & "TRY AGAIN LATER!" & vbLf, vbInformation, "ACR")
End Sub

我写的代码哪里会出错?

最新更新