Format As Currency wrong

[vic007]

Format As Currency gives the wrong answer when the value to be printed has decimals.
Dim c As Currency = 12.9999
Print "s="& Format(c, "Value: ######.#### in M", ".", False) & "!"

Gives s=Value: 36.9999.... in M! instead of 12.9999