CitectVBA定制过程分析器：删除特定板下面特定的趋势笔_来自金沙江的小鱼

个人资料

微博

正文字体大小：大中小

CitectVBA定制过程分析器：删除特定板下面特定的趋势笔

(2022-12-17 19:44:39)

标签：

分类：施耐德PLC

继续学习练习，如果想要删除板2（从1开始计数）下面的趋势笔2（从1开始计数），使用CitectVBA脚本如下：

Sub deletePanePen()

'删除板2下面趋势笔2

Dim pa As Object

Dim hPanes As Object

Dim hPane As Object

Dim hPens As Object

Dim hPen 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

Set hPen=Hpens.item(2)

hPen.delete

End If

End Sub

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