用SELECT CASE 判读COMBOBOX里的值
良朋 2012-12-20 04:31:12 ComboBox 下拉菜单有7项,我想根据所选给变量CurSelectKey 赋值(之后写在SQL语句中),但我不会用SELECT...CASE...语句, 总不至于让我用IF..THEN..一个一个判读吧!
我的语句如下,哪位能帮我一下啊?
Private Sub CmbBox_Term_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmbBox_Term.SelectedIndexChanged
'Select Case CmbBox_Term.Items.Count() '总是7
Select Case CmbBox_Term.Items.IndexOf(CmbBox_Term.Items) '总是-1
Case 0
CurSelectKey = "UserID"
Case 1
CurSelectKey = "ProductNO"
Case 2
CurSelectKey = "OrderNo"
Case 3
CurSelectKey = "ProductBatch"
Case 4
CurSelectKey = "CurDate"
Case 5
CurSelectKey = "Result"
Case 6
CurSelectKey = "FUCK"
End Select
End Sub