重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
jbp4b9ae4a2e8 ,你真是刷分大王!
创新互联专注于潮安企业网站建设,响应式网站,商城网站定制开发。潮安网站建设公司,为潮安等地区提供建站服务。全流程专业公司,专业设计,全程项目跟踪,创新互联专业和态度为您提供的服务
经验值 财富值 采纳率 提问数 回答数 精彩回答 赞同数 经验数
938574 965990 0% 78441 0 0 0 0
CrystalReportViewer
dataset 定义数据源
.rpt 文件描述具体报表样式
再加一个调用报表的FORM,就可以实现简单的报表功能
Option Explicit
dim Report as New Cystal1
Private Sub Form_Load()
Screen.MousePointer = vbHourglass
'调用水晶报表时置鼠标为沙漏状 CRViewer91.ReportSource = Report '该语句的赋值将在后面被修改
CRViewer91.ViewReport
Screen.MousePointer = vbDefault '调用水晶报表完成后置鼠标为默认形状
End Sub
Private Sub Form_Resize()
CRViewer91.Top = 0
CRViewer91.Left = 0
CRViewer91.Height = ScaleHeight
CRViewer91.Width = ScaleWidth
End Sub
vs2005里直接封装了水晶报表的APP,生成EXE文件后,直接安装到其它电脑即可使用。