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]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1007
    Registrado : 23/08/2010

    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  Mylton 8/7/2016, 22:49

    Boa noite
    Quando escolhemos uma opção sim/não esta guarda um valor.
    Gostaria que ao invés de guardar esse valor, que registrasse um texto no seu respectivo campo da tabela.
    No exemplo...
    Temos check box1, 2 e 3, com edema, calor e deformidade.
    Gostaria que quando escolhesse a check box 1 registrasse com/sem edema.
    Gostaria que quando escolhesse a Temos check 2 registrasse Temos check box1, 2 com/sem calor.
    Gostaria que quando escolhesse a Temos check box 3 registrasse com/sem deformidade.

    Como implemento essa rotina?
    Obrigado
    Anexos
    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela AttachmentSelecao.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (177 Kb) Baixado 4 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty Re: [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  FabioPaes 9/7/2016, 15:07

    Foi o que me veio a Cabeça amigo, provavelmente ha outras formas...
    Anexos
    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela AttachmentSelecao.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (27 Kb) Baixado 12 vez(es)


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1007
    Registrado : 23/08/2010

    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty Re: [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  Mylton 9/7/2016, 15:40

    Perfeito.
    Só um detalhe... perfumaria...apresentação...rsrs..
    Coloquei 2 figuras para cada opção.
    Quando "clico" na opção escolhe-se uma delas.
    Navegando vai ver.
    Agora ... teria alguma forma de clicar nas figuras e escolher como se tivesse clicado na opção?
    Anexos
    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela AttachmentSelecaoTeste2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (38 Kb) Baixado 2 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty Re: [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  FabioPaes 9/7/2016, 16:12

    Rerererereree, e pq não falou antes heim???? Seu tópico mudou completamente!


    Da forma como quer, não ha mais a necessidade de ter uma Opção de Seleção! bastando apenas as Duas Imagens (da forma como esta) e do lado delas a Descrição. E Ao clicar em cada uma ele altera os campos, assim:


    Na Imagem de OK: Ao clicar coloque:

    Private Sub ImagemS2_Click()
    Me.teste2 = "Com Calor"
    Me.ImagemS2.Visible = False
    Me.ImagemN2.Visible = True

    End Sub


    Na imagem de X coloque:

    Private Sub ImagemN2_Click()
    Me.teste2 = "Sem Calor"
    Me.ImagemS2.Visible = True
    Me.ImagemN2.Visible = False

    End Sub


    Assim, se clicar no OK, ele Atualiza o Campo para Com Calor, Oculta a imagems2 e exibe a ImagemN2.

    Ao clicar na ImagemN2, ele Atualiza o Campo para Sem Calor, Oculta a ImagemN2 e Exibe a ImagemS2.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1007
    Registrado : 23/08/2010

    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty Re: [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  Mylton 9/7/2016, 16:33

    Adaptei e rodou.
    Só não entendi o porque quando navegamos nas opções anteriores não vemos o escolhido na imagem.
    Anexos
    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela AttachmentSelecaoTeste3.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (102 Kb) Baixado 3 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty Re: [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  FabioPaes 9/7/2016, 18:17

    Isso pq vc nao colocou a condição para as imagens no Evento no Atual do seu Formulario....


    No Evento No atual do Seu Formulario, coloque:

    Private Sub Form_Current()

    If Me.teste1 = "Com edema" Then
    Me.ImagemS1.Visible = False
    Me.ImagemN1.Visible = True
    Else
    Me.ImagemS1.Visible = True
    Me.ImagemN1.Visible = False
    End If


    If Me.teste2 = "Com Calor" Then
    Me.ImagemS2.Visible = False
    Me.ImagemN2.Visible = True
    Else
    Me.ImagemS2.Visible = True
    Me.ImagemN2.Visible = False
    End If

    If Me.teste3 = "Sem deformidade" Then
    Me.ImagemS3.Visible = False
    Me.ImagemN3.Visible = True
    Else
    Me.ImagemS3.Visible = True
    Me.ImagemN3.Visible = False
    End If

    End Sub

    Assim ao navegar ele oculta o que nao deve ser visto.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1007
    Registrado : 23/08/2010

    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty Re: [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  Mylton 9/7/2016, 18:23

    Show.
    Valeu.
    Gde abs

    Conteúdo patrocinado


    [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela Empty Re: [Resolvido]Trocar o valor da escolha da caixa de seleção por texto na tabela

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 09:37