Grupo de opções atualizando textbox

[Xspider]

Boa tarde pessoal!!!

Sou iniciante em Access e estou desenvolvendo um formulário para meu chefe. Porém cheguei num estágio que já está bastante dificil entender como fazer algumas coisas.

O que acontece...

Estou tentendo criar um grupo de opções (botão de opção) sendo que quando eu selecionar uma opção ele ira atualizar 3 textbox que tem no mesmo formulário e ao mesmo tempo preciso que as informações que estão ali apresentadas sejam gravadas na minha tabela principal.

Outro detalhe importante é que esses textbox vão obter os dados a partir de 3 tabelas distintas, por ex:

Temos:

Grupo de opções > Terá 3 botões de opções (Contingência1, Contingência2 e Contingência3)

Quando selecionado Contingência1 > O textbox "Situação" vai buscar a informação na tabela "Situação_tab" e apresentar o dado do campo referente, no caso Contingência1. Os outros textbox farão o mesmo porém buscando de suas devidas tabelas.

E o mais dificil (pra mim) depois de apresentar todas essas informações e eu fechar esse relatório ele deverá armazenar na minha tabela principal "Main_tab" no campo correspondente.

Não sei se minha explicação ficou clara, mas tentei explicar da forma mais simples. Agora a pergunta, é possível fazer algo assim?

Eu coloquei meu MDB no meu disco virtual para quem quiser dar uma olhada e entender melhor o que eu escrevi acima.

http://discovirtual.uol.com.br/disco_virtual/tms2771/MDB

senha da pasta: 123

Desde já agradeço a todos que puderem me ajudar...

Muito Obrigado!

Att,

David

[Humm]

é possivel sim..

você tera q usar eventos de rotinas vba

por exemplo..

você tem botoes ou comboboxs(caixas de selecionas opcoes)

você tem q abrir a propriedade dessa combobox e selecionar PROCEDIMENTO DE EVENTO na propriedade APOS ATUALIZAR

feito isso, clique no botao ao lado "..." para abrir a janela VBA

lá você criará a rotina a ser executada quando você atualizar essa combobox

por ex:

Private Sub SUAcombobox_AfterUpdate()
'aqui vem a rotina. ME significa a janela de onde veio a chamada da rotina
'essa rotina copia o conteudo da coluna 1 da combobox e cola no campotexto
        Me.seuCAMPOtexto = Me.SUAcombobox.Column(1)

End Sub

esse foi um exemplo. existem mil maneiras de capturar dados. você pode usar consultas, dlookup, criar recordsets, etc

Private Sub SUAcombobox_AfterUpdate()
        Me.seuCAMPOtexto = dlookup("[campoQUEcontemOSdados]", "TABELAouCONSULTAdoCAMPO")
End Sub

lembrando que dlookup você pode usar um criterio no final para filtrar um registro especifico.

dlookup(campo; fonte; criterio)

faça um estudo sobre esses q te passei e já vai encontrar muitas solucoes.

Editado Novembro 3, 2010 por Humm