如何将VBA中的SQL查询结果显示出来?在ACCESS中

ACCESS中我想达到以下目的,如何实现?
docmd.openquery "select * from 学生成绩表 where 分数>90"
系统提示错误,该如何显示查询结果?

1.点击:创建--宏。打开宏编辑器。

2.在操作这一栏,从下拉列表中,选择runcode操作。

3.弹出了操作参数对话框,点击函数名称右边的这个省略号。

4.打开了表达式生成器,在下方选择函数进行编辑,或者自己输入公式,然后点击确定按钮。

5.点击菜单栏上面的保存按钮,在弹出的另存为对话框中,输入宏的名称,然后点击确定。

6.在宏对象中,找到刚才建立的这个宏【运行vba】,然后右键单击它,选择运行,vba函数就运行了。

温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-01-14
前提:DOCMD 对象的OPENQUERY方法仅可用于 Microsoft Access 数据库环境 (.mdb)。
语法:expression.OpenQuery(QueryName, View, DataMode)
OPENQUERY方法用于打开一个预置的查询,而不能打开一个SQL查询语句,故此你上面的用法被系统提示错误。
正确的用法是先将SQL语句:“select * from 学生成绩表 where 分数>90”预存为一个ACCESS查询,例如将其命名为:高分成绩查询表
然后在某个命令按钮添加下列过程。例如:
Private Sub Command1_Click:
Docmd.Openquery "高分成绩查询表"
End Sub
注:DOCMD 对象的OPENQUERY方法 的用法可以是多种多样的,上面仅列出其中一个例子。本回答被提问者和网友采纳
相似回答