Previous Document Next Document

Object Model Reference : Classes : E : EffectExtrude : Methods : EffectExtrude.Rotate


EffectExtrude.Rotate

Sub Rotate(AngleX As Double, AngleY As Double, AngleZ As Double)

Description

Member of EffectExtrude

The Rotate method rotates an extrusion in three-dimensional space.

 

Parameter
Description
AngleX
Specifies the degree of the rotation along the x-axis
AngleY
Specifies the degree of the rotation along the y-axis
AngleZ
Specifies the degree of the rotation along the z-axis

VBA example

The following VBA example creates a rotated and extruded text shape.

Sub Test()
 Dim s As Shape
 Set s = ActiveLayer.CreateArtisticText(2.75, 5, "Text")
 With s.Text.FontProperties
  .Name = "Arial Black"
  .Size = 150
 End With
 s.Fill.UniformColor.RGBAssign 0, 0, 255
 s.Outline.SetProperties 0.01, , CreateRGBColor(0, 0, 0)
 With s.CreateExtrude(cdrExtrudeSmallBack, cdrVPLockedToShape, 4, 8, , cdrExtrudeSolidFill, CreateRGBColor(0, 128, 0)).Extrude
  .Rotate 10, 20, 30
 End With
End Sub

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.