VB 中的 Set 可以用作引數嗎？

簡單來說，set 類似於賦值語句，一般的賦值語句是：

a=1：a=1 的值

a=b：將 b 的值分配給 a，a 的值 = b

a=array（1,2,3）：a 是乙個陣列。

但是，要為物件賦值，需要使用 set 關鍵字，例如：

set adors = new

set = conodbc

set adors = nothing

另乙個例子：將 FRM 調暗為 FORM

set frm =

讓他進入模組。

public sub con(ssql as string)set adors = new

strquery, conodbc, 1, 2end sub

形式。

call con(sqlstr) 'sqlstr 是乙個 SQL 查詢語句。

while not

str1 = adors("id")

ips = adors("pcname")wendset adors=nothing

不，這是乙個關鍵字。

set 函式是將物件引用分配給變數或屬性，該變數或屬性是語句，而不是引數或變數。

set 是關鍵字，而不是變數。

set 語句。

將物件引用分配給變數或屬性。

語法 set objectvar =

set 語句的語法包含以下部分：

部分說明。

objectvar 必需。 變數或屬性的名稱，遵循標準變數命名約定。

new 可選。 宣告時通常使用 New，以便可以隱式建立物件。 如果 new 與 set 一起使用，則將建立該類的新例項。

如果 ObjectVar 包含物件引用，則在分配新值時釋放該引用。 不能使用 new 關鍵字建立任何內部資料型別的新例項，也不能建立依賴項。

需要 ObjectExpression。 由物件名稱、宣告的相同物件型別的其他變數或返回相同物件型別的函式或方法組成的表示式。

沒有什麼可選的。 取消 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 關鍵字，則實際上將建立物件的新例項。