自学access,遇到宏问题,望达人能指点一下

Tips:点击图片进入下一页

题目很简单,建立一个命令按钮,功能为打开某个已经做好的查询对象。

我就按部就班写了:docmd.openquery "商品查询"

但是我遇到的问题是,知道内容对话框出现之后,不输入数值,点取消的时候会出现      

运行时错误‘2001’
您取消了前次的操作。



但是我直接双击"商品查询"这个查询对象的时候,选取消不会跳运行错误啊

我没有编程基础,请大大能给点指导。

谢谢。


网友评论:
Private Sub Command3_Click()
DoCmd.OpenQuery "商品查询"
End Sub

这是我刚刚估摸出来的简单代码……

丢脸
这是我根据“命令按钮向导”,做出的,

然后到事件过程中的代码,

根本看不懂……

Private Sub Command3_Click()
On Error GoTo Err_Command3_Click

    Dim stDocName As String

    stDocName = ChrW(21830) & ChrW(21697) & ChrW(26597) & ChrW(-29726)
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Command3_Click:
    Exit Sub

Err_Command3_Click:
    MsgBox Err.Description
    Resume Exit_Command3_Click

End Sub

按VB的尿性 是因为取消时返回的值不合法 可以定义返回值或返回空值时反馈


谢谢回帖,能否指导一下再添加什么语句啊。

我把问题再详细一下。
运行宏的时候,是这样的:




点取消之后,是这样的:




我就懵了。到底怎么办?

谢谢指导。


把3楼这两行删了就行
    MsgBox Err.Description
    Resume Exit_Command3_Click//应该也可以不删

看楼主没任何基础..真想学可以找本书看看 实现起来大致差不多就行 知道报错需要又臭又长的前置基础知识教材会慢慢教



为啥要学这玩意啊

—— 来自 Sony H4233, Android 8.0.0上的 v2.1.0-play
为什么要学vb
楼主这些都是VB的窗体问题,需要了解相关基础知识再来上手,像顶楼这个问题是你只给了“确认”部分的代码,没有定义“取消”这个按钮对应的事件触发宏,
顺带一提,我干活中用到ACCESS的VBA都跟便秘一样,现成函数库少,挂上其他库调用几个EXCEL实例的VBA一天到晚出幺蛾子。推荐所有非界面问题都用SQL解决
这又什么用啊 我还以为早没人学了