API Documentation > CorelDRAW > 2025-v26 > EffectLens > IVGEffectLens
EffectLens.UseOutlineColor property
Gets or sets whether or not to use the outline color
Syntax:
Property Get UseOutlineColor() As Boolean
Property Let UseOutlineColor(ByVal Value As Boolean)
Remarks:
The UseOutlineColor property returns or specifies whether the outline color is used for a Wireframe lens. The following lens types do not accept color parameters: Brighten, Fish eye, Heat map, Invert, and Magnify.
Examples:
The following VBA example changes the color of all lenses on the page to red. For the Custom Color Map and Wireframe lenses, yellow is also used.
Sub Test()
Dim s As Shape, eff As Effect
For Each s In ActivePage.Shapes
  For Each eff In s.Effects

 If eff.Type = cdrLens Then


Select Case eff.Lens.Type


  Case cdrLensColorAdd, cdrLensColorLimit, _




cdrLensTintedGrayscale, cdrLensTransparency



 eff.Lens.Color.RGBAssign 255, 0, 0


  Case cdrLensCustomColorMap



 eff.Lens.FromColor.RGBAssign 255, 0, 0



 eff.Lens.ToColor.RGBAssign 255, 255, 0


  Case cdrLensWireframe



 With eff.Lens




.UseFillColor = True




.UseOutlineColor = True




.FillColor.RGBAssign 255, 0, 0




.OutlineColor.RGBAssign 255, 255, 0



 End With


End Select


Exit For

 End If
  Next eff
Next s 
End Sub