做過工控的人都知道,對腳本語言的支持是標準組態軟件應具備的一個基本功能(如 iFix,組態王等)。如果我們用VB開發類似的功能,能實現嗎?
想必大家都知道微軟提供了 Micrsoft Script Control 1.0 控件,在 VB 版也見到了大家對這個控件的使用(如用 ExecuteStatement 方法執行腳本命令 ExecuteStatement (" msgbox “ 你好 ”” ) ??? )。但最重要的一點, ActiveX 腳本與宿主應用程序數據交互與傳遞,卻沒有完整的解決方案。
我也是探索了很長一段時間,才摸索出一點數據傳遞與交互的技巧,現在共享出來,供大家討論研究。
示例程序介紹:
1、 首先加載 Micrsoft Script Control 1.0 控件。
對它基本上不用配置,默認語言 VBScript,對該部分的介紹請下載VBScript命令集 ( http://blog.csdn.net/yefanqiu 【葉帆資源】[03] VBScript指令集)
2、 添加一個窗體(frmTest),里面添加如下代碼:
3、 添加一個模塊(mdlBase),里面添加如下代碼:
4、 添加一個類(clsScriptIO),類名為clsScriptIO,里面添加如下代碼:
功能演示:
1、 參數傳遞(單擊【傳遞參數演示】按鈕,自動添加相應腳本代碼。可以執行加減乘除等操作。
下圖演示了錯誤捕捉(被 0 除錯誤)
2、對象操作(單擊【對象操作演示】按鈕,自動添加相應腳本代碼。可以執行控件的賦值和背景色變化操作。
VBScript 使用 ActiveX(R)腳本與宿主應用程序對話。使用 ActiveX Script,瀏覽器和其他宿主應用程序不再需要每個腳本部件的特殊集成代碼。ActiveX腳本使宿主可以編譯 Script、獲取和調用入口點及管理開發者可用的命名空間。通過 ActiveX Script,語言廠商可以建立標準腳本運行時語言。Microsoft 將提供 VBScript 的運行時支持。
更多文章、技術交流、商務合作、聯系博主
微信掃碼或搜索:z360901061

微信掃一掃加我為好友
QQ號聯系: 360901061
您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。
【本文對您有幫助就好】元
