DrawRectangle Method [Visio 2003 SDK Documentation]

  • Article

Adds a rectangle to the Shapes collection of a page, master, or group.

objRet = object**.DrawRectangle** (x1, y1, x2, y2)

objRet     A Shape object that represents the new rectangle.

object     Required. An expression that returns a Page, Master, or Shape object on which to draw the rectangle.

x1     Required Double. The x-coordinate of one corner of the rectangle's width-height box.

y1     Required Double. The y-coordinate of one corner of the rectangle's width-height box.

x2     Required Double. The x-coordinate of the other corner of the rectangle's width-height box.

y2     Required Double. The y-coordinate of the other corner of the rectangle's width-height box.

Version added

2.0

Remarks

Using the DrawRectangle method is equivalent to using the Rectangle tool in the application. The arguments are in internal drawing units with respect to the coordinate space of the page, master, or group where the rectangle is being placed.

Example

The following example shows how to draw a rectangle on the active page.

Public Sub DrawRectangle_Example() 

    Dim vsoShape As Visio.Shape
 
    Set vsoShape = ActivePage.DrawRectangle(1, 4, 4, 1) 

End Sub

Applies to | Master object | Page object | Shape object