當我插入域到水晶報表，這就是現場沒有出現在報告中的代碼

Question

這是在打印命令 代碼與數據庫連接成功

Try 
      Dim rpt As New rptallergy2 
      Dim myConnection As SqlConnection 
      Dim MyCommand1 As New SqlCommand() 
      Dim myDA1 As New SqlDataAdapter() 
      Dim myDS As New DataSet 
      myConnection = New SqlConnection(cs) 

      MyCommand1.Connection = myConnection 
      MyCommand1.CommandText = "SELECT RTRIM(patient.name) from patient " 
      MyCommand1.CommandType = CommandType.Text 

      myDA1.SelectCommand = MyCommand1 

      myDA1.Fill(myDS, "patient") 

      rpt.SetDataSource(myDS) 
      frmReport.CrystalReportViewer1.ReportSource = rpt 
      frmReport.ShowDialog() 
     Catch ex As Exception 
      MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error) 
     End Try 

Answer 1

MyCommand1.CommandText = "SELECT RTRIM(patient.name) as pName from patient" 

然後對數據集匹配pName字段到晶體報告的字段是Jonathan Willcock說的。