Caros, boa tarde!
Tenho um formulário de Check List que avalia o desempenho dos funcionários através de checkbox, onde cada uma deles tem um valor que ao pressona-los são descontados os pontos. e tem alguns considerados erros graves que zeram o formulário de cara
Nesse mesmo form tem uma caixa de texto que tem como valor padrão 100 (pois cada funcionário começa com 100%) e é dessa caixa que eu vou tirando os pontos.
Gostaria de saber como fazer para que o valor nessa caixa de texto não fique negativo, porem não pode ser através de regra de validação (>=0) porque senão apresentara erro.
Sei que parece estranho a pergunta, pois ao chegar no valor zero eu deveria parar a avaliação, porem, é necessário que todos os pontos sejam verificados, para que depois eu possa extrair um relatório com os itens mais pontuados e assim focar nos pontos mais críticos.
O vb das checkbox para avaliação é:
If Item1 Then
Me.Nota.Value = Me.Nota.Value - 5
Else
Me.Nota.Value = Me.Nota.Value + 5
End If
o vb da checkbox que zera a avaliação:
If Item 2 Then
Me.Nota.Value = 0
Else
Me.Nota.Value = 0
End If
E a caixa de texto (nota) tem o valor padrão 100 (Para que ao iniciar o form o numero ja esteja la)
agora preciso de um vb para que os numeros não apareçam negativos
Tenho um formulário de Check List que avalia o desempenho dos funcionários através de checkbox, onde cada uma deles tem um valor que ao pressona-los são descontados os pontos. e tem alguns considerados erros graves que zeram o formulário de cara
Nesse mesmo form tem uma caixa de texto que tem como valor padrão 100 (pois cada funcionário começa com 100%) e é dessa caixa que eu vou tirando os pontos.
Gostaria de saber como fazer para que o valor nessa caixa de texto não fique negativo, porem não pode ser através de regra de validação (>=0) porque senão apresentara erro.
Sei que parece estranho a pergunta, pois ao chegar no valor zero eu deveria parar a avaliação, porem, é necessário que todos os pontos sejam verificados, para que depois eu possa extrair um relatório com os itens mais pontuados e assim focar nos pontos mais críticos.
O vb das checkbox para avaliação é:
If Item1 Then
Me.Nota.Value = Me.Nota.Value - 5
Else
Me.Nota.Value = Me.Nota.Value + 5
End If
o vb da checkbox que zera a avaliação:
If Item 2 Then
Me.Nota.Value = 0
Else
Me.Nota.Value = 0
End If
E a caixa de texto (nota) tem o valor padrão 100 (Para que ao iniciar o form o numero ja esteja la)
agora preciso de um vb para que os numeros não apareçam negativos