【机房收费系统】VB与grid++report交互(如何让数据以报表格式显示)
2015-08-28 15:07
567 查看
前言
上篇文章已经对数据显示的必要性及三种不同数据显示方式的优劣做了简介,这里就不再赘述。直接为大家展示一下如何来将vb中的数据以报表方式显示。一、 下载报表编辑器
http://www.rubylong.cn/Download_History.htm
注意:我特意把这一步拿来做为一个过程来讲,主要是因为目前最新的6.0版本好像有些兼容问题。 在用vb交互的过程中可能会出现 “ 数据无法解析 ”报错。我因为这个问题耽搁了好久。 最后才明白是版本问题。
二、自行绘制报表
1.插入控件
(BeginDate) 变量—— parameter参数
文字常量—— 静态框
当前时间——系统变量框
2.更改控件属性
三、代码设计
Private Sub Form_Load() Dim strSQL As String, strMsg As String strSQL = "select * from checkday_info where date='" & Format(Date, "yyyy-mm-dd") & "'" Set Report = New grproLibCtl.GridppReport '实例化模版 Report.LoadFromFile (App.Path & "\checkday.grf") '加载模版 Report.DetailGrid.Recordset.ConnectionString = ConnectString() '连接数据源 Report.DetailGrid.Recordset.QuerySQL = "select top 1 * from checkday_Info order by date desc" '通过SELECT查询创建记录集 Report.ParameterByName("now").AsString = Date Report.ParameterByName("username").AsString = UserName '给报表中元素赋值 GRDisplayViewer1.Report = Report GRDisplayViewer1.Start '开始打印 End Sub
相关文章推荐
- VBScript random function
- VBScript,checkbox,选择问题
- 文档大师 搜狗拼音无法输入汉字_乱码的解决方法_VB6程序
- 使用VBS打开程序和关闭程序
- vb上传文件
- 数字视频广播字幕系统(第五章)
- 语料编程空手道:从 VBA,到 VBS,到 HTA
- VBA病毒“制造机”正在流行
- 【VBA研究】EXCEL启动时自动启动窗体
- 处理Selection对象和Range对象——Word VBA中重要的两个对象
- VB.NET 程序打包(vs2010)
- Excel中的宏--VBA的简单例子
- 用VBS创建Excel后,打开时却提示“您尝试打开的文件 的格式与文件扩展名指定的格式不一致”
- 【VBA研究】关闭保存工作簿时重新计算功能
- 关于VBA对数据透视表的操作使用
- Excel VBA编程的常用代码(备用待查)
- Excel_VBA_编程教程(完整版)
- VBA中事件的应用
- VB.NET反序列化XML
- Opengl ES 1.x NDK实例开发之五:顶点缓存VBO