Boa tarde a todos.

 

Tenho um banco de dados (access) com duas tabelas, sendo que uma estas tabelas estão relacionadas por um código x, gostaria de usar um cobobox  ligando dados de uma tabela em outra tabela do mesmo banco d edados, será que alguém poderia me dar uma mão.

 

Obrigado.

cara explica melhor, eu entendi que vc possui duas tabelas e que elas possuem um campo em comum, "COD", mas o que vc pretende fazer com a combobox nessas tabelas ? a combo é preenchida como ? com dados das tabelas ?

 

exemplo: quando clicar na combo executar tal evento...

se é para acessar uma tabela de acordo dados existentes em uma combo é só por um FILTER passando como parâmetro a propriedade text da combo por exemplo:

 

Para buscar um registro que esteja na tabelaB sendo que o valor referente a ele aparece na combo1

 

Option Explicit
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset

Private Sub Command1_Click()

With cmd
    .ActiveConnection = cnn
    .CommandType = adCmdText
    .CommandText = "select * from tabelaB"
    rs = .Execute
End With
With rs
    .Filter = " campo like '" & Combo1.Text & "'"
    Text1 = !campo1
    text2 = !campo2
End With
End Sub

É mais ou menos isso ? se não fala ai pra agente tentar ...