I am new to all this VB coding so kindly assist. Here is the question: Given that an employee earns an arbitrary basic salary, write a program to calculate the employees net salary given that the deductions are specified as follows:

NSSA contribution is calculated at 7% of the gross salary

PAYE is calculated as specified in the tax tables below

Aids levy is calculated as 3% of your PAYE

Maximum gross salary is \$10000 and minimum is \$100

Nett Salary is given by the formulae:

Nett Salary = (Gross Salary - Pension) - (Aids Levy + PAYE)

Tax Tables - PAYE

from 0 to 300.00 multiply by 0% - \$6 000 per month

from 300.01 to 1,500.00 multiply by 20% Deduct 60.00

from 1,500.01 to 3,000.00 multiply by 25% Deduct 135.00

from 3,000.01 to 5,000.00 multiply by 30% Deduct 285.00

from 5,000.01 to 10,000.00 multiply by 35% Deduct 535.00

This is what i have so far but its not working

`````` Module Module1

Sub Main()

Dim GrossSalary As Decimal
Dim PAYEDed As Decimal
Dim AidsLevyDed As Decimal
Dim NetSalary As Decimal
Dim maxIncome As Decimal
Dim minIncome As Decimal

minIncome = 100
maxIncome = 10000
AidsLevyDed = 0.03 * PAYEDed

If GrossSalary >= minIncome Then
minIncome = GrossSalary
ElseIf GrossSalary <= maxIncome Then
maxIncome = GrossSalary
Else : Console.WriteLine("Out of Range")
End If

If GrossSalary >= 0 AndAlso GrossSalary <= 300 Then
PAYEDed = (GrossSalary * 0.0) - 0
ElseIf GrossSalary >= 300.01 AndAlso GrossSalary <= 1500 Then
PAYEDed = (GrossSalary * 0.2) - 60
ElseIf GrossSalary >= 1500.01 AndAlso GrossSalary <= 3000 Then
PAYEDed = (GrossSalary * 0.25) - 135
ElseIf GrossSalary >= 3000.01 AndAlso GrossSalary <= 5000 Then
PAYEDed = (GrossSalary * 0.3) - 285
ElseIf GrossSalary >= 5000.01 AndAlso GrossSalary <= 10000 Then
PAYEDed = (GrossSalary * 0.35) - 535
Else : Console.WriteLine("Invalid Input")
End If

Console.Out.Write("Enter Gross Salary: ")

NetSalary = (GrossSalary - NSSADed) - (AidsLevyDed + PAYEDed)

End Sub
End Module
``````

If i run the program, this is what im getting:
Enter Gross Salary: 5500