这个是我之前发的。 我试了在事件里写代码的方法,行不通。 我查了,在帮助里有这么一句话: Whenever you change the filter or sort configuration, the Alarm Summary object updates its list of alarm. However, this change does not cause the NewAlarm event to occur.
使用下面脚本测试通过AlarmSummaryOCX2显示低级别报警 Private Sub AlarmSummaryOCX1_NewAlarm(strNode As String, strTag As String) MsgBox "ocx1" Me.AlarmSummaryOCX2.AckAllAlarms End Sub Private Sub CFixPicture_Initialize() Me.AlarmSummaryOCX1.CheckForNewAlarms = True End Sub ____________________________________ My blog http://lostcity.blog.zj.com  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄