Happy Holidays!
I have an option group on a form. It is unbound, but the form uses a query to pass the selected radio button value to a table with:
where Frame935 holds the option group
I expect this is where part of my problem is as searching here I may not have the name for the field correct. So 1st question is how to find the name or value for an option group?
Testing the form the selected option is passed to the table and works exactly as intended. However the code does not compile and I get the error:
As a non-coder; if it is not found how come it works???
Here is the VB:
".Frame935" is highlighted when I debug and get the error.
Is this just an Access anomoly to be ignored? I'm thinking (for what it's worth) that it shouldn't be, and as there is a lot more to build in this db I want the code to be compiled.
I think Bob Larson has part of the answer here:
http://www.access-programmers.co.uk/forums/showpost.php?p=1167289&postcount=5
yet I have not enough grasp of what he has going there to apply it to my situation.
jeds
I have an option group on a form. It is unbound, but the form uses a query to pass the selected radio button value to a table with:
Code:
[Forms]![RemoveMembers]![Frame935] AS Expr2
I expect this is where part of my problem is as searching here I may not have the name for the field correct. So 1st question is how to find the name or value for an option group?
Testing the form the selected option is passed to the table and works exactly as intended. However the code does not compile and I get the error:
Compile error: method or data member not found
As a non-coder; if it is not found how come it works???

Here is the VB:
Code:
Private Sub RemoveMember_Click()
On Error GoTo RemoveMember_Click_Err
DoCmd.RunCommand acCmdRefresh
Dim reason As String
Select Case Me[COLOR=red].Frame935[/COLOR]
Case Is = 1
Frame935 = "Resigned"
Case Is = 2
Frame935 = "Probation Vote"
Case Is = 3
Frame935 = "Dismissed"
Case Else
Frame935 = "Deceased"
End Select
Dim Member As String
Member = [FirstName] & " " & [LastName]
Beep
If MsgBox("Are you sure you want to remove " & Member & " from the active member list? This cannot be reversed!" & vbCrLf & "Click Cancel to add a comment.", vbOKCancel, "Please Confirm") = vbOK Then
DoCmd.OpenQuery "PastMemberQ", acViewNormal, acEdit
DoCmd.OpenQuery "RemoveFromMembers", acViewNormal, acEdit
Else
Exit Sub
End If
RemoveMember_Click_Exit:
Exit Sub
RemoveMember_Click_Err:
MsgBox Error$
Resume RemoveMember_Click_Exit
End Sub
".Frame935" is highlighted when I debug and get the error.
Is this just an Access anomoly to be ignored? I'm thinking (for what it's worth) that it shouldn't be, and as there is a lot more to build in this db I want the code to be compiled.
I think Bob Larson has part of the answer here:
http://www.access-programmers.co.uk/forums/showpost.php?p=1167289&postcount=5
yet I have not enough grasp of what he has going there to apply it to my situation.
jeds
Last edited: