请帮忙看下这段语句有什么问题？

guihyy

目标：想在数据输入窗体添加一个功能，当删除输入的数据时，系统会自动提醒是否删除
请教：我在“数据输入”窗体的代码中，“删除记录”按钮的代码结束后开始添加代码：

  '删除记录按钮
Private Sub Command43_Click()
On Error GoTo Err_Command43_Click

    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Command43_Click:
    Exit Sub
Err_Command43_Click:
    MsgBox Err.Description
    Resume Exit_Command43_Click
   
End Sub


  '删除提醒代码
Private Sub Form_BeforeDelConfirm(Cancel As Integer, Response As Integer)
  Response = acDataErrContinue
  '显示对话框信息
  If MsgBox=("删除这些记录?", vbOKCancel)=vbOKCancel Then Cancel=True
  End If
End Sub

其中，Command43为删除按钮的名称，但是在第二段关于删除提醒的代码有了问题，系统提示 If MsgBox=("删除这些记录?", vbOKCancel)=vbOKCancel Then Cancel=True 这句话是错误的，光标停留在  删除这些记录?",后的逗号上，说缺少：）


本人新手，一直解决不了，请知情者告知，衷心感谢

tz-chf

=vbOKCancel

guihyy

？？？可以说详细些吗？

kevindeng

应该是 If MsgBox=("删除这些记录?", vbOKCancel)=vbCancel Then Cancel=True
那个等于号后面的应该是vbCancel或者vbOK

guihyy

谢谢两位