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文件后，直接安装到其它电脑即可使用。
