Example: Width property

Private Sub SetPenWide()
Dim s, t As String
t = Trend1.Pens.Item(1).Description
s = "The line was " & Trend1.Pens.Item(1).Width & " wide."
MsgBox s, vbOKOnly, t
Trend1.Pens.Item(1).Width = 5
End Sub

Pen object

Provide Feedback

Have questions or feedback about this documentation? Please submit your feedback here.