Hello,
I have a little problem setting the visibility on a text box when I'm using a continous form.
I have 3 text box that change their visibility depending in the value of another field [event]. I have three options, If [event] value is 1 a field called time appears, if [event] value is 2 then a field called Distance appears and if [event] value is 3 then a field called Points appears.
Everything works fine until i go to th next record. If the first record had [event] value set to 1, Time appears correctly, but when I am on the second record and I set the [event] value to 2, then the field on all records change to Distance. How can I fix that???
I set the event procedure in after update on [event] the field that receives the value 1, 2 or 3.
The code is like that:
Private Sub Event_AfterUpdate()
If Me.Event = 1 Then
time.Visible = True
distance.Visible = false
points.visible = false
Elseif Me.event = 2 then
time.Visible = False
distance.Visible = true
points.visible = false
elseif: Me.venet = 3 then
time.Visible = false
distance.Visible = false
points.visible = true
End if
End sub
Thank you
Pau75
I have a little problem setting the visibility on a text box when I'm using a continous form.
I have 3 text box that change their visibility depending in the value of another field [event]. I have three options, If [event] value is 1 a field called time appears, if [event] value is 2 then a field called Distance appears and if [event] value is 3 then a field called Points appears.
Everything works fine until i go to th next record. If the first record had [event] value set to 1, Time appears correctly, but when I am on the second record and I set the [event] value to 2, then the field on all records change to Distance. How can I fix that???
I set the event procedure in after update on [event] the field that receives the value 1, 2 or 3.
The code is like that:
Private Sub Event_AfterUpdate()
If Me.Event = 1 Then
time.Visible = True
distance.Visible = false
points.visible = false
Elseif Me.event = 2 then
time.Visible = False
distance.Visible = true
points.visible = false
elseif: Me.venet = 3 then
time.Visible = false
distance.Visible = false
points.visible = true
End if
End sub
Thank you
Pau75