vb 6.0 中MSFlexGrid1组件与数据库绑定 怎么用? 语句如何写?

MSFlexGrid1组件与数据库绑定  --------------------编程问答--------------------     Dim sql As String
    sql = "..."
    Dim rs As New ADODB.Recordset
    rs.Open sql, Conn, adOpenKeyset, adLockReadOnly, adCmdText

    Dim i As Integer
    msCharpter.Rows = rs.RecordCount + 1
    i = 1
   Do While Not rs.EOF
        MSFlexGrid1.TextMatrix(i, 0) =  rs!字段名
        rs.MoveNext
        i = i + 1
    Loop
   

补充：.NET技术 ,  VB.NET