llenado de un combobox

[pilar_tellez]

hola a todos, mi consulta es de visual basic 6.0, y mi consulta se refiere al llenado de un combobox, estoy trabajando con una base de datos access y el acceso a datos los hago con DAO, tengo una tabla llamanda quimicos que almacena como 2000 registros
el codigo es:

sub llena_qco()
while not quimico.eof
comobo1.additem quimico("nom_quimico")
quimico.movenext
wend
endsub

bueno el tema es q no estoy muy segura, pero creo q con ese codigo creo que muestra hasta una cierta cantidad de informacion o registro, si alguien me lo puede aclarar se lo agradesco ....