PJVOA Posted May 9, 2013 at 01:48 PM Report #506413 Posted May 9, 2013 at 01:48 PM Boa tarde Venho pedir ajuda no seguinte. Estou a criar uma base de dados de contactos com os seguintes elementos: Nome Morada Nº Andar codigo Postal Pais Distrito Concelho Fregueseia Localidade Pretendia que ao escolher Portugal no campo Pais, no campo a seguir so me aparecessem os distritos de portugal e ao escolher um distrio, no campo Concelho so aparecessem as opçoes dos Concelhos desse disttrito. Qual sera a forma mais facil? Contruir uma base on tivesse todos os campos ou construir varias tabelas para os paises, Distritos, Concelhos.....? Como fazer com que a escolha do pais influencie a escolha do distrito, e assim consecutivamente? Peço que nao me falem em programação pois nao sei nada. De Access tenho alguns conhecimentos, mas muito redusidos. Ja consegui numa Combo Box estipular as opções ou ir ler essa informação a uma tabela. Preciso de por numa Combo Box dos Distritos a seguinte função (isto estando a trabalhar com mais do que uma tabela): Se o Pais é Portugal ler os Distritos da tabela Portugal Distritos Se o Pais é Espanha ler os Distritos da tabela Espanha Distritos
acao Posted May 14, 2013 at 12:21 PM Report #507278 Posted May 14, 2013 at 12:21 PM (edited) boas deve ter varias tabelas. depois faça as consultas no: vá a aba criar/ «assistentes de consultas» ou «estrutura de consultas» juntando os campos necessario, eu prefiro a estrutura de consultas. referente a carregar as combos filtradas por outra combo faça assim: abra o form na vista de extrutura/ aba verCodigo .... que abre uma tela aonde se insere o codigo. na parte de cima tem duas combos, na esq. selecione a sua combo que apresenta o valor a filtrar, na drt. selecione o evento que neste caso é «BeforeUpdate» e adapte o cod. Private Sub AsuaComboComOValorFiltro_BeforeUpdate(Cancel As Integer) Me.AsuaComboqueApresentaOsDados.RowSource = "SELECT SeuCampoquequerApresentar FROM NomeDaSuaConsulta WHERE NomedoCampoQueTemOFiltro = '" & Me.AsuaComboComOValorFiltro.Text & "';" Me.AsuaComboqueApresentaOsDados.Requery End Sub cumps acao Edited May 14, 2013 at 12:40 PM by acao
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now