当用户窗体中的任何复选框值更改时,如何运行代码? 我正在尝试使用类模块,但是代码以我不理解的奇怪方式运行。 仅当且仅当_Change()事件的代码中设置了断点时,该代码才会认识到复选框的值在其第一次出现时已更改。在所有其他实例中,它不再识别任何更改。 这是我在Userform_Initalize()中的代码 Private Sub UserForm_Initialize() Dim ckCollection As New Collection Dim ctrl As MSForms.Control Dim obj As clsCheckBoxes For Each ctrl In Me.Controls If TypeOf ctrl Is MSForms.CheckBox _ And Not TypeOf ctrl Is MSForms.OptionButton _ And Not TypeOf ctrl Is MSForms.ToggleButton _ And Not ctrl.Name = "ckEditFileDescription" …