方法1:
Private Sub Command1_Click()
WebBrowser1.Navigate "www.baidu.com"
While WebBrowser1.ReadyState <> 4
oEvents
Wend
msgbox "加载完毕"
End Sub
方法二:
Private Sub Command1_Click()
WebBrowser1.Navigate "www.baidu.com"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
If pDisp Is WebBrowser1.Object Then msgbox "加载完毕"
End Sub
添加调试
调试信息 Debug.Print "sdffdsfdas"
分享到:
相关推荐
vb6.0学习vb6.0学习
VB学习一点通VB学习一点通
vb学习浅谈(经验)vb学习浅谈(经验)
vb.net 学习教程vb.net 学习教程vb.net 学习教程vb.net 学习教程vb.net 学习教程vb.net 学习教程vb.net 学习教程
vb学习系统,一个可安装vb学习软件,方便vb学习爱好者!
vb学习一点通v2.0 vb学习一点通v2.0
VB6学习教程 VB6学习教程
vb学习资料vb学习资料vb学习资料vb学习资料vb学习资料
VB类模块,学习VB的朋友可以参考下,很不错的
vb学习
VB学习一点通V10,是学习VB的好帮手
一个VB学习软件,内含破解补丁,安装好后,将破解补丁直接覆盖就能使用。 内容包含如下: 1、基础知识:包含Visual Basic的基本知识。 2、API函数:包含1500多个Windows API函数的详细说明和详细实例。 3、编程实例...
vb 编写的工资管理软件,适合vb 学习者使用。
适合初学者学习的VB学习网站,对VB感兴趣的都可以看看,希望对你有帮助。
学习VB基本编程,进行练习学习VB基本编程,进行练习学习VB基本编程,进行练习学习VB基本编程,进行练习学习VB基本编程,进行练习学习VB基本编程,进行练习学习VB基本编程,进行练习学习VB基本编程,进行练习学习VB...
vb.net 学习资料
VB学习指导
Vb学习的课件,很基础的 Vb学习的课件,很基础的 Vb学习的课件,很基础的