vb的水晶报表如何安装啊

[miaomiaomxt]

我安装以后.
我是否还要引用?
可是我在工程下面的引用
中找不到,.

[bluesanke]

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

看以下的
用这个前提是你在水晶报表里已经建好了，然后在部件里填加CRYSTAL REPORTS VIEWER CONTROL9把它拖到你的窗口里，然后选工程---》引用----》CRYSTAL REPORTS 9 ACTIVEX DESIGNER RUN TIME LIBRARY再填加个打印按钮，在打印按钮里填加代码
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

注意Set CRY = CRYAT.OpenReport(App.Path + "\水晶报表\crystal.rpt")水晶报表是你保存好的文件夹，crystal.rpt是你要打开的报表文件就是你要打印的表：）