[Resolvido]Combobox com campos de tabela automático

Grandes Mestres, boa noite.

Mais uma vez por aqui para aprender. Estou necessitando montar um Combobox (CmbChave) com os nomes dos campos da tabela TbCadastro ao abrir o formulário "TbCadastro Formulário Gerar Combobox" mas sempre aparece erros que não consegui resolver. Pesquisei aqui no fórum, encontrei algo parecido mas não deu para adaptar (também dando erros). Após montar esse CmbChave tenho um outro campo para colocar o que devemos procurar (por exemplo: campo do cmbChave: Bairro e campo Conteúdo: Jordão. Deverá exibir todos os registro que contenham todo o conteúdo ou parte dele em um LstBox. O código do botão pesquisar está bem encaminhado. O problema maior é CmbChave com campos da tabela. Consigo gravar os nomes dos campos em outra tabela e nada no Combobox. Tem um outro formulário aqui nesse exemplo de DB que faz o básico do necessário direitinho (forçando a criação manual de nova tabela com os nomes dos campo). Segue abaixo a parte do DB com o problema.

Muito grato a todos e um forte abraço.

Caros Mestres!

Reforçando a dúvida do tópico anterior:

Erro em tempo de execução 6014
A propriedade RowSourceType deve ser definida como Value List para que este método seja utilizado.
Fazendo referência a Me.CmbChave.AddItem fld.Name. Nesse código não é utilizado nada dessa propriedade RowSourceType. Qual o motivo da mensagem?

Abraços

Código:

Private Sub Form_Load()
    Me.CmbChave.RowSourceType = "Value List"
    Me.CmbChave.RowSource = "Reg; Nome; Endereco; Bairro; Municipio; Profissao; DataNascimento"
    Me.CmbChave.Requery
End Sub

Grande JPaulo

Muito grato por seu interesse, no entanto, as opções do CmbChave devem ser os nomes dos campos da TbCadastro. Consegui fazer algo desse seu método e funcionou. Mas tem que ser da TbCadastro. Inclusive ainda estou demasiadamente interessado em saber os motivos dos erros acima citados em que faz referência a "Me.CmbChave.AddItem fld.Name" e no código em questão não é utilizado nada dessa propriedade RowSourceType. Qual o motivo da mensagem?

A mensagem é essa:
Erro em tempo de execução 6014
A propriedade RowSourceType deve ser definida como Value List para que este método seja utilizado.

Abraços

Olá

"motivos dos erros acima citados em que faz referência a "Me.CmbChave.AddItem fld.Name" e no código em questão não é utilizado nada dessa propriedade RowSourceType"

O motivo deve-se a você querer adicionar items à combo e para adicionar items a uma combo tem sempre de dizer que a combo é uma lista e não uma tabela direta, por isso alteramos o tipo da combo  com Me.CmbChave.RowSourceType = "Value List"

Valeu JPaulo, muito obrigado.
Iria colocar o tópico como resolvido mas já foi feito. Nem lembrava.

Muito agradecido

Forte abraço