Question

我想使用ComboBox，但禁用该选项以键入它。

我正在尝试使用命令按钮从列表框中填充文本框。除非列表框中的项目被选中并突出显示为蓝色，否则我无法获得用于传输列表框中的内容的按钮。如果我使用组合框，则无需突出显示该组合框，但是我不希望该选项在框中键入，只需从列表中选择即可。

这是我正在测试的全部代码。

Private Sub CommandButton1_Click()
TextBox1 = Me.ComboBox1.Value
End Sub


Private Sub TextBox1_Change()

End Sub

Private Sub UserForm_Initialize()
'Creates and assigns the Array to the ListBox when the form loads.
   Dim name As Variant

   name = Array("Sunday", "Monday", "Tuesday", "Wednesday", _
      "Thursday", "Friday", "Saturday")
   ComboBox1.List = name
End Sub

Answer 1

如果在将组合框创建为fmStyleDropDownList时更改了样式，则将起作用。

或

将此内容放入代码中-您将在对象名称的下面拥有组合框的名称（如果已更改）。

Private Sub UserForm_Initialize()

    Me.ComboBox1.Style = fmStyleDropDownList

End Sub

将ComboBox配置为只读：是否有办法？

1 个答案: