Private Sub WebBrowser_CommandStateChange(ByVal Command As Long, ByVal Enable As Boolean) > Select Case Command > Case CSC_NAVIGATEBACK > Back.Enabled = Enable && Back is a button class > Case CSC_NAVIGATEFORWARD > Forward.Enabled = Enable && Forward is a button class > End Select >End SubNo line continuations in VB.