如何打印Access数据库多个表的字段内容?

在启动窗口新建两个控件：数据库连接、记录集

然后

双击启动窗口

加入以下代码：

.子程序

__启动窗口_创建完毕

.局部变量

临时文本,

文本型

.局部变量

临时变量,

整数型

数据库连接1.连接access

(“数据库文件的完整路径名”,

“可以为空”)

记录集1.置连接

(数据库连接1)

记录集1.打开

(“select

user_ip

from

user_online”,

#sql语句,

)

记录集1.到首记录

()

.计次循环首

(记录集1.记录数量,

临时变量)

记录集1.读文本

(“user_ip”,

临时文本)

调试输出

(临时文本)

'

每次输出的临时文本就是你要的每个值

记录集1.到下一条

()

.计次循环尾

()

报表是数据库中的数据通过打印机输出的特有形式。精美且设计合理的报表能使数据清晰地呈现在纸质介质上。在实际应用中，可以将用户录入的数据或者数据库中的统计结果，以报表的形式表现出来并进行打印，这样不仅使用户可以宏观地查看数据，还可以针对当前的情况制定下一步的计划方案。

为了你有个好的编程习惯，最好在代码前面都加上

Option Explicit

先定义后使用

问题应该在DataReprot1 这个部分，如果我没记错的话

datareport 应该是vb6中自带的crystal report 工具

这个工具的报表生成是需要自行设计的，可能是你的设计有误。

---