WINCC工程中有许多设备，要点击一下，弹出一个子画面，再点起动或停止
特做了一个.net控件来实现

用法
Dim  msg
Set msg=ScreenItems("msg")

'type :0 为运行，停止弹出窗，  1为开到位，关到位弹出窗
'x ，y弹出 的坐标
'变量名 为字符串
'tagrun 运行反馈 或开到位信号
'tagstop 停止反馈 或关到位信号
'tagerr 故障信号
'start  运行或开 按钮置位的变量
'stop 停止或关  按钮置位的变量
'devname 设备名称
'show(int type, int x, int y, string tagrun, string tagstop, string tagerr, string start, string stop, string devname)
msg.show 1,83,214,"a_2","a_3","a_4","a_6","a_7","罗茨泵"
End Sub
wc.rar (289 K) 下载次数:75

谢谢，学习了