2012-12-27 34 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