1,502
社区成员




Private Sub Command1_Click()
WebB1.Navigate "https://abcd.net/def.jsp" '打开网页
While WebB1.Busy '等待加载,
text_tishi="正在加载……"
DoEvents
Sleep (2000) '这里好象没什么反应
Wend
'下面就出问题了,总提示
'实时错误:91 对象变量或with块变量未设置
'后来发现,其实就是网页没有完全加载下来
WebB1.Document.getelementbyid("PSWD").Value = "111111"
WebB1.Document.getelementbyid("form1_ok").Click
End Sub