我的报表已经设计好了,数据也在msflexgrid里显示了,我在定义打印按钮时是这样定义的 Dim myApp As New CRAXDDRT.Application Dim Rpt As CRAXDRT.Report Set Rpt = Application1.OpenReport("D:\sea\mis\print1.rpt") Rpt.Database.SetDataSource rs CRViewer1.ReportSource = Rpt CRViewer1.ViewReport我运行时他提示我第一行“用户定义类型未定义” 我不知道是不是还需要引用或定义什么。
然后将水晶报表的数据源指定为生成的recordset
Dim myApp As New CRAXDDRT.Application
Dim Rpt As CRAXDRT.Report
Set Rpt = Application1.OpenReport("D:\sea\mis\print1.rpt")
Rpt.Database.SetDataSource rs
CRViewer1.ReportSource = Rpt
CRViewer1.ViewReport我运行时他提示我第一行“用户定义类型未定义”
我不知道是不是还需要引用或定义什么。