Question

VB WebBrowser，前进和后退，没有页面时候前进和后退灰色

VB WebBrowser，前进和后退，没有页面时候前进和后退灰色
只有打开页面··打开一个页面时候···后退 由灰色变成 可以点击按钮··
。。。。。。。。。。。。。。。。

Answer 1

'比如按钮1是后退,按钮2是前进,先把他们的Enabled属性设为False,加入以下事件和代码即可
Private Sub WebBrowser1_CommandStateChange(ByVal Command As Long, ByVal Enable As Boolean)
If (Command = CSC_NAVIGATEBACK) Then
Command1.Enabled = Enable
End If
If (Command = CSC_NAVIGATEFORWARD) Then
Command2.Enabled = Enable
End If
End Sub

Answer 2

这两个按钮实际上是由两个以访问过的地址列表构成。
这样表述，希望你能清楚的知道：每次访问新的网页，都需要维护这两个列表。

追问

可以写下代码么？
谢谢··

追答

建两个不可视的ListBox控件，将每次浏览到的网页地址，记录到控件中，当按前进或后退时，从这两个列表控件中取值，赋值给WebBrowser。