如何使vb的下拉列表框和asp的下拉列表框相似有两个值,用户看到的值可以与实际值不同!!

解决方案 »

  1.   

    简单例子
    combobox 控件的text 和itemdata 属性就相当于asp下拉框控件中的text 和value
    用户看到text,实际上用value来传递值Option ExplicitPrivate Sub Combo1_Click()
        Debug.Print Me.Combo1.List(Me.Combo1.ListIndex) + "的学号是" + CStr(Me.Combo1.ItemData(Me.Combo1.ListIndex))
    End SubPrivate Sub Form_Load()
        Dim i As Long
        For i = 1 To 50
            Me.Combo1.AddItem "学生 " + CStr(i)
            Me.Combo1.ItemData(i - 1) = i
        Next
    End Sub
      

  2.   

    SoHo_Andy(冰) 就是正确答案,  还顶什么啊
    text,value等价于list(),itemdata()
      

  3.   

    Me.Combo1.ItemData(i - 1) = i
    只能是正数呀,我要的是文本或单精度