VBA Function Subroutine

[mabernathy]

I need to do the following. I've attached a screenshot of what I have done, but I know it's not correct. Any advice? Thanks.

Write a VBA Function subroutine called Tax that takes a single argument Gross Income of type Currency. It should calculate the tax on any income using the following tax schedule:

If income is less than or equal to $15,000, Tax is $0

If income is greater than $15,000 and less than or equal to $75,000, the tax is 15% of all income greater than $15,000

If income is greater than $75,000, the tax is 15% of all income between $15,000 and $75,000 plus 20% of all income greater than $75,000

Then write a CalcTax subroutine that asks the user for his income, gets the function subroutine to calculate the tax on this income, and reports the tax in a message box.

 

[RoryA]

You should be using:

If ... Then

ElseIf ... Then

Else

End If

and not separate If statements.