从SQL数据库查询数据在子窗体显示问题

[dxinyan]

使用ADO查询的 记录
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Set rs = New ADODB.Recordset

cnn.ConnectionString = "Provider=SQLOLEDB.1;driver={SQL server};" _
& "server=127.0.0.1;" _
& "User ID=sa;" _
& "Password =1;" _
& "DNS=a;" _
& "Initial Catalog =mydata"
cnn.Open

sql = "select * from Tb1 where ID='" & Me.tex_ID & "'"
rs.Open sql, cnn, adOpenKeyset, adLockOptimistic
用下面的语句在子窗体上显示不出来.可以实现ADO查询结果在窗体上显示吗?
Me.Child.Form.RecordSource = rs.fields

[WWWWA]

不能直接显示， 建立链接表　OR　ADP　OR Me.Child.Form.RecordSource =" SELECT * [odbc;Driver={SQL Native Client};Server=TMP;Database=TMP;Uid=sa;Pwd=123].TT"; 再动态生成控件设置来源

[dxinyan]

再动态生成控件设置来源?? 怎么动态生成控件设置来源 啊，我看控件的属性,来源里没有选择啊