MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Caixa de combinação com lista de valores

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Caixa de combinação com lista de valores Empty Caixa de combinação com lista de valores

    Mensagem  spp 19/2/2012, 21:51

    Boa noite a todos!

    Tenho uma caixa de combinação com lista de valores "M";"F".Gostaria de quando selecionar F ou M vizualizase uma imagem, alguem pode me ajudar.

    Obrigado desde já.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  criquio 19/2/2012, 22:39

    Você quer pegar as imagens de uma pasta e usá-las de forma desvinculada ou tem um controle imagem para cada uma delas no formulário? Ou seja, você quer carregar um controle com uma imagem ou tornar uma visível e a outra invisível dependendo da escolha?

    Procure ser sempre o mais detalhista possível afim de facilitar o entendimento.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  spp 19/2/2012, 23:15

    criquio

    Tentei desta forma em após atualizar:
    If Me.Sexo.Value = "M" Then
    Me.Masculino.Visible = True
    Me.Feminino.Visible = False
    Else
    Me.Masculino.Visible = False
    Me.Feminino.Visible = True

    If Me.Sexo.Value = "F" Then
    Me.Feminino.Visible = True
    Me.Masculino.Visible = False
    Else
    Me.Feminino.Visible = False
    Me.Masculino.Visible = True

    End If
    End If

    Mas quando muda em outros Registro muda em todos

    Agradeço desde já

    Como mudar o tópico para Formulário
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  criquio 19/2/2012, 23:28

    Não tinha visto anteriormente que estava em outra sala. Grato pelo aviso.

    Quanto à dúvida, o amigo só precisa do primeiro bloco If, pois o Else já muda a condição quando for outra letra. Outra coisa que me pareceu quando o amigo diz que quando muda em um registro, muda nos outros tambem. Por acaso está usando formulário contínuo? Há diferença entre formulário simples e formulário contínuo nesses casos. Por isso falei para sempre detalhar o mais que puder.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  spp 19/2/2012, 23:34

    criquio

    E desta forma:
    If Me.Sexo.Value = "M" Then
    Me.Masculino.Visible = True
    Me.Feminino.Visible = False

    If Me.Sexo.Value = "F" Then
    Me.Feminino.Visible = True
    Me.Masculino.Visible = False

    End If
    End If
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  criquio 19/2/2012, 23:43

    Eu prefiro usar um bloco If apenas:

    If Me.Sexo.Value = "M" Then
    Me.Masculino.Visible = True
    Me.Feminino.Visible = False
    Else
    Me.Feminino.Visible = True
    Me.Masculino.Visible = False
    End If


    Mas lembre-se que, como eu falei, há diferença de funcionamento em formulário simples e formulários contínuos. Em formulários contínuos, ao alterar um registro, alterará nos outros tambem, a não ser que esteja usando uma versão do Access posterior à 2003. A versão 2007 e 2010 permite alterar o controle imagem via vba, utilizando uma função, em formulários contínuos.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  spp 20/2/2012, 00:26

    criquio

    Não deu certo
    quando muda para "F" em outro registro muda a imagem nos outros tambem gostaria que funcionasse independente, o registro que for selecionado "M" manteria a imagem corespondente.Pode ser que na caixa de combinação esta com lista de Valores "M";"F"
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  criquio 20/2/2012, 00:42

    Você ainda não falou se está usando formulário simples ou formulário contínuo. Acredito que talvez seja o caso de você ter um campo na tabela com o sexo e ter um campo no formulário vinculado ao campo do sexo na tabela. Aí pode utilizar o código acima no evento "No atual" do formulário.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  spp 20/2/2012, 00:59

    criquio

    Estou usando em formulário simples e esta vinculado a tabela, so que na tabela na escolha do sexo eu coloquei em pesquisa caixa de combinação (Lista De Valores) origem da linha "F";"M" e não tabela/consulta, talvez poder por isto que não funciona. quanto ao evento no atual já tinha colocado mas tambem não funcionou.

    Fiz anteriormente Com Sim/não e funcionou perfeitamente.


    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  criquio 20/2/2012, 01:51

    A tabela deve ficar como texto normal. A combo deve ficar apenas no formulário. Tente assim.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  spp 20/2/2012, 02:05

    criquio

    E desta forma que esta(texto na Tabela),tirei da lista de campos para o formulário.
    porque funciona com tabela/consulta

    If Me.CódigodaModalidade.Column(1) = "Nomedoselecionar" Then
    avatar
    spp
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 24/10/2011

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  spp 20/2/2012, 18:49

    criquio

    Consegui resolver desta forma

    Caixa de combinação após atualizar

    If Me.Sexo.Value = "M" Then
    Me.Masculino.Visible = True
    Me.Feminino.Visible = False
    Else
    Me.Masculino.Visible = False
    Me.Feminino.Visible = True
    End If

    No atual

    If IsNull(Sexo.Value) Or IsEmpty(Sexo.Value) Then
    Me.Masculino.Visible = False
    Me.Feminino.Visible = False

    ElseIf Me.Sexo.Value = "M" Then
    Me.Masculino.Visible = True
    Me.Feminino.Visible = False

    Else
    Me.Masculino.Visible = False
    Me.Feminino.Visible = True
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  criquio 20/2/2012, 18:53

    Ótimo. Agradecemos pelo retorno. Nada melhor do que fazer testes e mais testes, afinal, cada caso é um caso e cada aplicação tem uma montagem diferente, não?


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    Conteúdo patrocinado


    [Resolvido]Caixa de combinação com lista de valores Empty Re: [Resolvido]Caixa de combinação com lista de valores

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 05:18