Baixem agora mesmo um exemplo (código-fonte) desenvolvido em Visual Basic 6, que aborda como preencher dinamicamente um ComboBox ou ListBox a partir de uma tabela de dados.
A rotina é genérica e pode ser utilizada em praticamente todos os códigos que pretendem interagir com os dados de uma determinada tabela (no exemplo, com uma base Access). O combo/List apresenta um campo texto (NomeCliente, por exemplo) e fica/armazena também o identificador da tabela (por exemplo, CodigoCliente).
Atualização: Para os que forem utilizar a rotina/modelo no Visual Basic 6 e, obtiverem como resultado uma mensagem de erro Type Mismatch ou Object Indefined, basta marcarem/setarem no menu Project -> References a opção Microsoft DAO 3.51 Object Library (de acordo com esse screenshot). Isso fará com que o ambiente de desenvolvimento do VB passe a integrar ao seu sistema as bibliotecas e referências à OCXs necessárias a utilização de variáveis do tipo DAO.Database.
