MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem?

    avatar
    alantardivo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem? Empty [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem?

    Mensagem  alantardivo em 8/12/2019, 22:58

    Olá pessoal, boa noite!

    Gostaria de pedir ajuda de vocês em relação a minha caixa de listagem. Eu gostaria que quando minha caixa de listagem recebesse dados o meu rotulos que faz parte do mesmo form modifiquem. Quero que 1 fique visivel e os outros 2 fiquem invisivel. Se a caixa de listagem estiver vazia modifique as visualizações do rotulo e assim por diante.

    em anexo vocês poderão vê melhor o que estou falando
    seria sobre o caixa está livre ou não.

    Desde já agradeço muito vocês sempre me ajudam bastante.
    Anexos
    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem? Attachmentexemplo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (92 Kb) Baixado 3 vez(es)
    Maicon
    Maicon
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 226
    Registrado : 08/09/2012

    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem? Empty Re: [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem?

    Mensagem  Maicon em 9/12/2019, 00:24

    Use a propriedade .caption :  
    Exemplo :

    Código:


    Private Sub SuaRotina()

    ' Presumindo que seu controle seja uma caixa de combinação os valores abaixo seriam da primeira coluna
    ' "0"; Caixa Livre "1" Caixa Ocupado  "2" Caixa Fechado

    Select Case Me. Me."SuaCaixadeCombinação".Column(1).value
    Case Is = 0
    Me.rtl_StatusCaixa.Caption = "Caixa Livre"
    Case Is = 1
    Me.rtl_StatusCaixa.Caption = "Caixa Ocupado"
    Case Is = 2
    Me.rtl_StatusCaixa.Caption = "Caixa Fechado"
    End Select

    End Sub


    Outros exemplos : "https://www.maximoaccess.com/t16874-resolvidoalterar-legenda-de-formulario-caption-atraves-de-outro-formulario"



    .................................................................................
    "O talento vence jogos, mas só o trabalho em equipe ganha campeonatos."
    Michael Jordan

    Bons Estudos.
    avatar
    alantardivo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem? Empty Re: [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem?

    Mensagem  alantardivo em 15/12/2019, 19:53

    Olá amigo, boa tarde!
    Tudo bem?

    Olhei os exemplos que me passou mais ainda não consegui concluir me entendimento. Poderia me ajudar? O que eu preciso é o seguinte.
    Eu tenho uma tela de PDV e que introduzo produtos dentro de uma caixa de listagem a partir do momento que bipo os produtos no campo código de barra. O que eu queria era os rótulo alternassem de visível para invisível a partir do momento em que minha caixa de listagem está com dado ou não.

    Exemplo:

    abri o formulário PDV, o rotulo que deve está visível é lbCaixaLivre. Agora bipei a Havaianas Top 33/4 Ad, no campo de código de barra, então ele precisa torna vísivel o lbCaixaOcupado e invisível o lbCaixaLivre.

    Seria basicamente isso mesmo. Se puder me ajudar como já está te agradeço muito! bounce
    Maicon
    Maicon
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 226
    Registrado : 08/09/2012

    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem? Empty Re: [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem?

    Mensagem  Maicon em 15/12/2019, 21:58

    Me."SeuRotulo".visible= True para exibir
    Me."SeuRotulo".Visible= False para ocultar
    Use o código acima para ocultar ou exibir os rótulos. Sem as aspas.


    .................................................................................
    "O talento vence jogos, mas só o trabalho em equipe ganha campeonatos."
    Michael Jordan

    Bons Estudos.
    avatar
    alantardivo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem? Empty Re: [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem?

    Mensagem  alantardivo em 8/1/2020, 15:49

    Valeu amigo!
    Obrigado pela ajuda!!

    Conteúdo patrocinado

    [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem? Empty Re: [Resolvido]Como modificar um rotulo quando adiciono dados a caixa de listagem?

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/2/2020, 19:34