T
Tony Vrolyk
Wondering why when using the code below the focus jumps back to txtSSN and I
can't click on any other control. If I uncomment the
"Me.lstParticipants.SetFocus" I get an error 2110 - Can't move focus.
Private Sub txtNewSSN_AfterUpdate()
If Not IsNull(Me.txtNewSSN) Then
Me.lstParticipants.RowSource = "Something"
If Me.lstParticipants.ListCount = 1 Then
Me.lstParticipants.Selected(0) = True
' Me.lstParticipants.SetFocus
Me.cmdSave.Enabled = True
Else
Me.cmdSave.Enabled = False
End If
End If
Thanks
Tony
can't click on any other control. If I uncomment the
"Me.lstParticipants.SetFocus" I get an error 2110 - Can't move focus.
Private Sub txtNewSSN_AfterUpdate()
If Not IsNull(Me.txtNewSSN) Then
Me.lstParticipants.RowSource = "Something"
If Me.lstParticipants.ListCount = 1 Then
Me.lstParticipants.Selected(0) = True
' Me.lstParticipants.SetFocus
Me.cmdSave.Enabled = True
Else
Me.cmdSave.Enabled = False
End If
End If
Thanks
Tony