Filipe Gonçalve
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 21/06/2007 10:25 hs
Quero associar uma combobox no Form do Vb com uma tabela do access. Como faço? Obrigado |
|
|
|
|
|
|
|
Postada em 22/06/2007 09:07 hs
O que você pode fazer é colocar um data no form, associar ele no banco pelo databasename ( caminho até o banco ) e depois pelo recordsource ( tabela desejada do banco ), feito isso nas propriedades do combo você usa o datasource para associar o combo a esse data e o datafield associa o campo desejado, feito isso ele já estará associado e quando você abrir o sistema o combo estará preenchido com os dados desse campo
Outra coisa que você pode fazer é colocar os dados do campo diretamente no combo
Caso você use ADO fica assim
tabela.Index = "nome do index"
tabela.MoveMin
While Not tabela.EOF
combobox.AddItem tabela!nome do campo
tabela.MoveNext
Wend
Ou SQL
Dim Sql As Recordset
Set Sql = DB2.OpenRecordset("select * from sua tabela")
Sql.MoveMin
While Not Sql.EOF
Grid.AddItem sql!seu campo
Sql.MoveNext
Wend
Seriam essas as possibilidades, caso você uso ADO, infelizmente não poderei te ajudar porque ainda não conheço
Abraço e que DEUS te abençõe, espero poder ter te ajudado 
Eu sou o Senhor, o DEUS de vocês;
eu os seguro pela mão e lhes digo;
Não fiquem com medo, pois eu os ajudo
Isaias 41:13
|
|
|
|
Filipe Gonçalve
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 25/06/2007 06:41 hs
Agradeço a sua ajuda, mas acontece que não está a funcionar, será que posso enviar o exemplo que fiz para que me possa dizer o que estou a fazer de errado. Cumprimentos |
|
|
|
Filipe Gonçalve
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 25/06/2007 13:02 hs
Está qualquer coisa errada, pq consigo com que apareça na combobox o campo da tabela, mas não faz o display de todos os registos da tabela associada, o que poderá estar mal. Obrigado |
|
|
|
Filipe Gonçalve
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 25/06/2007 13:16 hs
o que é o Index e o MoveMin Obrigado |
|
|
|
|
|
Postada em 10/07/2007 09:33 hs
Conseguiu corrigir o problema ?
|
|
|
|
