狂送100分（32）

Question

怎样使用报表？
问得太抽象，就是怎样把数据库里面的数据显示到报表上面，包括图片（图片也是从数据库里面）取出来的

Answer 1

1、作DataReport作报表2、将数据导出到excel作报表3、使用水晶报表或Active Report作报表

Answer 2

http://www.dapha.net/down/show.asp?classid=1&Nclassid=140www.vbgood.com
下载一些看看

Answer 3

我想把数据库里面的数据库查询出来，放到报表上，我已经生成了一个datareport1，怎么用啊。

Answer 4

1使用VB的报表设计起
2,使用第三方控件(一般比较强大)
3,自己用picturebox等画

Answer 5

要是不会水晶报表这些“高难度”的，那就导出到Excel来做吧

Answer 6

直接用VB的DATAREPORT做比较简单
但是效果不是恨好一个小例子：
  首先添加设计器  然后这个是把查询出来的结果显示出来，查询的存储过程你自己写吧，比较简单
Private Sub SubPrint()
If DataEnvironment.rsCommandprintContainer.State = adStateOpen Then
     DataEnvironment.rsCommandprintContainer.Close
End If
        DataEnvironment.Commands("CommandprintContainer").Parameters("@Ccode").Value = Trim$(cmbCId.Text)
'        DataEnvironment.Commands("CommandprintContainer").Parameters("@mc").Value = Trim$(Txt_mc.Text)
        datareportPrintContainer.Sections.Item("section4").Controls.Item("lbHead").Caption = "拼箱装箱单"
        datareportPrintContainer.Orientation = rptOrientLandscape
        datareportPrintContainer.Refresh
        datareportPrintContainer.Show 1
End Sub

Answer 7

我的代码：
定义：
Dim conndb As New ADODB.Connection
Dim rsdb As New ADODB.Recordset
Dim cmddb As New ADODB.Command
执行：
conndb.Open contextDB
cmddb.ActiveConnection = conndb
cmddb.CommandText = "select * from tableName"
Set rsdb = cmddb.Execute
绑定：
Set DPrint.DataSource = rsdb‘其中DPrint是我的报表
显示：
DPrint.Show 1
结果：
出错啦，显示没有找到“fileld(空)”
我哭啦

Answer 8

看看你报表中字段是怎么连接的,估计是连接到一个不存在的字段或者是你没给fields(index)的index复制,它现在是空值