Visual Basic 6:运行时错误424(如果函数)

时间:2012-12-27 19:28:21

标签: vb6 syntax-error runtime-error

抱歉,我是VB6的初学者。我有这个:

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

请问,是否有人可以回答我的问题?

1 个答案:

答案 0 :(得分:5)

MessageBox.ShowMessageBoxButtons是.NET的东西。 (顺便说一句,为什么不使用.NET?:))这是VB6中的样子:

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