VBS中關(guān)于Set語句的教程
Set 語句
將對象引用賦給一個(gè)variable或property,或者將對象引用與事件關(guān)聯(lián)。
Set objectvar = {objectexpression |
New classname |
Nothing}
-或者-
Set object.eventname =
GetRef(procname)
參數(shù)
objectvar必選項(xiàng),變量或?qū)傩悦Q;符合標(biāo)準(zhǔn)變量命名約定。
objectexpression可選項(xiàng),與對象名稱一致的Expression,另一個(gè)相同object type、函數(shù)或方法的已聲明變量,它們返回相同對象類型的對象。
New用于創(chuàng)建一個(gè)類的新實(shí)例的Keyword。如果 objectvar 包含一個(gè)對某個(gè)對象的引用,當(dāng)一個(gè)新的'引用被賦給這個(gè)對象之后,則這個(gè)引用將被釋放。
New 關(guān)鍵僅用于創(chuàng)建一個(gè)class的實(shí)例。
classname可選項(xiàng). 創(chuàng)建的類名稱。使用Class 語句定義類及其語句。
Nothing可選項(xiàng)。斷開 objectvar 與任何指定對象或類的關(guān)聯(lián)。當(dāng)沒有其他變量引用前面的引用對象時(shí),將 objectvar 賦值為Nothing 以釋放與前面的引用對象相關(guān)聯(lián)的系統(tǒng)或內(nèi)存資源。
object必選項(xiàng)。與 event 相關(guān)聯(lián)的對象名稱。
event必選項(xiàng)。函數(shù)作用域的事件名稱。
procname必選項(xiàng)。包含與event 相關(guān)聯(lián)的Sub 或Function 名稱的字符串。
說明為了使其有效,objectvar 必須與賦值的對象類型相一致。
Dim,Private,Public, 或ReDim 語句僅聲明一個(gè)引用對象的變量。在使用.Set 語句為一個(gè)具體對象賦值之前,沒有實(shí)際對象可以引用。
通常, 當(dāng)您使用Set 語句將一個(gè)對象引用賦給一個(gè)變量之前,不會(huì)創(chuàng)建那個(gè)變量的對象的副本。實(shí)際上,只創(chuàng)建了一個(gè)對象的引用。多個(gè)引用對象變量可以引用相同的對象。因?yàn)檫@些變量都是對象的引用,而不是對對象副本的引用,因此對象中所作的任何變化都可以在引用該對象的所有變量中反映出來。
Function ShowFreeSpace(drvPath)Dim fso, d, sSet fso = CreateObject("Scripting.FileSystemObject")Set d = fso.GetDrive(fso.GetDriveName(drvPath))s = "Drive " & UCase(drvPath) & " - " s = s & d.VolumeName & "
"s = s & "Free Space: " & FormatNumber(d.FreeSpace/1024, 0) s = s & " Kbytes"ShowFreeSpace = sEnd Function
利用New 關(guān)鍵詞,您可以隨時(shí)創(chuàng)建一個(gè)類的實(shí)例,并將一個(gè)對象引用變量賦值給它。賦給類的實(shí)例的變量一定利用Dim (或相似的語句)語句事先已經(jīng)聲明。
【VBS中關(guān)于Set語句的教程】相關(guān)文章:
職場中要求加薪的英語句子06-09
40句外貿(mào)中接待客戶的英語句子06-06
關(guān)于微信小程序教程01-15
職場中應(yīng)聘秘書英語口語句子06-02
關(guān)于英文簡歷語句05-15