Searching contents of a Combo Box

[anonymous]

[Originally posted by Joe Melton]

I need to give the user the option of restricting selection to the contents of the combo box or being able to manually type in a string that is not contained within the combo box (this is controlled through a check box.ÿ If the checkbox is checked, the user must select an item contained within the combo box.ÿ If it is unchecked, the user can enter a value not contained within the combo box).

My problem is this (and I'm sure it's a very newbie problem):
On user text entry, how do I search the contents of the combo box, using the text the user has entered as a search string?ÿ (If the check box is checked, and the search string is not found, a message box will appear telling the user that he or she must select a value contained within the combo box.ÿ If the check box is unchecked, the user may enter a value not contained within the combo box).

I hope this is enough information.ÿ If you have an answer for me, please send me a code example.ÿ Thank you in advance.

Joe Melton

[anonymous]

[Originally posted by FreeVBCode.com]

Dim l as Long
Dim lCnt as Long
Dim bFound as Boolean

lCnt = Combo1.ListCount - 1

For l = 0 to lCnt
ÿ If combo1.List(l) = Text1.Text Then
ÿ ÿ ÿ bFound = True
ÿ ÿ ÿ Exit For
ÿ End If
Next

If not bFound then
ÿ msgbox "Illegal Entry"
End If
ÿ

[anonymous]

[Originally posted by Joe Melton]

Thanks.

Joe