千丝海阁

添加webbrowser控件组的时候index As Integer一定要写在括号的最前位置，如下：

Private Sub WebBrowser1_ProgressChange(index As Integer, ByVal Progress As Long, ByVal ProgressMax As Long)