加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

CitectVBA定制过程分析器4:清空特定板下的趋势笔,但不删除板

(2022-12-17 19:28:59)
标签:

施耐德

citect

citectvba

过程分析器

分类: 施耐德PLC
接着学习练习。如果想清空特定板下面的趋势笔,但是不删除这个板,比如针对2#板(从1开始计数),写下面的脚本。
Sub clearPaneAllPen()
Dim pa As Object
Dim hPanes As Object
Dim hPane As Object
Dim hPens As Object
Dim panecount
Set pa=main_AN4
Set hPanes=pa.panes
panecount=hPanes.count
If panecount>=2 Then
Set hPane=hPanes.item(2)
Set hPens=hPane.pens
If hPens.count >=1 Then
hPens.removeall
End If
End If
End Sub

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有