【发布时间】:2011-06-10 17:54:33
【问题描述】:
我必须在 vba 中为我的用户表单填充几个组合框,但是当我加载用户表单时组合框没有被填充。代码如下:
Private Sub UserForm_Initialize()
ComboBox1.Clear
ComboBox1.AddItem "C-S-A"
ComboBox1.AddItem "C-A-T"
ComboBox1.AddItem "C-A-S"
ComboBox1.Text = ComboBox1.List(0)
End Sub
Private Sub ComboBox1_Change()
Select Case ComboBox1.Text
Case "C-S-A"
Case "C-A-T"
Case "C-A-S"
Case Else
End Select
End Sub
【问题讨论】:
-
我发现了问题。它必须说“用户窗体”。我使用了用户表单的名称。
-
我试过了,效果很好。确保您有一个名为“ComboBox1”的组合框。还要检查其他地方是否正在清除组合框。
-
是的,它有效。是我的错。
-
您应该添加并接受一个答案,以便将问题从未回答列表中删除