如果我们想把查询结果打印出来，那么我们经常用到data report，在这里我说的是直接用记录集rs给data report设数据源。为了快速将查询结果中的字段加入到data report，我们先来建一个dataenvironment1，设置好dataenvironment1中的connection1的连接，然后在dataenvironment1中的connection1中右键添加子命令command1，在command1上右键，属性，选择sql语句，将我们的查询语句写进去，确定，完毕后就可以看到我们希望显示的字段了。如果需要，可以添加多个子命令。然后新建一个datareport1，点住dataenvironment1中的command1不放，直接拖到datareport1中的细节区，然后再根据需要调整各字段位置就行了。注意要将细节区中的各个textbox的datamember置空。然后在程序里面写代码就可以了。如dim rsdr as new adodb.recordset
set rsdr = conn.execute(sqlall)
set drqueryall.datasource = rsdr
drqueryall.show
