VBS教程：VBScript 语句-Set 语句

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  & "<BR>"   s = s & "Free Space: " & FormatNumber(d.FreeSpace/1024, 0)    s = s & " Kbytes"   ShowFreeSpace = sEnd Function

利用 New 关键词，您可以随时创建一个类的实例，并将一个对象引用变量赋值给它。赋给类的实例的变量一定利用 Dim (或相似的语句)语句事先已经声明。

有关使用 Set 语句关联一个过程与对象的详细信息，请参考 GetRef 函数的文档。

赞 (0)

相关推荐

  • MySQL5.7.14下载安装图文教程及MySQL数据库语句入门大全

    MySQL5.7.14下载安装图文教程及MySQL数据库语句入门大全

    如何下载: 我先去MySQL首页下载最新版本的MySQL-链接:https://www.mysql.com/downloads/ 进入此界面下载: Downloads–>MySQL Community Edition (GPL)(这是免费版的,当然,有钱的可以用收费的,功能更强大)–>MySQL Community Server (GPL) –>选择对应的系统和电脑版本(在这里,我选择的是Window系统64位的下载) –>No thanks, just start my down

  • VBS教程：fso方法-CreateTextFile 方法

    CreateTextFile 方法 创建指定文件并返回 TextStream 对象,该对象可用于读或写创建的文件. object.CreateTextFile(filename[, overwrite[, unicode]]) 参数 object 必选项.应为 FileSystemObject 或 Folder 对象的名称. filename 必选项.字符串表达式,指明要创建的文件. overwrite 可选项.Boolean 值指明是否可以覆盖现有文件.如果可覆盖文件,该值为 True:如果不

  • Python 中的判断语句,循环语句,函数

    Python 中的判断语句,循环语句,函数

    目录 1. 判断语句 1.1 布尔类型和比较运算符 1.1.1 布尔类型 1.1.2 比较运算符 1.2 if 语句 1.2.1 if 语句基本格式 1.2.2 if else 语句 1.2.3 if elif else 语句 1.2.4 判断语句的嵌套 2. 循环语句 2.1 while 循环 2.1.1 while 循环基础语法 2.1.2 while 循环嵌套使用 2.2 for 循环 2.2.1 for 循环基础语法 2.2.2 range 语句 2.2.3 变量作用域 2.2.4 fo

  • VBS教程：VBscript语句-Execute 语句

    Execute 语句执行一个或多个指定的语句. Execute statements 所需要的 statements 参数是一个字符串表达式,其中包含一个或多个要执行的语句.  如果要在 statements 参数中包含多条语句,应使用分号或嵌入的分行将其分隔开. 说明在 VBScript 中,x = y 可以有两种解释.首先是作为赋值语句,将 y 的值赋予 x.其次是作为表达式,测试x 和 y 的值是否相等.如果相等,结果为 True:否则,结果为 False.Execute 语句总是使用第一

  • VBS教程：VBscript语句-Const 语句

    Const 语句声明用于代替文字值的常数.  [Public | Private] Const constname = expression 参数Public 可选项.该关键字用于在 Script 级中声明可用于所有脚本中所有过程的常数.不允许在过程中使用. Private 可选项.该关键字用于在脚本级中声明只可用在声明所在的脚本中的常数.不允许在过程中使用. constname 必选项.常数的名称,根据标准的变量命名约定. expression 必选项.文字或其他常数,或包括除 Is 外的所有

  • VBS教程：VBScript 基础-使用循环语句

    使用循环语句循环用于重复执行一组语句.循环可分为三类:一类在条件变为 False 之前重复执行语句,一类在条件变为 True 之前重复执行语句,另一类按照指定的次数重复执行语句. 在 VBScript 中可使用下列循环语句: Do...Loop: 当(或直到)条件为 True 时循环. While...Wend: 当条件为 True 时循环. For...Next: 指定循环次数,使用计数器重复运行语句. For Each...Next:对于集合中的每项或数组中的每个元素,重复执行一组语句.(

  • VBS教程：VBscript语句-功能介绍

    VBScript 语句描述语言元素将控制权交给一个 Sub 或 Function 过程.Call 语句声明一个类的名称.Class 语句声明用于替换文字值的常数.Const 语句声明变量并分配存储空间.Dim 语句当某个条件为 True 时或在某个条件变为 True 之前重复执行一个语句块.Do...Loop 语句重新初始化固定大小的数组的元素和释放动态数组的存储空间.Erase 语句执行一条或多条指定语句.Execute 语句在一个脚本的全局命名空间中执行一条或多条语句.ExecuteGlob

  • VBS教程：VBscript语句-ExecuteGlobal 语句

    ExecuteGlobal 语句执行一个功多个在脚本全局名字空间中指定的语句. ExecuteGlobal statement statement 参数是一个包含一个或多个可执行语句的字符串表达式 .在statement 参数中可以包含多条语句, 使用冒号将其分开. 说明在 VBScript 中, x = y 有两种解释方法.第一种方法是作为一条赋值语句, 将 y 的值赋给 x.第二种方法是作为一个表达式 ,用于测试 x 和 y 是否具有相同的值.如果它们相等,则结果为 True; 如果他们不相

  • VBS教程：VBscript语句-Function 语句

    Function 语句声明 Function 过程的名称.参数以及构成其主体的代码.  [Public [Default]| Private] Function name [(  arglist)][statements][name = expression][Exit Function] [statements][name = expression]End Function 参数Public 表示 Function 过程可被所有脚本中的所有其他过程访问. Default 只与 Class 块中

  • VBS教程：VBScript 基础-使用条件语句

    使用条件语句控制程序执行使用条件语句和循环语句可以控制脚本的流程.使用条件语句可以编写进行判断和重复操作的 VBScript 代码.在 VBScript 中可使用以下条件语句: If...Then...Else 语句 Select Case 语句使用 If...Then...Else 进行判断If...Then...Else 语句用于计算条件是否为 True 或 False,并且根据计算结果指定要运行的语句.通常,条件是使用比较运算符对值或变量进行比较的表达式.有关比较运算符的详细信息,请参阅比

随机推荐