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 关键字，则实际上将创建对象的新实例。