巨简单问题，关于查询，在线等

Question

现在我通过下面的代码建立的查询，我想将查询的结果显示在一个dataGrid表格中，应该怎么写呢？ 谢谢 
 ConnectString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=library"
   Set cnn = New ADODB.Connection
   cnn.Open ConnectString
   sql = "select * from tlogin where name= '" & sUserName & "' and password ='" & sPassword & "'"
   MsgBox sql
   Set rst = New ADODB.Recordset
   rst.Open Trim$(sql), cnn, _
         adOpenKeyset, _
         adLockOptimistic

Answer 1

rst.open 以后
用 Set dataGrid.datasource=rst就可以了

Answer 2

'搞一个ADO上去
Private Sub Command1()
    adoMain.ConnectionString = mConnectString
    adoMain.RecordSource = "SELECT * FROM 表名 where 查询条件"
    adoMain.Refresh
    Set dgMain.DataSource = adoMain
End Sub