With 语句

对一个对象执行一系列的语句。

With object
    statements
End With

参数

object

必需的部分。可以是一个对象名称，也可以是返回值为对象的一个函数。

statements

必需的部分。将要对 object 执行的一个或多个命令。

说明

With 语句可以用来对指定的对象执行一系列的语句，但不需要重复地说明对象的名称。例如，如果要修改一个对象的多个属性，可以将所有属性赋值语句放在 With 控制结构中，这样对对象的引用就只需要一次，而不是在每个赋值语句中都引用。下面的例子说明如何使用 With 语句对同一个对象的几个属性进行赋值。

With MyLabel
  .Height = 2000
  .Width = 2000
  .Caption = "这是MyLabel"
End With

尽管属性操作是使用 With 语句最多的情况，它的用法并不仅限于此。With 块中可以使用任何合法的语句。

注意  一旦进入了 With 块，object是不可改变的。因此，不能使用一个With语句去改变若干对象的值。

可以嵌套使用 With 语句，将一个 With 块写在另一个块中。然而，由于外部的 With 块的成员被内部的 With 块掩盖，无论内部的 With 块要引用外部的 With 块中的某个对象的什么成员，都必须使用完全限定的对象引用。

重点  不要跳入或跳出 With 块。如果执行了 With 块中的语句却没有执行 With 或 End With 语句，结果将引发错误或其他难以预见的行为。