关于 With……End With 的用法
下面的代码中 with 用得太多,该如何简化?Sub 自制菜单() With CommandBars("自制菜单").Controls(3).Controls.Add(, , , 11, True) .Caption = "添加(&T)" .OnAction = "增加" With CommandBars("自制菜单").Controls(3