使用Data Report打印查询结果

时间:2022-07-31 23:56:19

    如果我们想把查询结果打印出来,那么我们经常用到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<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

        Set rsdr = Conn.Execute(sqlall)

        Set drqueryall.DataSource = rsdr

        drqueryall.Show