vb数据库打印

‘壹’ vb怎样将从数据库中查询出的结果用报表打印出来

为了你有个好的编程习惯，最好在代码前面都加上
Option Explicit
先定义后使用

问题应该在DataReprot1 这个部分，如果我没记错的话
datareport 应该是vb6中自带的crystal report 工具
这个工具的报表生成是需要自行设计的，可能是你的设计有误。

‘贰’ vb如何打印Access数据库报表

首先在ACCESS中使用向导建立报表,命名为"表报一"
然后在vb中调用打印

Dim objACC As Object
Set objACC = CreateObject("ACCESS.Application")
objACC.OpenCurrentDatabase "c:\db.mdb"
objACC.DoCmd.OpenReport "表报一"
objACC.Quit
Set objACC = Nothing