Visual Basic - COMO CARGAR COMBOBOX CON REGISTROS DE TABLA SQL

BUENAS TARDES:

ESTOY PROGRAMANDO EN VB 6.0 Y NECESITO CARGAR UN COMBOBOX CON LOS REGISTROS DE UN CAMPO EN UNA TABLA SQL.

TENGO EL SIGUIENTE CODIGO PERO CADA VEZ QUE OPRIMO LA PESTAÑA DEL COMBOBOX SE AÑADE EL PRIMER REGISTRO ALMACENADO EN LA TABLA.

¿COMO PUEDO MOSTRAR LOS REGISTROS DE UN CAMPO EN EL COMBOBOX SIN QUE CADA VEZ QUE OPRIMO LA PESTAÑA SE ME REPITA EL MISMO REGISTRO?

esta pagina es una porqueria, porque cuando tu necesitas ayuda sobre algo que estas buscando, nunca te muestra una respuesta concreta como en este caso.

Para encontrar la respuesta primero debes buscar con mas paciencia, a mi me ha ido bien con esta pagina, si no esta como pregunta lo he encontrado en la sección de ejemplos los uqe estan ordenados por lenguaje.