秋梦无痕

一场秋雨无梦痕,春夜清风冻煞人。冬来冷水寒似铁,夏至京北蟑满城。

Avatar

WebBrowser控件

如何得知webbrowser可以GoBack了?

from:陈锐's Blog

在Webbrowser的CommandStateChange事件中判断:

Private Sub Command1_Click()
WebBrowser1.Navigate "NextPage.htm"
End Sub

Private Sub Command2_Click()
WebBrowser1.GoBack
End Sub

Private Sub WebBrowser1_CommandStateChange(ByVal Command As Long, ByVal Enable As Boolean)
If (Command = CSC_NAVIGATEBACK) Then
Command2.Enabled = Enable
End If
End Sub

上面的代码可以根据webbrowser1是否可以GoBack自动控制command2的enabled与否。

在该事件中还可以判断webbrowser是否可以Foward以及是否需要更新网页按钮。相对应的常量分别是CSC_NAVIGATEFORWARD与CSC_UPDATECOMMANDS

评论已关闭