VB6, ComboBox, Error?

When I click the drop down arrow on a combobox I see a list of items to select. But if I decide not to click on one and click on the form I get a run-time error, type mismatch error. The line of code it points to is ChanID = CLng(Channel_Select.Text).
ChanID is declared in General Declarations as a Public, and a Long. The line ChanID = CLng(Channel_Select.Text) is in the Private Sub Channel_Select_Click(). How do I get rid of this problem.

Thanks,
Randall

Try this line

ChanID = Val(Channel_Select.Text)

Thanks Rich it worked!