【机房】-报表创建与VB附加
来源:互联网 发布:拦截广告的软件 编辑:程序博客网 时间:2024/06/02 04:16
前言:
报表创建其实就是用报表程序创建报表模板,然后再附加在VB中,最终达到在VB上使用运行的目的。
一、报表安装
1.百度搜索并下载报表程序。
2.安装之后,菜单栏插入报表头、报表尾、明细网格、页眉和页脚(机房报表可忽略)
二、报表连接数据库与完善
1.明细网格-数据库连接串与查询SQL
2.创建数据库连接串
配置连接
确定之后连接串自动显示,输出查询SQL
3.顺序点击“根据数据设置自动生成字段”和“根据字段自动生成列”
修改名称
4.插入参数,并修改名称、格式、类型
5.插入静态框和综合文字框(存放参数)显示文字
报表至此设计完成。
三、报表在VB上的使用
1.首先在部件中添加这两个
2.选择GRDispiayViewer控件并添加至窗体中
四、日结账单的代码
1.定义并实例化报表
Option Explicit '定义报表对象
DimReport As grproLibCtl.GridppReport
2.打印及打印预览
Private Sub Command2_Click() '打印
Report.[Print] (True)
EndSub
Private Sub Command3_Click() '打印预览
Report.PrintPreview (True)
EndSub
3.报表显示
PrivateSub Form_Load()
Me.Width = 13305
Me.Height = 8550
Dim txtSQL As String
Dim MsgText As String
txtSQL = "select * from CheckDay_Infowhere date='" & Format(Date, "yyyy-mm-dd") &"'"
Set Report = New grproLibCtl.GridppReport '实例化模板
Report.LoadFromFile (App.Path & "\日结账单.grf") '加载模板
Report.DetailGrid.Recordset.ConnectionString = Connectstring() '连接数据源
Report.DetailGrid.Recordset.QuerySQL = txtSQL '通过select查询创建记录集
Report.ParameterByName("guanliyuan").AsString = UserName
Report.ParameterByName("guanliyuan").Value = UserName '显示管理员
GRDisplayViewer1.Report = Report '将数据赋给GRD的Report
GRDisplayViewer1.Start '显示报表
EndSub
- 【机房】-报表创建与VB附加
- Vb与报表(二.创建报表模版)
- 机房收费系统(三)——VB与报表
- 机房收费系统报表制作(vb与数据库)
- 机房收费系统之结账与报表(三)VB与报表代码《一学就会傻瓜版》
- 机房收费系统之VB报表
- VB.NET版机房收费系统---报表
- vb.net机房收费系统报表设计
- 【机房收费】--VB让报表有生命
- 机房收费系统2——vb与报表的交互
- 【机房收费系统——报表与vb交互之日结账和周结账】
- 【机房收费系统】VB与grid++report交互(如何让数据以报表格式显示)
- VB.NET版机房重构---“报表”之旅
- Vb与报表(一.什么是报表)
- VB与报表的交互
- 机房收费系统之结账与报表
- 机房收费之结账与报表
- 【VB与数据库】机房收费系统--序
- 黑马程序员之手机卫士第六天
- java基础第五天
- 黑马程序员之手机卫士第七天
- 黑马程序员之手机卫士第八天
- 黑马程序员之手机卫士第九天
- 【机房】-报表创建与VB附加
- Dubbo各种协议
- 剑指offer——面试题10:位运算之二进制中1的个数
- generatorConfig.xml
- android 让webview支持https 双向认证(SSL)
- 栈和队列的数组实现—《算法导论》学习笔记之六
- C语言关键词
- [LeetCode]Restore IP Addresses
- java 打印乘法口诀