Option Button Problem

Topic

New Reply

Would it work to do it this way, or do you get an error?

If Me.[STORAGE – LOX] >= 0 Then
Me.LOXOption = 1
Else
Me.LOXOption = 0
End If

And does this program have anything to do with bagels?

Reply | Quote

Replies

I am using an option button and would like to be able to toggle the value of the button based on the contents of another field. It works great when I input information into the other field, however, when I delete the contents of the field the option value does not change accordingly. I am using the following for the On Change click event:

If IsNull(Me.[STORAGE – LOX]) Or IsEmpty(Me.[STORAGE – LOX]) Then
Me.LOXOption = 0
ElseIf Me.[STORAGE – LOX] >= 0 Then
Me.LOXOption = 1
End If

Thanks for any assistance. (I am using Access97)

Reply | Quote

Thanks for your response but this doesn’t work either. One would think this should be simple! No to bagels, LOX is for Liquid Oxygen.

Regards!

Reply | Quote

I am not familiar with Access forms, but this code works in a VBA form:

Private Sub DateTo_Change()
If Len(Me.DateTo.Value) > 0 Then
CriteriaSelector.OptionButton3 = True
Else
Call ResetOptions ‘enable date-dependent default button
End If
End Sub

The VBA form runs this procedure for every keystroke in the textbox. Does your form work that way as well?

Reply | Quote

If Len(Me.[STORAGE – LOX]&””) =0 Then
Me.LOXOption = 0
Else
Me.LOXOption = 1
End If

Put it in the AfterUpdate event of [Storage – Lox] and in the Current event of the form and it should work. Don’t use OnChange, which occurs every time you type anything into your field and so uses up CPU resources unnecessarily. There are times to use OnChange, but this isn’t one of them.

I would also urge you to stop using field names like [Storage – Lox] because they are unwieldly and always require brackets and because it is a poor naming practice to include spaces and punctuation in field names. If you ever upgrade to SQL Server, you’ll have to change all those field names anyway, so do yourself a favor.

Reply | Quote

This works great thank you very much !

Just wanted you to know that this was on old database I inherited and would never use those naming conventions. It needs MAJOR revamping and renaming fields is only one aspect.

Thanks again, you’ve been a great help!

Reply | Quote

You’re welcome. Glad you’ve got it working.

Reply | Quote