有人吗？MSFlexGrid11.DataSource=rs 怎么不能显示记录

DataGrid1.datasource=rs能显示在
MSFlexGrid11.DataSource=rs 怎么不能显示记录
不行啊！ 我的代码如下：=================================================================== 
   Public cn As New ADODB.Connection
   Public rs As New ADODB.Recordset
Public Sub OpenCnRs1()    If cn.State = adStateOpen Then      '判断数据库是否打开，如果打开就关闭
        cn.Close
    End If
    cn.Open "provider=microsoft.jet.oledb.4.0;data source=" + App.Path + "\db1.mdb;"  '打开连接                                                                'Jet OLEDB:Database Password=555;Persist Security Info=True"
    With rs
        .ActiveConnection = cn
        .CursorLocation = adUseClient
        .CursorType = adOpenDynamic
        .LockType = adLockBatchOptimistic
       ' .Open strRsSql '打开记录集
    End With
 End SubPrivate Sub Command1_Click()
    Dim aa As Long
    Dim strRsOp As String
    strRsOp = "select * from 表1,表2 where 表1.id = 表2.id"
    Call OpenCnRs1
    rs.Open strRsOp
    MsgBox rs.Fields.Count
   Set MSFlexGrid1.DataSource = rs