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

    Caixa de combinação com valores que faz serviços diferentes.

    avatar
    alantardivo
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 135
    Registrado : 27/02/2018

    Caixa de combinação com valores que faz serviços diferentes. Empty Caixa de combinação com valores que faz serviços diferentes.

    Mensagem  alantardivo 10/12/2018, 04:05

    Olá pessoal, bom dia!

    Eu estou trabalhando na construção de um formulário de cadastro de produto e hoje gostaria de tirar uma dúvida. Tenho hoje um caixa de combinação chamada "Produto_Servico. Nela o funcionário deve informar se o que ele está cadastrando agora é um produto ou serviço. Caso selecione "produto" dessa caixa de combinação, todos os campos permaneceram visíveis, agora, se ele selecionar a opção "serviço" alguns campos gostaria de poder coloca-los como invisíveis.

    Alguém poderia me ajudar?

    caixa de combinação = "Produto_Servico
    campos que gostaria de ocultar se selecionar "Serviço" : EstoqueMinimo, EstoqueAtual, DataValidade, ControlarEstoque, PrecoCusto, % Lucro, Tabela2, % Lucro2, Tabela3, % Lucro3.

    Desde já agradeço! santa
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10614
    Registrado : 04/11/2009

    Caixa de combinação com valores que faz serviços diferentes. Empty Re: Caixa de combinação com valores que faz serviços diferentes.

    Mensagem  JPaulo 10/12/2018, 09:51

    Olá;

    Será assim;

    Código:
    Private Sub Produto_Servico_AfterUpdate()
        Select Case Produto_Servico.Column(0)
            Case Is = "Produto" 'se escolher produto
                Me.SeuCampo1.Visible = True 'torna visivel o campo 1
                Me.SeuCampo2.Visible = True 'torna visivel o campo 2
                Me.SeuCampo3.Visible = True 'torna visivel o campo 3
                Me.SeuCampo4.Visible = False 'oculta o campo 4
                Me.SeuCampo5.Visible = False 'oculta o campo 5
            Case Is = "Serviço" 'se escolher serviço
                Me.SeuCampo1.Visible = False 'oculta o campo 1
                Me.SeuCampo2.Visible = False 'oculta o campo 2
                Me.SeuCampo3.Visible = False 'oculta o campo 3
                Me.SeuCampo4.Visible = True 'torna visivel o campo 4
                Me.SeuCampo5.Visible = True 'torna visivel o campo 5
        End Select
    End Sub


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    Caixa de combinação com valores que faz serviços diferentes. Folder_announce_new Utilize o Sistema de Busca do Fórum...
    Caixa de combinação com valores que faz serviços diferentes. Folder_announce_new 102 Códigos VBA Gratuitos...
    Caixa de combinação com valores que faz serviços diferentes. Folder_announce_new Instruções SQL como utilizar...

      Data/hora atual: 1/8/2021, 11:11