[VB.NET]PrintDocument如何打印水晶报表喔?

<script type="text/javascript"><!--
google_ad_client = "pub-8333940862668978";
/* 728x90, 创建于 08-11-30 */
google_ad_slot = "4485230109";
google_ad_width = 728;
google_ad_height = 90;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>

PrintDocument如何打印水晶报表喔?
PrintDocument如何打印水晶报表喔?
__________________________________________________________________________
Dim RptDoc As ReportDocument = Me.LoadRpt(RptData)
If Not RptDoc Is Nothing Then
RptDoc.PrintToPrinter(1, True, 0, 0)
End If

生成报表文件
Private Function LoadRpt(ByVal RptData As DataRow) As ReportDocument
Dim fileName As String = Application.StartupPath + / + RptData( cRepName )
If Not File.Exists(fileName) Then
Throw New Exception( 报表文件不存在！ )
End If

Dim RepDoc As New ReportDocument
RepDoc.Load(fileName)
Me.LoadRptData(RepDoc, RptData)
Me.SetParamToRpt(RepDoc, RptData)

Return RepDoc
End Function
__________________________________________________________________________
错了,上面的方法是将水晶报表文件转化为一个ReportDocument,然后打印.
而不是转化为PrintDocument
__________________________________________________________________________
提示错误:未定义类型 ReportDocument
ReportDocument已经拖到了窗体上了....
__________________________________________________________________________