Set 語句
將對象引用賦給變數或屬性。
文法
Set objectvar = {[New] objectexpression | Nothing}
Set 語句的文法包含下面部分:
部分 描述
objectvar 必需的。變數或屬性的名稱,遵循標準變數命名規範。
New 可選的。通常在聲明時使用 New,以便可以隱式建立對象。如果 New 與 Set 一起使用,則將建立該類的一個新執行個體。如果 objectvar 包含了一個對象引用,則在賦新值時釋放該引用。不能使用 New 關鍵字來建立任何內部資料類型的新執行個體,也不能建立從屬對象。
objectexpression 必需的。由對象名,所聲明的相同物件類型的其它變數,或者返回相同物件類型的函數或方法所組成的運算式。
Nothing 可選的。斷絕 objectvar 與任何指定對象的關聯。若沒有其它變數指向 objectvar 原來所引用的對象,將其賦為 Nothing 會釋放該對象所關聯的所有系統及記憶體資源。
說明
為確保合法,objectvar 必須是與所賦對象相一致的物件類型。
Dim、Private、Public、ReDim以及 Static 語句都只聲明了引用對象的變數。在用 Set 語句將變數賦為特定對象之前,該變數並沒有引用任何實際的對象。
下面的樣本說明了如何使用 Dim 來聲明 Form1 類型的數組。Form1 實際上還沒有執行個體。然後使用 Set 將新建立的 Form1 的執行個體的引用賦給 myChildForms 變數。在 MDI 應用程式中可以使用這些代碼來建立子表單。
Dim myChildForms(1 to 4) As Form1
Set myChildForms(1) = New Form1
Set myChildForms(2) = New Form1
Set myChildForms(3) = New Form1
Set myChildForms(4) = New Form1
通常,當使用 Set 將一個對象引用賦給變數時,並不是為該變數建立該對象的一份副本,而是建立該對象的一個引用。可以有多個物件變數引用同一個對象。因為這些變數只是該對象的引用,而不是對象的副本,因此對該對象的任何改動都會反應到所有引用該對象的變數。不過,如果在 Set 語句中使用 New 關鍵字,那麼實際上就會建立一個該對象的執行個體。
註:以上轉自http://hi.baidu.com/zhw0626/blog/item/44e5f189c58e67b00e24446f.html
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
【關於 Get、Set 和 Let】
Get就是取屬性值
Set就是給對象屬性賦值
Let傳一個變數
當一個類要向外部公開一個屬性(變數)時有兩種做法:
1.可直截了當地用Public聲明這個變數,這樣外部過程就可輕而易舉地讀寫這個變數;
2.用Private聲明變數,然後用Property Get.../