MS Access - Help with Textbox Change Event - Not firing code

[ironfelix717]

Hi,

Scratching my head over how to get my textbox change event to disable my option group.

The logic should be...

If user enters text, the second the textbox receives its first character, it should disable the option group.

Inversely...

If textbox becomes blank at any point in time, the option group should become enabled again.


I've been at this for hours now. I believe the problem roots within the Option Group not having focus,which is why it won't change the option group enabled property immediately - only until the user first switches focus out of the textbox.

Attached is example with code. I welcome you to try to solve this issue! Thanks for your time and efforts in advance.

Regards,

TBChange.accdb

[June7]

The code is firing. Set a breakpoint and step through code and you will see it execute.

Value is default property of data control. Value property is not set until control loses focus. Value is the property your function tests.

Consider following use of Text property without the UDF:

Private Sub tbText_Change()
If Len(Me.tbText.Text & "") = 0 Then
    Me.OpGroup.Enabled = True
Else
    Me.OpGroup.Enabled = False
End If
End Sub

or simply:

Private Sub tbText_Change()
Me.OpGroup.Enabled = Len(Me.tbText.Text & "") = 0
End Sub

[ironfelix717]

The code is firing. Set a breakpoint and step through code and you will see it execute.

Value is default property of data control. Value property is not set until control loses focus. Value is the property your function tests.

Consider following use of Text property without the UDF:

Private Sub tbText_Change()
If Len(Me.tbText.Text & "") = 0 Then
    Me.OpGroup.Enabled = True
Else
    Me.OpGroup.Enabled = False
End If
End Sub

or simply:

Private Sub tbText_Change()
Me.OpGroup.Enabled = Len(Me.tbText.Text & "") = 0
End Sub

June7,

Thanks for your reply. I did know the code was firing (easy to determine), I just wasn't sure how to get around the focus issue with .Value property.

The .Text property works great! Thank you!