WebBrowser.Navigate刷新每隔X分鐘

Question

我使用VB6中使用此代碼推出了web瀏覽器窗口提出申請，並刷新每3分鐘

Private Sub Form_Load() 
WebBrowser1.Navigate ("http://www.google.com") 
End Sub 

    Private Sub T_Timer() 

'Increment minute count 
    FireCount = FireCount + 1 

    If FireCount = 3 Then 
'Reset to 0 for next time 
FireCount = 0 
WebBrowser1.Refresh ("http://www.google.com") 
'Refresh web browser 
    End If 
End Sub 

，但它給我一個警告，指出該頁面編譯錯誤：編號或參數錯誤或屬性賦值無效。任何人都可以幫我找出我的錯誤嗎？

Answer 1

假設WebBrowser1是WebBrowser控件，你讓刷新（）方法的一個打錯的電話。 WebBrowser.Refresh（）不帶參數：

'Refresh web browser 
WebBrowser1.Refresh 

從MSDN：

參數或無效的屬性賦值（錯誤450）

的參數的數量錯誤的數過程必須與過程定義中的參數數目相匹配。

您還可以注意到，編譯失敗時，VB6 IDE將焦點設置爲違規行。考慮到錯誤描述，這些信息通常足以查明簡單的語法錯誤。