简单的方法。
Dim cbx As WinForm.ComboBox = e.Form.Controls("ComboBox1")
If ("|" & cbx.ComboList & "|").Contains("|" & cbx.Text & "|") Then
End If