关于VB打印预缆的问题

Question

VB编写的数据控件带有预览功能
可以查看MSDN

Answer 1

现成的控件:
http://ygyuan.go.163.com/
http://ygyuan.3322.net/袁飞打印预览控件.

Answer 2

先用DataEnvironment1定义并连接数据库
用datareport（VB自带）倥件做好报表，参考代码如下：
    If DataEnvironment1.rs？？？？.State = adStateOpen Then
        DataEnvironment1.rs？？？？.Close
    End If
    DataReport1.Refresh
    DataReport1.Show
OK?