AddColorBand     Procedure (Sub)

Public Sub AddColorBand(zValue, Color1, Color2, Text)

Add another zColor band to the zColor table, which displays colors as a function of the z coordinate. After multiple calls to AddColorBand, the bands are sorted into numerical order, and colors are interpolated between the bands. When plotting, all surface points lower than the lowest zValue have Color1. Surface points between the first and second zValues have colors graduated between Color1 and Color2 of the second call to AddColorBand, etc.

ParameterTypeDescription

zValue

Variant

Value of z-coordinate for this color band to end

Color1

Variant

Color for surfaces with z coordinate equal to zValue from the previous call to AddColorBand

Color2

Variant

Color for surfaces with z coordinate equal to this zValue

Text

Variant

A text string to represent zValue on the zColor table

See Also..

SetzColorTableStyle   ClearColorBands  

Example..

With EcGraph3D1
    Call .ClearColorBands
    Call .AddColorBand(-1, vbBlue, vbBlue, "-1.0") 'Surface points lower than z = -1 are colored blue
    Call .AddColorBand(0, vbBlue, vbRed, "0.") 'Surface points between z = -1 to 0 are colored blue to red
    Call .AddColorBand(1, vbRed, vbGreen, "1.0") 'Surface points between z = 0 to 1 are colored red to green
    'Surface points with z > 1 to 0 are colored green
End With
 


     
Contents     Variables     Events     Properties     Functions     Subs

ecGraph3D    Copyright © 2008, Encore Consulting Pty Ltd