DirectionalLightIntensity Property

This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.

Returns or sets a Double specifying the intensity of the directional light source for a three-dimensional chart. Valid settings range from 0 to 1. Read/write.

expression.DirectionalLightIntensity

expression   Required. An expression that returns a ChChart object.

Example

This example converts the first chart in Chartspace1 to a 3-D Bar chart and sets the lighting options for the chart.

  Sub Format_3D_LightSources()

    Dim cht3DBar

    ' Set a variable to the first chart in Chartspace1.
    Set cht3DBar = ChartSpace1.Charts(0)

    ' Change the chart to a 3D Bar chart.
    cht3DBar.Type = chChartTypeBar3D

    ' Set the intensity of the ambient light.
    cht3DBar.AmbientLightIntensity = 0.7

    ' Set the inclination of the directional light source.
    cht3DBar.DirectionalLightInclination = 35

    ' Set the intensity of the directional light source.
    cht3DBar.DirectionalLightIntensity = 0.8

    ' Set the rotation of the directional light source.
    cht3DBar.DirectionalLightRotation = 120
End Sub