Currency value symbols

[Xenix]

I have a form that you select a currency and the whole quotation changes for that currency but I want to show the correct currency symbol after I sellect the currency, I have this procedure but I don't think my code is correct because it doe's not work

Private Sub SubTotal_AfterUpdate()
If Forms!Quotation!currencynote = "GBP" Then
Me.Markup.Format = "£#####;0"
ElseIf Forms!Quotation!currencynote = "USD" Then
Me.Markup.Format = "$#####;0"
ElseIf Forms!Quotation!currencynote = "JPY" Then
Me.Markup.Format = "Y#####;0"
ElseIf Forms!Quotation!currencynote = "EUR" Then
Me.Markup.Format = "€#####;0"
Else: Me.Markup.Format = "#####;0"
End If
End Sub

Regards

Mike

 

[Rich]

Shouldn't it be Me.Markup=Format(MyField,"$#####;0" )?

 

[Xenix]

Thank you Rich,

It should be:
Me.Markup.Format = "£#,##;0.00"

works fine now, I don't really know what I did wrong. But it is working fine now.

Thank you for your time.

Mike