我想将查询的结果在combobox中显示,也就是说将查询的结果插入到combobox中
点击下拉列表框显示我的查询结果。

解决方案 »

  1.   

    combobox.clear
    combobox.additem "你的數據"
      

  2.   

    我查询到的记录集,插入到combobox!
      

  3.   

    combobox.clear
    while not rs.eof
        combobox.additem rs("xxxx")
    wend
      

  4.   

    Dim rsTemp As New ADODB.Recordset...Combo1.Clear
    do while not rsTemp.EOF
        Combo1.AddItem rsTemp("XXX")
    Loop
      

  5.   

    用的什么控件啊 
    反正combobox不是有个datasource吗,还有个datafield
    将datasource的结果选成你用的数据控制控件,或许dbcontrol,或许其他的
    然后再把datafield选成你要显示的字段就行了,前提是数据库连接成功
    如果用的是对象连接的话,方法参照,不多讲了
      

  6.   

    Rs.Open "select * from employees", CN, adOpenDynamic, adLockReadOnly    Do Until Rs.EOF
            Combo1.AddItem Rs.Fields("FirstName")
            Rs.MoveNext
        Loop