excel vba fill combobox

Question

我必须在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

Answer 1

我使用了错误的名字。它必须是UserForm_Initialize（）。