假如你组合框中存放的是数字。那么先选中要使用的数字。然后再点击命令按钮就可以获取其中的信息,并且加以运算使用。下面是使用的代码。 Private Sub Command1_Click() Dim n As Integer n = Combo1.List(Combo1.ListIndex) '或者 MsgBox ("您选择的是数字 " & n & " 它的10倍是:" & n * 10) End Sub
Private Sub Form_Load() Combo1.Clear For I = 1 To 5 Combo1.AddItem I Next I End Sub