返回一個(gè)指向一過(guò)程的引用，此過(guò)程可綁定某事件。

Set object.eventname = GetRef(procname)

參數(shù)

object

必選項(xiàng)。事件所關(guān)聯(lián)的對(duì)象的名稱。

eventname

必選項(xiàng)。要與函數(shù)綁定的事件的名稱。

procname

必選項(xiàng)。該字符串中包含 Sub 或 Function 過(guò)程的名稱，該過(guò)程與事件關(guān)聯(lián)。

說(shuō)明

GetRef 函數(shù)可以用來(lái)將 VBScript 過(guò)程 (Function 或 Sub） 與 DHTML (動(dòng)態(tài) HTML)頁(yè)面中可用的任何事件聯(lián)系在一起。DHTML 對(duì)象模型為不同對(duì)象提供了與各種可用事件有關(guān)的信息。

在其他腳本和程序設(shè)計(jì)語(yǔ)言中，GetRef 所提供的功能被稱為函數(shù)指針，即它指向了在指定事件發(fā)生時(shí)要執(zhí)行的過(guò)程的地址。

下面的例子說(shuō)明了 GetRef 函數(shù)的使用：

<SCRIPT LANGUAGE="VBScript">

Function GetRefTest()
   Dim Splash
   Splash = "GetRefTest Version 1.0"   & vbCrLf
   Splash = Splash & Chr(169) & " YourCompany 1999 "
   MsgBox Splash
End Function

Set Window.Onload = GetRef("GetRefTest")
</SCRIPT>

要求

版本 5

請(qǐng)參閱

Function 語(yǔ)句 | Set 語(yǔ)句 | Sub 語(yǔ)句