MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    avatar
    gokusander
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 21/04/2012

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  gokusander em 27/7/2020, 13:11

    Bom dia, começando hoje as dúvidas sobre um sistema de gestão para polos de faculdade. É algo particular, apenas para administração.

    Gostaria de saber como poderia fazer ao clicar na caixa de seleção "Bolsa 30%" o valor que está no campo "Mensalidade" seja atualizado conforme o desconto da bolsa.

    Esse campo "Mensalidade" é atualizado após alterar a seleção do curso na Caixa de Combinação, onde inseri seguintes códigos:

    Código:
    Me.txtDuracao = Me.Curso.Column(2)
    Me.txtSemestres = Me.Curso.Column(3)
    Me.txtMensalidade = Me.Curso.Column(4)

    Assim, gostaria de saber se é possível atualizar esses valores da mensalidade após clicar na caixa de seleção.

    Obrigado desde já


    Última edição por gokusander em 28/7/2020, 13:33, editado 1 vez(es)
    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 821
    Registrado : 11/11/2009

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty Re: [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  scandinavo em 27/7/2020, 14:45

    teste no evento ao clicar

    if me.suacaixadeseleção =-1 then

    Me.txtMensalidade = Me.Curso.Column(4)-(Me.Curso.Column(4)*30)
    else
    Me.txtMensalidade = Me.Curso.Column(4)
    end if

    gokusander gosta desta mensagem

    avatar
    gokusander
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 21/04/2012

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty Re: [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  gokusander em 27/7/2020, 19:01

    Funcionou certinho, muito obrigado.

    Só uma observação, tive que alterar após o "30", coloquei " /100" porque esta dando resultado #######

    Código:
    If Me.cxBolsa30 = -1 Then

    Me.txtMensalidade = Me.Curso.Column(4) - (Me.Curso.Column(4) * 30 / 100)
    Else
    Me.txtMensalidade = Me.Curso.Column(4)
    End If

    Mas funcionou , muito obrigado.

    Aproveitando a mensagem, outra dúvida:

    1. Adicionei duas caixas de seleção: 30% e 50%. Como poderei bloquear selecionar as duas? No caso, poderá apenas selecionar 1 ou nenhuma, mas nunca as duas.

    2. Quando seleciono a 30%, ele calcula corretamente o valor. Mas, após alterar o nome do curso (que automaticamente altera o valor da mensalidade), ele é alterado para o valor cheio. Assim tenho que desmarcar e marcar novamente o 30% ou 50%. É possível que ele calcule automaticamente após a atualização do curso?

    Obrigado

    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 821
    Registrado : 11/11/2009

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty Re: [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  scandinavo em 27/7/2020, 22:18

    eu usaria então um grupo de opção e nao caixa de seleção.
    poste uma parte do seu projeto.
    avatar
    gokusander
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 21/04/2012

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty Re: [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  gokusander em 28/7/2020, 02:25

    Em anexo a copia do arquivo. Estou no inicio ainda
    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 821
    Registrado : 11/11/2009

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty Re: [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  scandinavo em 28/7/2020, 13:16

    Adicionei um capo a tabela matricula para armazenar o valor escolhido para a bolsa. E como padrão deixei como pagamento integral.
    Anexos
    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  AttachmentSistema MAtriculas.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (57 Kb) Baixado 7 vez(es)

    gokusander gosta desta mensagem

    avatar
    gokusander
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 21/04/2012

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty Re: [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  gokusander em 28/7/2020, 13:33

    Bom dia, excelente ideia kkkkk, não tinha pensado nisso!!

    Muito Obrigado!!
    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 821
    Registrado : 11/11/2009

    [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção  Empty Re: [Resolvido] Alterar valor de um Campo após selecionar Caixa de Seleção

    Mensagem  scandinavo em 28/7/2020, 15:34

    é isso ai ... Valeu pelo retorno.

      Data/hora atual: 30/11/2020, 04:22