DIm decEmployeeHours As Decimal
Dim decHourlyRate As Decimal
Dim txtOverTimeInfo as string
Dim strHourNumber as String
Dim strHourRate as String
ConSole.Write("enter a Hour number")
strHourNumber = Console.ReadLine()
decHourlyRate = Convert.ToDecimal(StrHourNumber)
Console.Write("enter a hourly pay")
strHourRate = Console.ReadLine()
decEmployeeHours = Convert.ToDecimal(strHourRate)
If decEmployeeHours > 40 And decHourlyRate < 55 Then
txtOverTimeInfo = "Over time - Eligible-Not eligible"
else if decHourlyRate > 55 Then
txtOverTimeInfo = "Over time - Egilbile"
txtOverTimeInfo = "No comment"
Console.Write(txtOverTimeInfo)