VBA ComboBox文本不会保留

时间:2016-06-28 19:56:41

标签: vba text combobox

除非我输入文字,否则ComboBox将不会记住/存储文字。

Private Sub ComboBox1_Initialize()
    ComboBox1.List = Array("0", "0.1", "0.2")
End Sub

然后,文本值确定CommandButton函数。

Private Sub CommandButton1_Click()
    If ComboBox1.Text = "0" Then
        Call Name0
    End If
    If ComboBox1.Text = "0.1" Then
        Call Name1
    End If
    If ComboBox1.Text = "0.2" Then
        Call Name2
    End If
End Sub

代码有效,只是不将数组保存在组合框中。

1 个答案:

答案 0 :(得分:0)

这似乎效果最好,在表格上看起来更好.. 不是我的问题的答案,而是解决它的另一种途径。 干杯!

    Private Sub CommandButton1_Click()
       If OptionButton1.Value = True Then
        Call Name_0
         End If
          If OptionButton2.Value = True Then
           Call Name1
            End If
           If OptionButton3.Value = True Then
        Call Name2
       End If
   End Sub