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: (1) if income is less than or equal to $15,000, there is no tax (2) 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 (3) 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 Calc Tax 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.

the answer is d underlined.

the benefits of raising bc’s minimum wage to $15 through a

series of pre-announced staged increases far outweigh the likely

costs. claims that such an increase will lead to massive job losses

in low-wage sectors of the economy are not credible.

• an increase to $15 would result in some job losses. however,

the likely impact is less than a 1 per cent reduction in the overall

provincial employment rate, and a 7.6 per cent reduction in the

employment rate for those currently making between $10.25

and $15 per hour.

• the large job loss impacts predicted by some opponents of

minimum wages misrepresent the existing economic research. in

reading and using that research, it is important to recognize that

estimates showing job loss effects of minimum wage increases

apply only to teenagers. estimated effects for young adult and

adult workers range from insignificant to non-existent.

• focusing on teenage workers plays up an inaccurate stereotype

about who earns very low wages in bc and leads to exaggerated

claims about job losses. only 26 per cent of those currently making

between $10.25 and $12 are teenagers, and only 5 per cent

of those making between $12 and $15 are teenagers.