Shape.Rectangle

Property Rectangle As Rectangle

Member of Shape

The Rectangle property returns a Rectangle object that represents the properties of a rectangle shape.

The Rectangle property returns a read-only value.

The following code example sets the roundness of all rectangles on a page to 30%:

Sub Test() 
 Dim s As Shape 
 For Each s In ActivePage.Shapes 
  If s.Type = cdrRectangleShape Then 
   s.Rectangle.SetRoundness 30 
  End If 
 Next s 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.