可爱钢铁侠

文章
5
资源
0
加入时间
3年1月15天

关于 With……End With 的用法

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