User changes mind after AfterUpdate

[dougal via AccessMonster.com]

Hello,

I have a problem with my AfterUpdate on a combo box.

My combo box has three choices and on chosing only one of those choices 2
tick boxes become enabled. My problem lies when the user makes his choice
from the combo box, the tick boxes become active and are ticked but if the
user changes his mind and choses a different selection from the combo box,
the tick boxes become disabled but remain ticked. What do I have to do to
stop this from happening?

Any help much appreciated!

 

[Tom Lake]

Hello,

I have a problem with my AfterUpdate on a combo box.

My combo box has three choices and on chosing only one of those choices 2
tick boxes become enabled. My problem lies when the user makes his choice
from the combo box, the tick boxes become active and are ticked but if the
user changes his mind and choses a different selection from the combo box,
the tick boxes become disabled but remain ticked. What do I have to do to
stop this from happening?

Any help much appreciated!

In the AfterUpdate event, do you set the tick boxes to true based on the
combo box choice? If so, explicitly set the others to False.

Private Sub Combo0_AfterUpdate()
Select Case Combo0
Case "Set Tick 1"
Me!Tick1 = True
Me!Tick2 = False
Me!Tick3 = False
Case "Set Tick 2"
Me!Tick1 = False
Me!Tick2 = True
Me!Tick3 = False
Case "Set Tick 3"
Me!Tick1 = False
Me!Tick2 = False
Me!Tick3 = True
Case Else
End Select

End Sub

Tom Lake

 

[dougal via AccessMonster.com]

I think perhaps I'm missing something here but will attempt to explain more
clearly what I mean. My combo box has three options - "Yes", "No" and "Don't
Know". When "Don't Know" is selected two tick boxes become active using
AfterUpdate. The user then ticks the boxes. If the user then goes back to the
combo box and selects "Yes" or "No" the tick boxes become inactive but the
ticks remain in them and are recorded in the table.

Apologies if that's what you meant below, I'm a real novice at this stuff.

Hello,

[quoted text clipped - 8 lines]

Any help much appreciated!

In the AfterUpdate event, do you set the tick boxes to true based on the
combo box choice? If so, explicitly set the others to False.

Private Sub Combo0_AfterUpdate()
Select Case Combo0
Case "Set Tick 1"
Me!Tick1 = True
Me!Tick2 = False
Me!Tick3 = False
Case "Set Tick 2"
Me!Tick1 = False
Me!Tick2 = True
Me!Tick3 = False
Case "Set Tick 3"
Me!Tick1 = False
Me!Tick2 = False
Me!Tick3 = True
Case Else
End Select

End Sub

Tom Lake

 

[Klatuu]

Post your existing code in the After Update event and we can show you how to
modify it to clear the check boxes.
--
Dave Hargis, Microsoft Access MVP

I think perhaps I'm missing something here but will attempt to explain more
clearly what I mean. My combo box has three options - "Yes", "No" and "Don't
Know". When "Don't Know" is selected two tick boxes become active using
AfterUpdate. The user then ticks the boxes. If the user then goes back to the
combo box and selects "Yes" or "No" the tick boxes become inactive but the
ticks remain in them and are recorded in the table.

Apologies if that's what you meant below, I'm a real novice at this stuff.

Hello,

[quoted text clipped - 8 lines]

Any help much appreciated!

In the AfterUpdate event, do you set the tick boxes to true based on the
combo box choice? If so, explicitly set the others to False.

Private Sub Combo0_AfterUpdate()
Select Case Combo0
Case "Set Tick 1"
Me!Tick1 = True
Me!Tick2 = False
Me!Tick3 = False
Case "Set Tick 2"
Me!Tick1 = False
Me!Tick2 = True
Me!Tick3 = False
Case "Set Tick 3"
Me!Tick1 = False
Me!Tick2 = False
Me!Tick3 = True
Case Else
End Select

End Sub

Tom Lake

 

[Tom Lake]

I think perhaps I'm missing something here but will attempt to explain more
clearly what I mean. My combo box has three options - "Yes", "No" and "Don't
Know". When "Don't Know" is selected two tick boxes become active using
AfterUpdate. The user then ticks the boxes. If the user then goes back to the
combo box and selects "Yes" or "No" the tick boxes become inactive but the
ticks remain in them and are recorded in the table.

Apologies if that's what you meant below, I'm a real novice at this stuff.

Okay, try this:

Private Sub Combo0_AfterUpdate()
Select Case Combo0
Case "Don't Know"
Me!Tick1.Active = True
Me!Tick2.Active = True
Me!Tick1 = False
Me!Tick2 = False
Case "Yes", "No"
Me!Tick1 = False
Me!Tick2 = False
Me!Tick1.Active = False
Me!Tick2.Active = False
Case Else
End Select

End Sub

 

[Klatuu]

I think you meant Enabled rathter than Active
There is no Active property for controls in Access.

 

[Tom Lake]

I think you meant Enabled rathter than Active
There is no Active property for controls in Access.
--

Yup, so I did. Thanks for the correction!

Tom Lake

 

[Jeanette Cunningham]

dougal,
in the code on the after update event, at the start of the code add a line
to enable all the check boxes

Private sub ComboName_AfterUpdate()
Me.chk1.Enabled = True
Me.chk2.Enabled = True
Me.chk3.Enabled = True
'put your current code for the after update event here
End Sub

Note - replace chk1, chk2 and chk3 with the names of your check boxes.


Jeanette Cunningham -- Melbourne Victoria Australia

 

[Jeanette Cunningham]

To all,
please disregard my last post - got a bit carried with the helping others
bit.


Jeanette Cunningham -- Melbourne Victoria Australia

 

[dougal via AccessMonster.com]

Hi All,

Many thanks for all your help, I've now got it working after many hours of
tearing my hair out!

D.

To all,
please disregard my last post - got a bit carried with the helping others
bit.

Jeanette Cunningham -- Melbourne Victoria Australia

Hello,

[quoted text clipped - 8 lines]

Any help much appreciated!