用代码显示查询

YYing　发表于：2010-09-18 11:50:16 　

复制

例如一个查询如下：

SELECT 表1.名称, 表1.数量, 表1.价格
FROM 表1;
想执行代码直接显示出它，而不用另外创建一个查询，谢谢了。

Top

淡然发表于：2010-09-18 12:28:12

点击下拉箭头选择SQL就可以了

Top

煮江品茶发表于：2010-09-18 12:41:09

不知道希望以什么为载体？

一般可将其给窗体、列表框做数据源将其显示出来。

Top

YYing 发表于：2010-09-18 14:44:10

没有载体，就是希望不另外单独做一个查询，直接运行显示这个查询，相当于打开显示数据库中一个查询1 DoCmd.OpenQuery "查询1"

但不想做很多查询在库里，在窗体某个按钮后即显示一个查询结果。

Top

aslxt 发表于：2010-09-18 15:02:54

参考：

在特定的事件中，创建一个查询，然后运行这个查询

Top

aslxt 发表于：2010-09-18 15:19:04

在特定的事件中，修改一个查询，然后运行这个查询，这样永远只有一个查询【查询1】

Private Sub Command0_Click()
Dim qdf As DAO.QueryDef
Dim strsql
strsql = "select 表1.名称, 表1.数量, 表1.价格 from 表1"'这里可以修改成你想要的任意查询sql语句
Set qdf = CurrentDb.QueryDefs("查询1")
qdf.SQL = strsql
DoCmd.OpenQuery "查询1"
End Sub

Top

YYing 发表于：2010-09-18 15:57:11

感觉意思是那么回事，但实际试下来好像不行,提示未定义什么的。

Top

淡然发表于：2010-09-18 15:57:28

你可以在窗体属性的“记录源”处编写：