关于将数据库中表中的数值与COMBO的问题

Question

请问一下,我将数据库中,其中一个表的一列数值,将放置在FROM,一个COMBO中进行选择,这个问题将怎么实现呢?谢谢关注.
RM:数据库是直接使用ADO连接的.
如下:Private Sub Form_Load()
     cn.Open "Provider=SQLOLEDB.1;" _
            & "***;" _
            & "***;" _
            & "***;" _
            & "***;" _
            & "***"

Answer 1

Private Sub Form_Load()
     cn.Open "Provider=SQLOLEDB.1;" _
            & "***;" _
            & "***;" _
            & "***;" _
            & "***;" _
            & "***"    Dim rs As New ADODB.Recordset
    rs.CursorLocation = adUseClient
    rs.Open "select distinct 某列 from 表", cn, adOpenDynamic, adLockBatchOptimistic
    While Not rs.EOF
        Combo1.AddItem rs(0)
        rs.MoveNext
    Wend
    ......

Answer 2

ok,thank you very much!!:)