rs.open "select * from your_tab where your_field like %c_no% order by your field"rs.movefirst
do until rs.eof
combox.additem rs.field(your_field)
rs.movenext
loop
do until rs.eof
combox.additem rs.field(your_field)
rs.movenext
loop
对了,谢谢了,分马上奉上,您有信箱吗?以后好联系!