将对象引用赋给变量或属性，或者将过程引用与事件关联。
语法
Set objectvar = {objectexpression | Nothing}
参数：
Objectvar：必需。变量或属性的名称；遵循标准变量命名约定。
Objectexpression：可选。此表达式由对象的名称、同一对象类型的另一个已声明变量，或返回同一对象类型的对象的函数或方法组成。
Nothing：可选。停止 objectvar 与任何特定对象或类的关联。将 objectvar 赋值为 Nothing 时，如果没有其他变量引用先前引用的对象，则会释放与该对象关联的所有系统和内存资源。
Note:
Objectexpression 或 Nothing，其中之一是必需的。
注释
Dim、Private、Public 或 ReDim 语句仅声明引用对象的变量。使用 Set 语句为特定对象赋值之前，不会引用任何实际对象。
通常，使用 Set 将对象引用赋给变量时，不会为该变量创建该对象的副本。而是，创建对对象的引用。多个对象变量可以引用同一个对象。由于这些变量是对对象（而不是对象的副本）的引用，因此对象中的任何更改都会反映在引用对象的所有变量中。
示例 1：FileSystemObject 对象的简单赋值
Dim fso, file
Set fso = CreateObject("Scripting.FileSystemObject") ' Create a FileSystemObject
Set tso = fso.CreateTextFile("C:\testfile.txt", True) ' Create a new text file
' Now you can work with the text stream object, such as writing to it
tso.WriteLine("Hello, VBScript!")
tso.Close ' Always close the file when done