MSScriptControl.ScriptControl組件實(shí)例對(duì)象屬性

屬性名稱 類型 備注

AllowUI BOOL 檢測(cè)是否允許運(yùn)行用戶的接口元素。如果為False，則諸如消息框之類的界面元素不可見(jiàn)。

CodeObject Object 腳本暴露給宿主調(diào)用的對(duì)象。只讀。

Modules Modules 宿主提供給腳本的組件庫(kù)模塊。只讀。（COM組件通常都是以對(duì)象收集的形式向用戶提供可以留給用戶二次開發(fā)的對(duì)象集合，每一個(gè)收集即一個(gè)Modules）

Language String 設(shè)置或獲取腳本引擎解釋的語(yǔ)言，例如：VBScript、JScript。

Name String 腳本引擎的名稱。只讀。

Procedures Procedures 返回模塊中定義的過(guò)程的集合

SitehWnd HWND 在腳本中顯示UI的父窗口句柄

State Enum 設(shè)置或返回控件的狀態(tài)，如果為0，控件只執(zhí)行語(yǔ)句但不轉(zhuǎn)發(fā)事件，為1則為加入的本控件接受的對(duì)象轉(zhuǎn)發(fā)事件。

Timeout Long 控件的執(zhí)行腳本的超時(shí)值，－1表示不超時(shí)

UseSafeSubset BOOL 設(shè)置或返回宿主程序是否關(guān)心安全。宿主程序的安全級(jí)別可以從此屬性設(shè)置

Error Error 錯(cuò)誤對(duì)象，發(fā)生錯(cuò)誤時(shí)，此屬性返回一個(gè)錯(cuò)誤對(duì)象

MSScriptControl.ScriptControl組件實(shí)例方法名稱

方法名稱 參數(shù) 功能

AddCode Code As String 往腳本引擎中加入要執(zhí)行的腳本

AddObject Name As String, Object As Object, [AddMembers As Boolean = False] 往腳本引擎加入一個(gè)對(duì)象,以便在腳本中可以使用該對(duì)象提供的方法等。

Eval Expression As String 表達(dá)式求值

ExecuteStatement Statement As String 解釋并執(zhí)行腳本語(yǔ)句

Reset 丟棄所有的對(duì)象和代碼，將State屬性置0。

Run ProcedureName As String, ParamArray Parameters() As Variant 運(yùn)行一個(gè)指定的過(guò)程

MSScriptControl.ScriptControl組件實(shí)例事件名稱

事件名稱 功能

Error 有錯(cuò)誤發(fā)生時(shí)激發(fā)該事件

TimeOut 執(zhí)行過(guò)程超時(shí)時(shí)發(fā)生

MSScriptControl.ScriptControl使用方法

1、在程序中加入ScriptControl

2、定義一個(gè)ScriptControl的實(shí)例

3、調(diào)用AddCode等方法向腳本引擎中加入要執(zhí)行的腳本。

4、調(diào)用Run執(zhí)行要執(zhí)行的腳本函數(shù)。

更多信息請(qǐng)查看IT技術(shù)專欄