请问在VB里面怎么调用水晶报表，报表我已经做好了。

Question

请问在VB里面怎么调用水晶报表，报表我已经做好了。

Answer 1

Dim CRY As CRAXDRT.Report
  Dim CRYAT As CRAXDRT.Application
  Set CRYAT = New CRAXDRT.Application
  Set CRY = CRYAT.OpenReport(App.Path + "\水晶报表\crystal.rpt")
  Form1.CRViewer91.ReportSource = CRY
  Form1.CRViewer91.ViewReport

Answer 2

你要加载CRYSTAL REPORTS 9 ACTIVEX DESIGNER RUN TIME LIBRARY和
CRYSTAL REPORTS VIEWER CONTROL9

Answer 3

这句Form1.CRViewer91.ReportSource = CRY提示“未找到方法或数据成员”

Answer 4

Set CRY = CRYAT.OpenReport(App.Path + "\水晶报表\crystal.rpt")
这句话你没设好，要是已经加载CRYSTAL REPORTS 9 ACTIVEX DESIGNER RUN TIME LIBRARY和
CRYSTAL REPORTS VIEWER CONTROL9，“\水晶报表”是你放报表的文件夹名“\crystal.rpt”是你要打开的那个报表名！！！都写对不会有问题：）

Answer 5

你的毛病就是没在部件里引用CRYSTAL REPORTS 9 ACTIVEX DESIGNER RUN TIME LIBRARY
要是说路径错误可以这样写Set CRY = CRYAT.OpenReport( "G:\测试\水晶报表\行政管理\cx_xzgl_zhtj_tdzlkffk.rpt")当然括号里的要改成你的路径：）

Answer 6

顺便问1下，如果在VB中用到了水晶报表的话，程序打包成SETUP文件该怎么做？