Share via


Shape.BringForward Method

Visio Automation Reference

Brings the shape or selected shapes forward one position in the z-order.

Version Information
 Version Added:  Visio 2.0

Syntax

expression.BringForward

expression   A variable that represents a Shape object.

Return Value
Nothing

Example

The following macro shows how to bring a shape forward in the z-order on a page.

Visual Basic for Applications
  
Public Sub BringForward_Example() 
Dim vsoShape1 As Visio.Shape 
Dim vsoShape2 As Visio.Shape 
Dim vsoShape3 As Visio.Shape 

'Draw three rectangles. 
Set vsoShape1 = ActivePage.DrawRectangle(1, 1, 4, 4) 
vsoShape1.Text = "1" 
Set vsoShape2 = ActivePage.DrawRectangle(2, 2, 5, 5) 
vsoShape2.Text = "2" 
Set vsoShape3 = ActivePage.DrawRectangle(3, 3, 6, 6) 
vsoShape3.Text = "3" 

'Bring vsoShape1 forward one position in the z-order. 
vsoShape1.BringForward 

End Sub

See Also