Question

我在访问中有一个连续的表单，有多个文本框可以搜索表并返回符合所有条件的记录。它有两个按钮，一个用于过滤（＆＃34;搜索＆＃34;），另一个用于清除所有文本框（＆＃34;重置＆＃34;）。几个月来它一直运作良好。

今天，当我点击esc清除文本框时，此代码才开始显示：

＆＃34;运行时错误＆＃39; 2001＆＃39;：您取消了之前的操作。＆＃34;

这是调试器突出显示的行：

Me.FilterOn = False

我不确定原因：/这是我的所有重置命令按钮的代码：

Private Sub cmdReset_Click()
  Dim ctl As Control
  For Each ctl In Me.Section(acHeader).Controls
     Select Case ctl.ControlType
     Case acTextbox, acComboBox
         ctl.Value = Null
     Case acCheckBox
         ctl.Value = False
     End Select
  Next
  Me.FilterOn = False
End Sub

但是，再次，所有工作，然后开始吓坏了。我当时正在编辑，代码生成器是打开，但我在表单设计视图中更改了标签的名称，而没有弄乱代码。

我担心我不小心在我的代码生成器中输入而不是在标签中输入，所以现在代码并没有认识到某些东西，但我一直在梳理和梳理，我找不到任何与众不同的东西/没有＆＃39; t匹配某事。

我不知道我错过了什么或做了什么，但任何帮助都非常感谢！

萨拉

运行时错误＆＃39; 2001＆＃39;在Access SQL中 - 突然发生

0 个答案: