初学VB，请教一个简单的问题！谢谢！

Question

我新建了一个数据环境设计器！在工程新建了一个form窗体，然后添加了一个MsHFlexGrid控制！
可为什么它的选择DataSoure属性的时候， 
提示“没有找到与次使用者兼容的数据源”！！！！而如果在窗体放一个DataGrid，却可以选择对应的数据源呢？谢谢！

Answer 1

DataGrid可用adodc与数据库链接，也就是用adodc提供的数据源

Answer 2

我连接的是sqlserver!难道MsHFlexGrid不能连接？

Answer 3

no
给你各代码：
Public Sub showFd()
Dim intCount As Integer
intCount = 0
If mrc.EOF = True Then
    mrc.MoveFirst
   
   With MSFlexGrid1
     .Row = 1
     Do While Not mrc.EOF
     
           intCount = intCount + 1
           MSFlexGrid1.TextMatrix(.Row, 0) = intCount
       If mrc!CQuesID <> "" Then
          MSFlexGrid1.TextMatrix(.Row, 1) = mrc!CQuesID
       Else
           MSFlexGrid1.TextMatrix(.Row, 1) = ""
       End If
   
       If mrc!cRightAnswerNo <> "" Then
           MSFlexGrid1.TextMatrix(.Row, 2) = mrc!cRightAnswerNo
       Else
            MSFlexGrid1.TextMatrix(.Row, 2) = ""
       End If
       If mrc!Cchoice <> "" Then
           MSFlexGrid1.TextMatrix(.Row, 3) = mrc!Cchoice
       Else
           MSFlexGrid1.TextMatrix(.Row, 3) = ""
       End If
       .Row = .Row + 1
       mrc.MoveNext
    Loop
End With
End IfintCount = 0
 With MSFlexGrid1
     .Row = 1
     For i = 0 To total
        intCount = intCount + 1
       MSFlexGrid1.TextMatrix(.Row, 0) = intCount
       MSFlexGrid1.TextMatrix(.Row, 4) = score(i)
     .Row = .Row + 1
     Next
 End With
End Sub

Answer 4

mrc为记录集
声明：dim mrc as new adodb.recordset