Sql server 如何将crystalreportviewer与数据库连接？

我有一个sql表名

Patient\u Detail

，我想用crystal report报告它，但错误是

对象引用未设置为对象的实例。

，位于

rd.Load（“C:\Users…..

Dim dap As SqlDataAdapter
Dim dat As DataTable
Dim bds As BindingSource
Dim cmd As SqlCommand
Dim ds As DataSet
Dim rd As ReportDocument
Private Sub Report_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    cn.Open()
    cmd = New SqlCommand
    dap = New SqlAdapter
    ds = New DataSet
    rs = New ReportDocument
    cmd.Connection = cn
    cmd.CommandText = "SELECT * FROM Patient_Detail"
    dap.SelectCommand = cmd
    dap.Fill(ds, "Patient_Detail")

    rd.Load("C:\Users\Hou Chandara\documents\visual studio 2013\Projects\WindowsApplication1\WindowsApplication1\MyReport.rpt")

    rd.SetDataSource(ds)
    CrystalReportViewer1.ReportSource = rd
    CrystalReportViewer1.RefreshReport()
    cn.Close()

End Sub

您需要先设置rd。 rd=新报告文档（）

或在声明中

Dim rd作为新的报告文档