尝试运行宏时出现2046错误

Question

DoCmd.SetWarnings (WarningsOff)

DoCmd.GoToControl ("txtVisitorLastName")
SendKeys "-"
Me.Dirty = False
Pause 250

DoCmd.RunMacro ("DeleteCurrentRecord") <--- Error here

Pause 250

DoCmd.Close

DoCmd.OpenForm ("LanguageSelection")

DoCmd.SetWarnings (WarningsOn)

这是Access 2016项目中的VBA。不知道我能做些什么。任何帮助都会很棒。

有关错误的其他信息

它说参数223