option group frame can only select once

[mokrich]

I made a group of option radio button which update mark in txt_mark textbox. It work well except that I cant reselect my option. I have to click outside the group frame first to reselect.

My simple sub is as follows;

Private Sub Frame116_AfterUpdate()
    Select Case Frame116.Value
        Case 1
            Me.txtMrkJwtBB1 = 10
        Case 2
            Me.txtMrkJwtBB1 = 8
        Case 3
            Me.txtMrkJwtBB1 = 7
        Case 4
            Me.txtMrkJwtBB1 = 6
        Case 5
            Me.txtMrkJwtBB1 = 5
        Case 6
            Me.txtMrkJwtBB1 = 4
        Case 7
            Me.txtMrkJwtBB1 = 2
    End Select
End Sub

[zmbd]

OK,
Is it that you make the selection, say the first radio button, and then it is stuck on that first radio button despite the fact that you select a different radio button;

OR

IS it that you make the selection and the Me.txtMrkJwtBB1 control doesn't change when you make the next selection?

[mokrich]

zmbd, your first option was happening. Its stuck with one click.

[zmbd]

There is a very remote possibility that the pending update event is hanging your toggles.

Most likely there is another piece of code somewhere else that is related to this control that is hanging.

Try this:
On a backup copy (my first rule, never ever do work on either the production database or the only development copy - always backup the file first!)

Debug compile first. Fix any errors.

Then:
Option 1:
Place a STOP command before your select..case statement.
When the debugger starts, [F8] thru your code. See what events are triggering. Best to have two monitors so you can have the form open in one and the VBA code in the other screen; however, try to arrange the screens so that you can see what is occurring in the form.

Option 2:
Go back into design view and open the properties for the frame. Select the "On Click" Event and then copy-n-paste the code from the "After Update" event into the "On Click" event. Then delete the "After Update" code. Go back to your properties control and double check that there is no longer anything in the "After Update" (you may need to save the form, close, and reopen). Now run your form. The disadvantage here is that the [Me.txtMrkJwtBB1] control should update immediately and that may not be what you want.