AccessXP and Group control

[bobh]

Hi All,

In AccessXP I put a option group control on a form and using vba I
wrote Case logic. Neither the On-Click or the After Update event of the
control kick off the vba code. What am I missing.

Option Group control name = grpView

On-click or After-update vba code
Select Case grpView
Case 1
Docmd.OpenForm "frmViewClients"
Case 2
Docmd.OpenForm "frmViewAgents"
End Select

thanks for your help
bobh.

[jahoobob via AccessMonster.com]

Try placing the code you have for Case 1 on the OnMouseDown property of the 1
option check box and do the same for Case 2 on the 2 option box.

bobh wrote:

>Hi All,

In AccessXP I put a option group control on a form and using vba I
wrote Case logic. Neither the On-Click or the After Update event of the
control kick off the vba code. What am I missing.

Option Group control name = grpView

On-click or After-update vba code
Select Case grpView
Case 1
Docmd.OpenForm "frmViewClients"
Case 2
Docmd.OpenForm "frmViewAgents"
End Select

thanks for your help
bobh.

--
Message posted via http://www.accessmonster.com

[salad]

bobh wrote:

Hi All,

In AccessXP I put a option group control on a form and using vba I
wrote Case logic. Neither the On-Click or the After Update event of the
control kick off the vba code. What am I missing.

Do you have any options associated with/within the frame?

If you do have some options, click on them. Perhaps the values aren't 1
and 2.

Open up th ecode window and on the vertical bar next to
Select Case grpView
depress the mouse. This will put a red dot next to the command. Now
save and run. This should step you throught the code. If no code gets
executed, you know you are doing something incorrect.

>
Option Group control name = grpView

On-click or After-update vba code
Select Case grpView
Case 1
Docmd.OpenForm "frmViewClients"
Case 2
Docmd.OpenForm "frmViewAgents"
End Select

thanks for your help
bobh.

[bobh]

Putting the code in debug mode did nothing, it never got kicked-off.
What I found was I have to have the 'Allow Edits' at the form level set
to 'yes'. The on-click and the after-update event now work form the
option group control. Before I set the Allows edits to yes neither the
check box or button controls would work as well.
Seems very odd that I need to have Allow Edits set to yes at the form
level, I don't remember having to do that in Access97
bobh.

salad wrote:

bobh wrote:

Hi All,

In AccessXP I put a option group control on a form and using vba I
wrote Case logic. Neither the On-Click or the After Update event of the
control kick off the vba code. What am I missing.

Do you have any options associated with/within the frame?

If you do have some options, click on them. Perhaps the values aren't 1
and 2.

Open up th ecode window and on the vertical bar next to
Select Case grpView
depress the mouse. This will put a red dot next to the command. Now
save and run. This should step you throught the code. If no code gets
executed, you know you are doing something incorrect.

Option Group control name = grpView

On-click or After-update vba code
Select Case grpView
Case 1
Docmd.OpenForm "frmViewClients"
Case 2
Docmd.OpenForm "frmViewAgents"
End Select

thanks for your help
bobh.