Como cargar combobox con registros de una tabla

[okan]

Si corregi el tema del adodc pero igualmente al ejecutar se borran los registros de ese campo de la tabla.

Código:

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