2012-12-27 35 views
1

對不起,我是VB6的初學者。我有這樣的:Visual Basic 6:運行時錯誤424(If Function)

Private Sub Command5_Click() 
    If MessageBox.Show("Sei sicuro di voler uscire?", "Sicuro?", MessageBoxButtons.YesNo) = DialogResult.Yes Then 
     Unload Me 
    End If 
End Sub 

但它返回一個錯誤:

Run-time error '424': 
Object required 

請,任何人都可以回答我的問題?

回答

5

MessageBox.ShowMessageBoxButtons是.NET的東西。 (爲什麼不使用.NET,順便說一句,:))下面是它在VB6中的樣子:

If MsgBox("Sei sicuro di voler uscire?", vbYesNo, "Sicuro?") = vbYes Then 
+0

非常感謝你!!!!! – user1932919

+1

+1。同樣使用Option Explicit On,編譯器會在*編譯時給你一個更好的錯誤信息,而不是運行時。 **總是**使用Option Explicit On! – MarkJ