formatcurrency not showing zero at end

[skinny monkey]

I have the following:

dim curWeeklyEarning as currency
 
    curWeeklyEarning = CCur((colHours.getTotalMinutesOfSupport / 60) * curHourlyRate)
    curWeeklyEarning = FormatCurrency(curWeeklyEarning, 2)

colHours returns a long which i multiply by an hourly rate. My problem is in the format currency, where it won't display the trailing zero. For example, if a user works 3 hours, and gets paid £6.50 per hour, the following code will return the currency of 19.5 instead of 19.50.

How can i enforce the zero on the end?