小弟刚学CrystalReport，对此一无所知，希望大哥教导，我做了一个DataGrid的表，当选中某一记录时，就将该记录的所有字段值传给了一个变量数组myPrinTxt()，并在新窗口中的CrystalReportView控件中显示，已做好了rpt文件，文件中设置了参数字段，分别为myPrint()，我该怎么传值过去？求Sub原码，万分感谢！

怎么将dataset的数据加载到CrystalReportView呢？是不是

MyId=me.DataGrid1.Item(hti.row,0) '从DataGrid1的点击中获得id号
Dim MyDS As New Dataset1()
Dim MyTable = "Customer"

MyDA.Fill(MyDS, MyTable)
MyCommand.CommandText = "Select * from " & MyTable & " Where id=" & MyId
MyDA.SelectCommand = MyCommand

me.CrystalReportView1.SetDataSource(MyDS)

我试过，还是不行，求代码！

[此贴子已经被作者于2007-9-29 21:39:56编辑过]

搞掂，谢谢！真诚的感谢！