★★★各位大虾救命啊救命啊，我想在ComcoBox控件的菜单内容改变时触发事件，应该怎么办！！！

Question

Private Sub Combo1_Click()
    Combo2.Text = "选中第" & Combo1.ListIndex & "项目-" & Combo1.Text
End SubPrivate Sub Form_Load()
    Dim i As Integer
    For i = 1 To 52
        Combo1.AddItem "Week" & i
    Next i
    
End Sub

Answer 1

另外,你如果不是为了练习Combo控件的用法,而是想作日期运算,请用
DateTimePicker控件.在菜单"工程"-"部件"中选择MicroSoft Windows Common Controls(共三项)即可找到此控件.