API Documentation > CorelDRAW > 2025-v26 > EffectDropShadow > IVGEffectDropShadow
EffectDropShadow.PerspectiveAngle property
Gets or sets the feather perspective angle
Syntax:
Property Get PerspectiveAngle() As Double
Property Let PerspectiveAngle(ByVal Value As Double)
Remarks:
The PersectiveAngle returns or specifies the angle of a perspective drop shadow.
Examples:
The following VBA example converts all flat drop shadows to perspective drop shadows.
Sub Test()
Dim s As Shape
For Each s In ActivePage.Shapes
  If s.Type = cdrDropShadowGroupShape Then

 With s.Effect.DropShadow


If .Type = cdrDropShadowFlat Then


  .Type = cdrDropShadowBottom


  .PerspectiveAngle = 45


  .PerspectiveStretch = -0.5


End If

 End With
  End If
Next s 
End Sub