Como cargar combobox con registros de una tabla

[okan]

Quiero mostrar los registros de un campo en un combobox,hasta ahí todo bien pero al ejecutarse el codigo se borran los registros del campo cargado de la tabla y no logro descifrar porque. El codigo es el siguiente:

Código:

Do While Not Adodc1.Recordset.EOF = True
    combo.AddItem Adodc3.Recordset.Fields(2)
    Adodc1.Recordset.MoveNext
Loop