... dipende da come l'hai scritto... comunque:

MailBody = Replace(MailBody, "[totaleeurocarta]", Replace(VisualizzaPrezzo(TotaleIvato),",","."), 1, -1, 1)