我在dareport上的section1上面画了一个textbox
然后我取到了一个recordset
请问怎样才能望这个textbox显示那个recordset里面的name字段呢?谢谢了
救急啊
大家

解决方案 »

  1.   

    添加DataReport。在细节中用RptTextBox控件按自己的打印要求布局。将其DataField属性对应相应的字段,注意不要设置DataMember,双击DataReport,添加代码如下:
    Private Sub DataReport_Initialize()
        Dim cn As ADODB.Connection
        Dim rs As ADODB.Recordset
        Dim Sql As String
        '连接数据库(Access)
        Set cn = New ADODB.Connection
        With cn
            .Provider = "MSDataShape.1" '一定要加这句
            .Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "Data Source=" & App.Path & "\db1.mdb;" & _
            "Persist Security Info=False"
        End With
        '组合查询语句:
        Sql = "SELECT * FROM TableName " & _
            "where ID ='" & Form1.Text1.text & "'"
        '打开查询记录集
      Set rs = New ADODB.Recordset
        rs.Open Sql, cn, adOpenStatic, adLockReadOnly
        Set Me.DataSource = rs
    End Sub
      

  2.   

    兄弟,你别吓我!大家互帮互学。
    横向距离可以拖动控件调整,纵向距离可以调整细节、标头的Height的值。
    打印时打印程序会按你纸张尺寸自动分页
      

  3.   

    兄弟你费那个劲干什么 ??使用一个 active report比vb自带的datareport好用多了!分页非常简单!
    强烈建议换一个报表工具!vb自带的确实太烂!