vb.net 水晶报表的问题 在线等 求大神
理解： 通过sql语句 查到dataset ，将dataset 赋给DataSet1.xsd 中建立的表 datatable ，然后操作dataset1 即可。
实际操作中遇到了一个问题：在dataset1.xsd 中建立一个datatable 并且写了几个字段，如何在CrystalReport1.rpt中页眉中直接显示出字段？
请高手回答下我的理解有问题吗。另外遇到的这个问题如何操作。我12点前都在线。请高手不吝赐教
[解决办法]
拖过去有一个数据框和标题框，你改名字就行了
[解决办法]
'赋值给报表区域内的某个控件
'CType(rpt.Section2.ReportObjects.Item("Clientname"), TextObject).Text
Function GiveValueToReportControl(ByVal tSection As Section, ByVal ControlName() As String, ByVal ToValue() As String)
If UBound(ControlName) <> UBound(ToValue) Then
Throw New System.Exception("所传参的数量和值的数量不等.")
Exit Function
End If
Dim i As Int16
Dim Cl As TextObject
For i = 0 To UBound(ControlName)
Try
Cl = CType(tSection.ReportObjects.Item(ControlName(i)), TextObject)
Catch
Throw New Exception("报表内名为:" & ControlName(i) & "控件不存在!")
End Try
Cl.Text = ToValue(i).ToString
Next
End Function
