Private Sub Command0_Click()
If MsgBox("你真的要退出吗?", vbYesNo + vbQuestion, "请确认…") = vbYes Then
DoCmd.Close acForm, Me.Name
End If
End Sub作者: nylgwsf9 时间: 2006-10-30 22:43
应该是少一个else语句
If MsgBox("你真的要退出吗?", vbYesNo + vbQuestion, "请确认…") = vbYes Then
Cancel=False