用SELECT CASE 判读COMBOBOX里的值
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
我的语句如下,哪位能帮我一下啊?
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
...全文
相关推荐
custom DataGridView Combobox(自定义)
功能描述:自定义了DataGridView 中的 Combobox 列,列里面可以选择线型 实线,虚线,电线,点划线等。
combox Line Style Select
c# 开发combobox 选择线的下拉选择线的形状
VB_货币兑换
货币兑换_VB源程序:实现各国之间的货币兑换功能,主要使用VB的selectcase语句。
VB 编写的四则运算器
本系统是一个简单的四则运算器,能够实现加减乘除四则运算,而且能够实现先乘除后加减运算!
vb6设置热键_visualbasic_checkbox_keycode_VB源码_combox_
combox下拉框选择热键设置


