如何将Datagrid控件内的数据传给DataReport？

Question

画出跟Datagrid格式相同的datareport,绑定字段,将Datagrid的datasouce赋给datareport

Answer 1

将值指向标签
DataReport1.Sections("St1").Controls("num").Caption=数据

Answer 2

完全可以的
   在'STL"中添加若干个RPTTEXTBOX
 dim i as long
  for i=0 to rs.fields.count
     with dataReport1.Sections("St1").Controls.item(i+1)
          .datafield=rs.fields|(i).name
          //设置数据格式     
    end with   
  NEXT I

Answer 3

别忘记|||：set datareport1.datasource=rs