webbrowser无法载入第二个网页

[laskdjflk]

我在程序启动时用webbrowser载入了一个网页，如下：
Private Sub Form_Load()
webbrowser1.navigate Url1
end sub
载入成功。
在之后的某个事件中，在模块中，我需要载入第二个网页Url2
于是 form1.webbrowser1.navigate Url2

但是执行完此句之后控件页面无变化，也就是停留在Url1 里面，费解！

请问这是怎么回事？怎么解决？

[-晴天]

确认URL改变了么?

[laskdjflk]

[Quote=引用 1 楼 qianjin036a 的回复:]

确认URL改变了么?
[/Quote]

确认改变了！

[laskdjflk]

问题的原因我自己找到了，是这样的：
form1.webbrowser1.navigate Url2 此句所在模块是由WebBrowser1_DocumentComplete 里的一个函数引发，
貌似这。。。怎么描述呢？
不能在同一个过程，对，这个模块其实是WebBrowser1_DocumentComplete的一个子函数，也就在同一个过程中，故navigate方法无效。

我这样理解算是正确的吗？请高手指教。

后来我在WebBrowser1_DocumentComplete里添加一个timer控件来进入form1.webbrowser1.navigate Url2此句所在的模块，问题得以解决。
貌似这种解决方案有点另类，不知有没有更好的方案可以解决这个问题。

[专注VB编程开发20年]

试了可以的不知你咋搞的


Private Sub Command1_Click()
Web1.Navigate "www.baidu.com"
End Sub

Private Sub Web1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
'MsgBox Web1.LocationURL
If Web1.LocationURL Like "*baidu*" Then

'DoEvents
Web1.Navigate "www.163.com"
End If
End Sub