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

    Ajuda Multiplicação em VB + Formulario continuo

    avatar
    fbsfer
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 30/07/2014

    Ajuda Multiplicação em VB + Formulario continuo Empty Ajuda Multiplicação em VB + Formulario continuo

    Mensagem  fbsfer 30/8/2014, 02:42

    Boa noite, Galera.
    Primeiramente parabéns e obrigado pelos tópicos em que pesquisamos e aprendemos muito.
    Este é meu primeiro tópico, então me desculpa se eu escrever alguma besteira ou se essa dúvida ja foi respondida, procurei bastante mas não encontrei

    Bom, é o seguinte...
    Tenho uma tabela de salários de funcionários, nessa tabela constam dentre outros, os campos 'Cargo' 'SalarioBase' e 'Gratificacao', onde existem vários cargos, SalarioBase é o salário normal, e gratificação varia entre 0 a 75% de acordo com certificados, graduação, etc...

    Bom o formulário que estou precisando fazer, a princípio é para atualizar a inflação e o aumento real a cada ano, para isso imaginei um formulario continuo onde aparecem o cargo, salariobase, gratificacao(em decimal, ex 0,0 ou 0,30, etc) e um campo Total que multiplicaria 'Salariobase' pela 'Gratificacao'.

    Criei o form... o campo certinho, e em vb fiz a seguinte função ao carregar o formulario
    Dim VarGratif

    Private Sub Form_Open(Cancel As Integer)
    VarGratif = (SalarioBase * Gratificacao)
    Me.Total = VarGratif


    Bom.... por ser um formulário continuo ele deveria (pelo menos é o que eu queria que ele fizesse) fazer o cálculo para todos os cargos, no entanto ele só fez para o primeiro, e copiou o valor para os demais.

    Bom só para exemplificar melhor o que quero dizer e o que está acontecendo, abaixo como eu queria que ficasse


    Cargo                       SalarioBase            Gratificacao         Total
    Analista de Sistemas     R$ 4000,00            0,40                   R$ 1600,00
    Almorarifado                R$ 1000,00            0,00                   R$ 0,00
    Chefe de Seção           R$ 5000,00             0,40                   R$ 2000,00


    Como ficou quando executei o código
    Cargo                       SalarioBase            Gratificacao         Total
    Analista de Sistemas     R$ 4000,00            0,40                   R$ 1600,00
    Almorarifado                R$ 1000,00            0,00                   R$ 1600,00
    Chefe de Seção           R$ 5000,00             0,40                   R$ 1600,00
    rubenscouto
    rubenscouto
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 679
    Registrado : 02/10/2011

    Ajuda Multiplicação em VB + Formulario continuo Empty Re: Ajuda Multiplicação em VB + Formulario continuo

    Mensagem  rubenscouto 30/8/2014, 15:24

    pode enviar parte do bd? fica melhor analisar.
    avatar
    fbsfer
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 30/07/2014

    Ajuda Multiplicação em VB + Formulario continuo Empty Re: Ajuda Multiplicação em VB + Formulario continuo

    Mensagem  fbsfer 30/8/2014, 21:39

    Segue o arquivo, o formulário é o Frm_Salario
    rubenscouto
    rubenscouto
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 679
    Registrado : 02/10/2011

    Ajuda Multiplicação em VB + Formulario continuo Empty Re: Ajuda Multiplicação em VB + Formulario continuo

    Mensagem  rubenscouto 31/8/2014, 16:10

    pelo que entendi analisando o sistema é que o campo Total é um campo calculado. Sendo assim veja:
    clique no controle "Gratific" na aba Dados, em fonte de controle deve ficar assim:
    =[SalarioBase]*[Gratificacao]
    Faça este teste pra ver.
    avatar
    fbsfer
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 30/07/2014

    Ajuda Multiplicação em VB + Formulario continuo Empty Re: Ajuda Multiplicação em VB + Formulario continuo

    Mensagem  fbsfer 31/8/2014, 16:29

    Cara, rs me senti um idiota agora, tão fácil rs muito obrigado.... obrigado mesmo, abraços

    Conteúdo patrocinado


    Ajuda Multiplicação em VB + Formulario continuo Empty Re: Ajuda Multiplicação em VB + Formulario continuo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 10:20