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]Alterar botão de opção para texto

    Compartilhe

    ARGONZALE
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 81
    Registrado : 21/05/2015

    [Resolvido]Alterar botão de opção para texto

    Mensagem  ARGONZALE em Qui 01 Fev 2018, 13:30

    Prezados, bom dia.

    Como faço para alterar um botão de opção / alternância para texto no Formulário?

    Tentei da seguinte forma mas não deu certo:

    Private Sub Form_Load()

    If Me.Ctl500mlAgua.Value = True Then
    Me.Texto1 = " COM 500ML DE ÁGUA"

    ElseIf Me.Ctl500mlAgua.Value = False Then
    Me.Texto1 = ""
    End If

    Obs: Criei o campo Texto1 para ele substituir quando o botão de opção / alternância for true ou false.


    .................................................................................
    "Fé em Deus que ele é justo"
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  FabioPaes em Qui 01 Fev 2018, 14:31

    Veja esse Teste que fiz aqui no evento apos atualizar do Botão:

    Private Sub Ativar_Desativar9_AfterUpdate()
    If Me.Ativar_Desativar9 = True Then
      Me.Texto4 = "Ativado"
    Else
       Me.Texto4 = "Desativado"
    End If
    End Sub


    Siga o exemplo e adapte para seu evento pretendido.


    .................................................................................
    _____________________________________________________________________
    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!

    ARGONZALE
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 81
    Registrado : 21/05/2015

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  ARGONZALE em Qui 01 Fev 2018, 15:25

    Boa tarde Fabio,

    Infelizmente seu modelo não funcionou.

    Vou detalhar melhor o que preciso:

    Tenho um BD de vendas de sucos. Neste BD tenho os botões de alternância para:
    500ml com agua
    1 Litro com agua
    500ml com leite
    1 litro com leite

    Ocorre que no formulário de vendas criei um subformulário de exibição onde os produtos lançados aparecem de forma escrita.

    Hoje está assim:
    01 Suco de Limão - botão: 500 ml com agua

    Queria que aparecesse:
    01 Suco de Limão de 500 ml com agua ( de forma escrita )

    Ou seja, substituir o botão por um txt no resultado do formulário de exibição.


    .................................................................................
    "Fé em Deus que ele é justo"
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  FabioPaes em Qui 01 Fev 2018, 18:09

    Amigo, continuo sem entender nada! Pois o que passei funciona perfeitamente!

    Poste Print da tela ou o Aplicativo, somente as partes envolvidas na dúvida!


    .................................................................................
    _____________________________________________________________________
    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!

    ARGONZALE
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 81
    Registrado : 21/05/2015

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  ARGONZALE em Qui 01 Fev 2018, 18:59

    Prezado Fabio,

    É difícil explicar então estou postando uma cópia de parte do meu BD que ainda não finalizei.

    Meu BD contem 4 formulários que depois vou aumentar.

    Formulário de Vendas - principal;
    Formulário 1Sucos - Vinculado
    Formulário Detvendas Sucos - Subformulário;
    Formulário DetVendas ExibSucos - exibição e é neste que está ocorrendo o problema.

    Repare mesmo estando como formulário Contínuo ele não altera o produto e também não altera a informação que preciso.

    Coloquei no evento Private Sub Form_Load() para que pudesse alterar o botão de alternância para texto utilizando o campo Texto1.
    Anexos
    Database18.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (184 Kb) Baixado 3 vez(es)


    .................................................................................
    "Fé em Deus que ele é justo"
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  FabioPaes em Qui 01 Fev 2018, 19:20

    Desculpe amigo, terá que explicar de forma detalhada como proceder dentro dos seus formulários, bem como o que pretende que aconteça! So mandando o arquivo eu estou perdido dentro do App sem saber o que fazer!


    .................................................................................
    _____________________________________________________________________
    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!

    ARGONZALE
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 81
    Registrado : 21/05/2015

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  ARGONZALE em Sex 02 Fev 2018, 00:26

    Boa noite Fabio,

    O que pretendo é alterar o botão de alternância para escrita.

    Botão [500ml Água] será alterado para forma escrita 500 ml de água.

    A unica forma que consegui fazer isso foi no relatório ao imprimir. Substituí o botão por um campo txt assim:

    Private Sub Detalhe_Print(Cancel As Integer, PrintCount As Integer)
    If Me.Ctl500mlAgua.Value = True Then
    Me.Texto1 = " COM 500ML DE ÁGUA"

    ElseIf Me.Ctl500mlAgua.Value = False Then
    Me.Texto1 = ""
    End If

    Dentro do SubFormulário "Pedidos" é onde deveria acontecer esta troca. O que é botão vira escrita, como se fosse um relatório do que está sendo vendido.

    É isso Fábio que pretendo mas não consigo fazer com que o botão seja substituído no formulário.
    Como eu disse, no relatório deu certo mas no formulário não.


    .................................................................................
    "Fé em Deus que ele é justo"
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  FabioPaes em Sex 02 Fev 2018, 12:34

    Amigo, se quer trocar o Botão por Texto, porque não coloca uma caixa de combinação onde selecionar uma das opções? Ficaria até mais Fácil!

    Pois da forma como está ficou muito confuso. Eu abri e fiquei sem saber o que fazer no formulário. Isso não é bom pro usuário final.


    .................................................................................
    _____________________________________________________________________
    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!

    ARGONZALE
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 81
    Registrado : 21/05/2015

    Re: [Resolvido]Alterar botão de opção para texto

    Mensagem  ARGONZALE em Ter 06 Fev 2018, 15:56

    Boa tarde Fábio,

    Este BD está sendo projetado pelo usuário final.

    Também sei que uma caixa de combinação seria melhor pois apresenta o resultado em forma de texto e resolveria meus problemas mas a pedido do cliente foi criada as opções de seleção através de Botões de Alternância e com alguns cliques a venda estaria concretizada.

    Desta forma foi feita e ao visualizar o relatório, em modo de impressão, com ajuda do Sr. Avelino Sampaio consegui alterar o botão para texto e ficou muito bom.

    O que eu queria é que durante a venda o usuário pudesse ver o que está vendendo e ao invés de mostrar os botões de alternância aparecesse textos no subformulário.

    Tentei utilizar o mesmo recurso que o utilizado no relatório mas , sem sucesso.

    De qualquer forma Fábio, eu agradeço e espero sempre encontrar pessoas assim dispostas a ajudar o próximo.

    Vou encerrar este tópico e tentar mudar a forma como os produtos ficarão dispostos no subformulário.

    Muito obrigado Fábio.


    .................................................................................
    "Fé em Deus que ele é justo"

      Data/hora atual: Sab 24 Fev 2018, 13:58