VB中怎么把ACCESS中某个表的一列数值，加到combobox的下拉列表中？初学VB，请大家多帮帮忙

VB中怎么把ACCESS中某个表的一列数值，加到combobox的下拉列表中？初学VB，请大家多帮帮忙

用循环语句从字段里先读到变量中，再增加了combobox1的下拉列表属性中。

很简单。初学，先要把基础建好,比如，
1.怎样用ADO读数据库字段？
2.怎样给comboBoX1增加列表属性；
3.上面两个问题都会了，一结合不就是你自已问的问题吗

菜单“工程”-“引用”，找到以下库打勾： microsoft activex data objects 2.x library microsoft activex data objects recordset 2.x library 代码： dim cnn as adodb.connection dim rs as adodc.recordset cnn.connectionstring = "provider=microsoft.jet.oledb.4.0;data source="access文件.mdb;persist security info=false" cnn.open rs.open "select field1 from table1", cnn, adopenforwardonly, adlockreadonly.adcmdtext combo1.clear do while not rs.eof combo1.additem rs.fields(0) & "" rs.movenext loop rs.close set rs = nothing cnn.close set cnn = nothing

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息