DataGrid 的 DataSource 如何連接 ?(編號：4712)

各位先進:
我在 Form 上放置了 DataGrid 元件一個 , 並作了以下的程式,
可是在 DataGrid 中無法顯示資料,請教各位問題出在那裡 ?
Private Sub Form_Load()
dim ado_cn as adodc.connection
　　dim ado_rs as adodc.recordset
　　Set ado_cn = New ADODB.Connection
　　Set ado_rs = New ADODB.Recordset
　　ado_cn.Open connstr
　　sqlstr = "SELECT * FROM tireuser ORDER BY user_no"
　　ado_rs.Open sqlstr, ado_cn, adOpenKeyset, adLockOptimistic
　　Set DataGrid1.DataSource = ado_rs
　　
End Sub
p.s. 我確定 ado_rs 已成功的取得資料庫的內容, 因為我用 TextBox 元件可看到資料內容正確無誤.