Conditional Formatting on Continuous Forms

[vlingen]

Looking for a way to set a numeric text field to either Amount.format = "Currency" or Amount.format = "General Number"

The field is on a Continuous form so I need the format to stay with the record based on my expression.

I'd like to use the Format-Conditional Formatting wizard, but that only allows for text style and color settings.

Then I tried this on the Change event of a drop down box. The drop down box is what determine the criteria, but this code below doesn't work.

Dim objFrc As FormatCondition
Set objFrc = Me![Amount].FormatConditions.Add(acExpression, Me![txtView] = "A")
Set objFrc = Me![Amount].FormatConditions.Add(acExpression, Me![txtView] = "H")

With Me![Amount].FormatConditions(0)
.Format = "Currency"
End With

With Me![Amount].FormatConditions(1)
.Format = "General Number"
End With


Any suggestions?