G
Guest
I have this code relating to a combobox that does not
select the text as it should:
Private Sub cboDistrict_GotFocus()
Me.cboDistrict.SetFocus
Me.cboDistrict.SelStart = 0
Me.cboDistrict.SelLength = Len(Me.cboDistrict.Text)
End Sub
When I add this code before the End Sub, the code works!
(the combo text is selected) but then I have the
superfluous message box.
Dr. Phil, how can I get the text in the combobox to be
selected properly?
select the text as it should:
Private Sub cboDistrict_GotFocus()
Me.cboDistrict.SetFocus
Me.cboDistrict.SelStart = 0
Me.cboDistrict.SelLength = Len(Me.cboDistrict.Text)
End Sub
When I add this code before the End Sub, the code works!
(the combo text is selected) but then I have the
superfluous message box.
Dr. Phil, how can I get the text in the combobox to be
selected properly?