对单个对象执行一系列语句。
语法
With object
statements
End With
参数:
Object:必需。对象名称。
Statements:必需。要对对象执行的一个或多个语句。
注释
使用 With 语句,可以对指定对象执行一系列语句,而无需重新限定对象的名称。例如,要更改单个对象上的多个不同属性,请将属性赋值语句置于 With 控制结构中,只引用该对象一次,而不是在每次属性赋值时都引用该对象。以下示例说明了如何使用 With 语句为同一对象的多个属性赋值。
示例 1:
With MyLabel .Height = 2000 .Width = 2000 .Caption = "This is MyLabel" End With
虽然属性处理是 With 功能的一个重要方面,但它并不是唯一的用途。任何合法代码都可以在 With 块中使用。
Note:
一旦进入 With 块,便无法更改对象。因此,您不能使用单个 With 语句影响多个不同的对象。
可以通过将一个 With 块放在另一个块中来嵌套 With 语句。但是,由于外部 With 块的成员在内部 With 块中被屏蔽,因此必须在内部 With 块中为外部 With 块中对象的任何成员提供全限定对象引用。
重要提示:不要跳入或跳出 With 块。如果执行 With 块中的语句,但未执行 With 或 End With 语句,则可能会出现错误或不可预测的行为。
建议:除非有必要,否则不要使用 With 块。最好总是显式使用对象。