太基础了,我都不好意思写。。找点参考资料或例子看看吧。。 dim rs as new adodb.recordset rs.open "select [xxx] from table1 " combo1.clear do while not rs.eof combo1.additem rs.fields("xxx") rs.movenext loop
楼上还是木有明白我的意思,这个我知道如何additem,比如数据库有一张表,有俩字段 ID NAME 1 张三 2 李四 3 王五 那么我绑定Combobo后,列表显示的是name列的值,但是我实际取的是ID的值,显示的仅仅是方便好看,这样的要求在C#里极其简单的就可以实现,但是,不知道在VB中如何实现呢?
ado连接数据库,查询到数据后循环这些记录additem()
dim rs as new adodb.recordset
rs.open "select [xxx] from table1 "
combo1.clear
do while not rs.eof
combo1.additem rs.fields("xxx")
rs.movenext
loop
ID NAME
1 张三
2 李四
3 王五
那么我绑定Combobo后,列表显示的是name列的值,但是我实际取的是ID的值,显示的仅仅是方便好看,这样的要求在C#里极其简单的就可以实现,但是,不知道在VB中如何实现呢?
用combobo的itemdata属性保存每个name对应的id即可:
Combo1.AddItem "NAME001"
Combo1.ItemData(Combo1.NewIndex) = "ID001"