poliana_2502 Posted November 13, 2011 Report Share Posted November 13, 2011 (edited) Pessoal, boa tarde.Estou tendo um probleminha no final de um cálculo em um formulário:Private Sub botaocalcularsalario_Click()If salariobruto + valordependentes <= 800 Theninss.Value = 0.08ElseIf salariobruto + valordependentes > 801 <= 1200 Theninss.Value = 0.09ElseIf salariobruto + valordependentes > 1200 Theninss.Value = 0.1End IfIf salariobruto + valordependentes <= 1200 Thenirrf.Value = 0ElseIf salariobruto + valordependentes > 1201 <= 3000 Thenirrf.Value = 0.1ElseIf salariobruto + valordependentes > 3001 Thenirrf.Value = 0.15End Ifsalarioliquido.Value = Val(salariobruto) + Val(valordependentes) * (inss + irrf)End Sub***Linha com problema em negrito***No campo SALARIO LIQUIDO deve entrar a conta: SALÁRIO BRUTO + VALOR DEPENDENTES, com o desconto do INSS e do IRRF.Simplismente não funciona.Alguém me ajuda?Desde já agradeço. Edited November 13, 2011 by poliana_2502 Quote Link to comment Share on other sites More sharing options...
Question
poliana_2502
Pessoal, boa tarde.
Estou tendo um probleminha no final de um cálculo em um formulário:
Private Sub botaocalcularsalario_Click()
If salariobruto + valordependentes <= 800 Then
inss.Value = 0.08
ElseIf salariobruto + valordependentes > 801 <= 1200 Then
inss.Value = 0.09
ElseIf salariobruto + valordependentes > 1200 Then
inss.Value = 0.1
End If
If salariobruto + valordependentes <= 1200 Then
irrf.Value = 0
ElseIf salariobruto + valordependentes > 1201 <= 3000 Then
irrf.Value = 0.1
ElseIf salariobruto + valordependentes > 3001 Then
irrf.Value = 0.15
End If
salarioliquido.Value = Val(salariobruto) + Val(valordependentes) * (inss + irrf)
End Sub
***Linha com problema em negrito***
No campo SALARIO LIQUIDO deve entrar a conta: SALÁRIO BRUTO + VALOR DEPENDENTES, com o desconto do INSS e do IRRF.
Simplismente não funciona.
Alguém me ajuda?
Desde já agradeço.
Edited by poliana_2502Link to comment
Share on other sites
0 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.