label and control only visible when 2 fields equal 1

[wz]

I am trying to have a label and a field (for input) only appear on the screen when two fields do not equal - any help?

example:

regular hours 40
on duty hours 40

(no label)

but if

regular hours 40
on duty hours 38

I would like a label to appear "please write up explation" as well as the field then appear for end user to type into.

(I do not want to use a message box)

(I have both text box & field on my form but I am having trouble with this)

wz

 

[TheAceMan1]

How are ya wz . . .

[ol][li]In the code module of the form, copy/paste the following routine:

[blue]Public Sub ShowCtls()
   Dim flg As Boolean
   
   If Me![Regular Hours] <> Me![On Duty Hours] Then flg = True
   Me![[purple][B][I]LabelName[/I][/B][/purple]].Visible = flg
   Me![[purple][B][I]TextboxName[/I][/B][/purple]].Visible = flg

End Sub[/blue]

[/li]
[li]Finally, in the [blue]AfterUpdate[/blue] events of [blue]Regular Hours[/blue] and [blue]On Duty Hours[/blue] and the forms [blue]On Current[/blue] event, copy/paste the following line:

[blue]   Call ShowCtls[/blue]

[/li][/ol]
[blue]Your Thoughts? . . .[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886

 

[wz]

YES!!! THANK YOU SO MUCH!!!! wz