Hi
Set this on the AfterUpdate of the text box
Private Sub TextBoxABC_AfterUpdate()
If Me.TextBoxABC > 1 Then
Me.Label123.Visible = True
Else
Me.Label123.Visible = False
End If
End Sub
Set this OnLoad of the form
Me.Label123.Visible = False
Set the format of the text box to currency
Change the names
Label123 and TextBoxABC to what you have used on your form
HTH