VB中使用报表控件（一）
在做机房收费系统时，有两个功能日结账单和周结账单中用到了报表控件，下面介绍一下如何使用报表控件。
首先，需要下载一个报表控件并安装，安装完成后在VB--工程--引用中选择Grid++Report Engine5.0TypeLibrary添加。
这两个控件添加进了工具箱。
下面添加代码就能使用此控件了。
Dim Report As grproLibCtl.GridppReport'实例化报表 Set Report = New grproLibCtl.GridppReport '报表建立的位置 Report.LoadFromFile App.Path & "\DaySettle.grf" Report.DetailGrid.Recordset.ConnectionString = ConnectString '数据源 strtxtSQL = "select * from DaySettle" Report.DetailGrid.Recordset.QuerySQL = strtxtSQL '报表的参数设置 Report.ParameterByName("ShowDate").AsString = Str(Date) Report.ParameterByName("MakeTime").AsString = Now '查看报表 GRDisplayViewer1.Report = Report '显示报表 GRDisplayViewer1.Start