Hello and welcome to our community! Is this your first visit?
Enjoy an ad free experience by logging in. Not a member yet? Register.

# Thread: Easy Overtime Calculation Not Working for Me?

1. ## Easy Overtime Calculation Not Working for Me?

Hi, I am trying to get this pay rate calculator to work. The language is visual basic, but the problem I think is either the way I set it up and/or the arithmatic. It should calculate the number of hours times the pay rate of an employee. It should also calculate overtime if an employee has worked over 40 hours that they should be paid time and a half. For some reason, the calculation is wrong and I can't figure it out. If I put the pay rate was \$10 and the hours were 41, I get an answer of \$425. The result should be \$415. I would appreciate any help. Not sure what's happening here but here is my code

Code:
```Public Class Form1
Private Sub calc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles calc.Click
Dim number1 As Integer
Dim number2 As Integer
Dim overtime As Integer
Dim total As Integer
number1 = TextBox1.Text
number2 = TextBox2.Text
total = number1 * number2
overtime = ((number1 - 40) * (number2 * 1.5)) + total
If number1 > 40 Then
result.Text = "Your total pay is " & overtime
End If
If number1 <= 40 Then
result.Text = "Your total pay is " & total
End If
End Sub
End Class```

2. Code:
```        number1 = 41
number2 = 10
total = 41 * 10 //410
overtime = ((41 - 40) * (10* 1.5)) + total // 1 * 15 + 410 = 425```

#### Posting Permissions

• You may not post new threads
• You may not post replies
• You may not post attachments
• You may not edit your posts
•