VBS中Set语句的用法

这篇文章主要介绍"VBS中Set语句的用法"，在日常操作中，相信很多人在VBS中Set语句的用法问题上存在疑惑，小编查阅了各式资料，整理出简单好用的操作方法，希望对大家解答"VBS中Set语句的用法"的疑惑有所帮助！接下来，请跟着小编一起来学习吧！

将对象引用赋给一个variable或property，或者将对象引用与事件关联。

Set objectvar = {objectexpression | New classname | Nothing}

-或者-

Set object.eventname = GetRef(procname)

参数

objectvar

必选项，变量或属性名称;符合标准变量命名约定。

objectexpression

可选项，与对象名称一致的Expression,另一个相同object type、函数或方法的已声明变量，它们返回相同对象类型的对象。

New

用于创建一个类的新实例的Keyword。如果 objectvar 包含一个对某个对象的引用，当一个新的引用被赋给这个对象之后，则这个引用将被释放。New 关键仅用于创建一个class的实例。

classname

可选项. 创建的类名称。使用 Class 语句定义类及其语句。

Nothing

可选项。断开 objectvar 与任何指定对象或类的关联。当没有其他变量引用前面的引用对象时，将 objectvar 赋值为 Nothing 以释放与前面的引用对象相关联的系统或内存资源。

object

必选项。与 event 相关联的对象名称。

event

必选项。函数作用域的事件名称。

procname

必选项。包含与event 相关联的 Sub 或 Function 名称的字符串。

说明

为了使其有效，objectvar 必须与赋值的对象类型相一致。

Dim, Private, Public, 或 ReDim 语句仅声明一个引用对象的变量。在使用. Set 语句为一个具体对象赋值之前，没有实际对象可以引用。

通常, 当您使用 Set 语句将一个对象引用赋给一个变量之前,不会创建那个变量的对象的副本。实际上,只创建了一个对象的引用。多个引用对象变量可以引用相同的对象。因为这些变量都是对象的引用，而不是对对象副本的引用，因此对象中所作的任何变化都可以在引用该对象的所有变量中反映出来。

Function ShowFreeSpace(drvPath)   Dim fso, d, s   Set 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 关键词，您可以随时创建一个类的实例，并将一个对象引用变量赋值给它。赋给类的实例的变量一定利用 Dim (或相似的语句)语句事先已经声明。

到此，关于"VBS中Set语句的用法"的学习就结束了，希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习，快去试试吧！若想继续学习更多相关知识，请继续关注网站，小编会继续努力为大家带来更多实用的文章！