Necessito carregar alguns combos em um formulario com campos de uma tabela access. porém ja tentei fazer de tudo um pouco, inclusive seguindo exemplos encontrados aki no site, mas nao consegui. Alguem poderia por gentileza enviar uma instrução para isto que seja bem simples para q eu possa entender e assim implementar essa função em meu projeto?

 

Thanks

Michaelsnts

Eu faço assim: (no form_load)

 

1) PARA CARREGAR TODOS OS REGISTROS DA TABELA:

 

Set tab_clientes = bd.OpenRecordset("Select * from tab_clientes")
Do While Not tab_clientes.EOF
CMBNome.AddItem (tab_clientes!nome)
tab_clientes.MoveNext
Loop

2) PARA CARREGAR SOMENTE ALGUNS REGISTROS:

 

Set tab_estoque = bd.OpenRecordset("Select * from tab_estoque where datavenda is null")
Do While Not tab_estoque.EOF
CMBCod.AddItem (tab_estoque!Cod)
tab_estoque.MoveNext
Loop

 ESPERO TER AJUDADO!