回 帖 发 新 帖 刷新版面

主题:以下代码使用什么事件?

Dim A_M1 As String
        A_M1 = MsgBox("你真的要退出本程序吗?", MsgBoxStyle.YesNoCancel, "提示")
        If A_M1 = vbOK Then
            End
        Else
            Exit Sub
        End If

我用的是VB2005

回复列表 (共1个回复)

沙发

Dim A_M1 As MsgBoxResult
A_M1 = MsgBox("你真的要退出本程序吗?", MsgBoxStyle.YesNoCancel, "提示")
If A_M1 = vbOK Then
    Exit Sub
Else
    e.Cancel = True
End If

FormClosing事件

我来回复

您尚未登录,请登录后再回复。点此登录或注册