SubPath.SizeWidth

Property SizeWidth As Double

The SizeWidth property returns the horizontal size of a subpath as if it were a separate shape object. This property is measured in document units.

The SizeWidth property returns a read-only value.

The following code example draws a bounding rectangle around each subpath in the selected curve:

Sub Test() 
 Dim sp As SubPath 
 Dim x As Double, y As Double 
 ActiveDocument.ReferencePoint = cdrBottomLeft 
 For Each sp In ActiveShape.Curve.Subpaths 
  sp.GetPosition x, y 
  ActiveLayer.CreateRectangle2 x, y, sp.SizeWidth, sp.SizeHeight 
 Next sp 
End Sub