前面一篇博客介紹了使用c腳本對按鈕動作進行操作記錄,本篇使用vbs實現同樣的功能。假設有一個按鈕作用是啟動油泵,我們先在報警記錄-消息表格中建立一條消息,消息編號1101,消息等級“系統無確認”,消息類型“操作員輸入消息”,消息文本“操作員啟動油泵”,其他參數默認。在這個按鈕的鼠標點擊事件中添加以下VBS腳本
Sub OnClick(ByVal Item)
Dim MyAlarm
Set MyAlarm=HMIRuntime.Alarms(1101)
MyAlarm.State = 1
MyAlarm.Create
End Sub
保存后運行,當點擊按鈕時,報警空間就會記錄下這個操作。
腳本中MyAlarm.State 有好幾種數值,數值為1,表示有報警到來;數值為2表示有報警離開;數值5表示有報警帶來並伴有注釋;數值6表示有報警離開並伴有注釋。如果希望有注釋文本,還需要對MyAlarm.Comment屬性賦值,如果細心的話會發現MyAlarm后面有好幾個屬性可以設置/讀取,在本例里面,我們只需要一個就夠了。