比如我建立一个管理员的数据库，记录用户信息，如果想按照编号来查询他们的信息，使用comdoc控件的下拉项来实现，怎么才能使得当我在数据库中添加一条信息后，那个下拉项中同时也会显示呢？ 谢谢！

for i = 0 to rs.recordcount-1
    combo1.additem rs.fields("编号").value
    rs.movenext
next

不好意思啊 ，着急了 竟打错了 呵呵

不好意思 ，那个 rs  要在什么地方定义呢？

dim rs as adodb.recordset

也可以使用窗体中的数据控件啊,如Data1
combo1.clear
for i = 0 to Data1.recordset.recordcount-1
    combo1.additem Data1.recordset..fields("编号").value
    data1.recordset.movenext
next