示例：Upper/LowerBoundPenIndex 属性

Private Sub SetShading()
' For this example to work, trend must not have any pens previously added
Trend1.Pens.Add "TankLevel", "", "", 0, 100
Trend1.Pens.Add "25", "Low Alarm", "", 0, 100
Trend1.Pens.Add "75", "High Alarm", "", 0, 100
Trend1.Pens.Item(1).LowerBoundPenIndex = 2
Trend1.Pens.Item(1).UpperBoundPenIndex = 3
End Sub

Pen 对象

提供反馈

对本文档有问题或反馈吗？请在这里提交您的反馈。