机房收费系统——报表（2），机房收费系统报表
二、代码部分
跟之前写的excel相比，我觉得报表还是有点相同的。大体思路是这样的：
- 先定义。
- （报表：Dim Withevents 对象变量 As 类名
这种用法是加载该类的事件，Withevents之后就能在代码编辑窗看到该类的事件了（如果有的话）。
因为类不像控件，双击控件就可以进入事件编辑。
使用WithEvents 变量时，应该注意下面这些限制条件：
- WithEvents变量不能是派生对象变量。也就是说，不能把它声明为As Object—当声明该变量时必须指定类名。
- 不能把 WithEvents 变量声明为As New。必须明确地创建事件源对象，并将它赋给WithEvents变量。）
- 实例化报表，打开报表位置。
- 链接数据源。（由于报表里面已经连接了数据源，所以这句话我注释后程序依然可以正常的运行。在excel是写地址）
- 查询表并把表里面的内容显示出来
下面看一下代码：
<span style="white-space:pre"> <span style="color:#006600;"> </span></span><span style="color:#006600;">'定义</span> <pre name="code" class="plain" style="font-size: 19px;"> Dim WithEvents report As grproLibCtl.GridppReport <span style="font-family: 华文楷体; font-size: 14pt;"> </span><span style="font-family: 华文楷体; font-size: 14pt;"> </span>
<span style="color:#006600;"> <span style="white-space:pre"> </span>'加载一个新报表</span>
Set report = New grproLibCtl.GridppReport
<span style="color:#006600;">'载入报表模版文件</span>
report.LoadFromFile (App.Path & "\日报表.grf")
'设置数据连接串
<span style="color:#006600;"> 'report.DetailGrid.Recordset.ConnectionString = ConnectString
'链接数据源，由于在报表里面已经连接了。</span>
txtsql = "select * from checkday_Info where date ='" & Date & "'"
report.DetailGrid.Recordset.QuerySQL = txtsql '执行
<span style="color:#006600;">'显示报表中的内容</span>
grddayBill.report = report
grddayBill.Start
<span style="color:#006600;">'报表模板上的4个日期或时间赋值</span>
report.ParameterByName("Date1").Value = Format(Date, "yyyy-MM-dd")
report.ParameterByName("Datetime").Value = Now
report.ParameterByName("username").Value = UserName
三、总结
所以很多新的东西只要理清好原理 和思路，也没什么太难的。
还是特别感谢杨琛师哥的这两篇博客，巨详细。
机房收费系统之结账与报表（三）VB与报表代码《一学就会傻瓜版》
机房收费系统之结账与报表（二）周报表制作《一学就会傻瓜版》
你好~
具体什么要求，私信联系吧
学生收费管理系统2.0
系统的开发背景
学费收入是高等院校事业的最主要的来源。随着招生并轨的全面实行，学费标准比并轨前已提高较大的幅度，同时，为了提高办学效益，各校办学规模在不断扩大。《高校学生收费管理系统2.0》结合了高校收费改革的要求，在功能方面比原有的收费系统更强大，其界面更友好，实现从学生档案管理、收费工作，到收费资金结转的全面管理。本系统经过充分的调查与了解，完全从用户的使用的角度出发，充分考虑到实际操作过程中的每一种可能发生的情况，适合各高校的需要。
系统功能模块
抵扣费处理功能
银行接口设置功能
银行数据转换功能
收费标准设置功能
院系管理模块
学生档案管理模块
学生档案导入模块
学生住宿管理模块
现金收费模块
收费后处理功能
收据打印功能
通知单打印模块
数据库更新功能
学生档案查询模块
台账查询模块
收费综合查询模块
欠费更新
银行数据导出
银行数据导入
用户管理
学生收费网上查询系统
学生收费网上查询系统是学生收费系统在校园网的体现部分。主要功能如下图所
财务处的学生收费信息查询系统面向各院系的查询终端。各终端无需安装客户端应用程序，可直接使用互联网浏览器通过校园网向中央网络数据库服务器发送查询请求，并接收返回的结果。学生也可以通过校园网与财务处进行资料的互换，如收费情况查询及证明打印、银行帐号更改等等。这种方式的查询效率较高，通用性也较好。
支票打印系统
主要功能
& 大小写对应设置模块
& 付款行名称设置模块
& 收款人设置模块
& 支票用途设置模块
& 打印字体设置模块
& 支票模版设置模块
& 打印方向设置模块
& 支票存储模块
& 支票查询模块
& 权限设置功能
系统的特别之处
⊕不需手工填写支票，只需轻按键盘即可完成；
⊕支持各种型号的打印机，无需另外购置打印机；
⊕内置各大银行的支票格式，用户只需选择打印支票行名称便可；
⊕每打印一张支票后会对该支票进行储存，大大方便了日后的对帐、会计工作；
⊕对打印的字体进行大小、画笔、颜色的设置，方便用户因应不同的情况进行修改；
⊕可以适应各种系统、打印机的需要进行定位，减少了因打印机或者操作系统的不足导致错位；
⊕能为不同的操作员设置不同的权限，避免了资料了的外泄导致的不必要的损失；
⊕用户可根据不同时间查询出已开出的支票记录。
体检管理系统
主要功能
& 系统的基本管理功能
& 档案管理功能
& 体检者资料查询模块
& 检结果管理功能
& 统计报表功能
& 数据处理功能
优胜之处
随着计算机技术的发展，医院信息系统建设(HIS)在90年代取得了很大进展，许多医院拥有了自己的HIS或正在实施，管理软件各具特点。医院管理智能化是医院现代化的基本条件之一，引进计算机参与医院管理，对于加强管理的规范化、标准化，提高工作效率，改善服务质量将起到重要作用。在全球加快信息化的今天，传统的体检管理系统已经不符合医院信息系统建设发展的需求，即不能实时统计分析，也不能对之前的信息进行随时查询，分析和比较。
《体检管理系统》主要面向对象为各个医院的体检中心。该系统以其：①便于录入参加体检人员资料、医师基本资料和体检单位资料、体检结果以及成长表结果；②可根据个人或部门，进行分类或汇总查询历年的体检情况；③可分单位保存，方便日后的查询；④可按年龄、部门、性别和民族，统计出疾病率，方便医师对其进行分析；⑤可自由设置公式计算出现如：体重偏低等情况的部门人数，等特点。在很大程度上提高工作效率，既能减少输入的误差，又保......余下全文>>