With 語(yǔ)句

對(duì)一個(gè)對(duì)象執(zhí)行一系列的語(yǔ)句。

With object
    statements
End With

參數(shù)

object

必需的部分?？梢允且粋€(gè)對(duì)象名稱(chēng)，也可以是返回值為對(duì)象的一個(gè)函數(shù)。

statements

必需的部分。將要對(duì) object 執(zhí)行的一個(gè)或多個(gè)命令。

說(shuō)明

With 語(yǔ)句可以用來(lái)對(duì)指定的對(duì)象執(zhí)行一系列的語(yǔ)句，但不需要重復(fù)地說(shuō)明對(duì)象的名稱(chēng)。例如，如果要修改一個(gè)對(duì)象的多個(gè)屬性，可以將所有屬性賦值語(yǔ)句放在 With 控制結(jié)構(gòu)中，這樣對(duì)對(duì)象的引用就只需要一次，而不是在每個(gè)賦值語(yǔ)句中都引用。下面的例子說(shuō)明如何使用 With 語(yǔ)句對(duì)同一個(gè)對(duì)象的幾個(gè)屬性進(jìn)行賦值。

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

盡管屬性操作是使用 With 語(yǔ)句最多的情況，它的用法并不僅限于此。With 塊中可以使用任何合法的語(yǔ)句。

注意  一旦進(jìn)入了 With 塊，object是不可改變的。因此，不能使用一個(gè)With語(yǔ)句去改變?nèi)舾蓪?duì)象的值。

可以嵌套使用 With 語(yǔ)句，將一個(gè) With 塊寫(xiě)在另一個(gè)塊中。然而，由于外部的 With 塊的成員被內(nèi)部的 With 塊掩蓋，無(wú)論內(nèi)部的 With 塊要引用外部的 With 塊中的某個(gè)對(duì)象的什么成員，都必須使用完全限定的對(duì)象引用。

重點(diǎn)  不要跳入或跳出 With 塊。如果執(zhí)行了 With 塊中的語(yǔ)句卻沒(méi)有執(zhí)行 With 或 End With 語(yǔ)句，結(jié)果將引發(fā)錯(cuò)誤或其他難以預(yù)見(jiàn)的行為。