data report报表问题，为什么显示不出来。

Question

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 & "\basic.mdb;" & _
        "Persist Security Info=False"
    End With
    '组合查询语句：
    Sql = "SELECT * FROM Tbasic " & _
        "where 姓名 ='李明"
Set rs = New ADODB.Recordset
    rs.Open Sql, cn, adOpenStatic, adLockReadOnly
    Set DataReport1.DataSource = rs
用MSHFlexgrid可以显示出来。可是用datareport显示不出。不知道为什么，请教了，谢谢。。

Answer 1

好象你的代码是分层查询，datagrid是不支持分层的。
不知对否？

Answer 2

是报表显示怎么不行？不好意思，不是用datagrid，我是想用datareport

Answer 3

不好意思，问一下，你有没有在报表中的rptTextbox中指定datafield=" 字段名"