Plot Object Example

The following example sets the chart viewing distance and axis division spacing.

Private Sub Command1_Click()
   ' Change the chart type to 3D Bar.
   MSChart1.ChartType = VtChChartType3dBar
   With MSChart1.Plot
      ' Changes 3d bar chart's viewing.
      .DepthToHeightRatio = 2
      .WidthToHeightRatio = 2
      ' Changes the spacing between divisions on the
      ' X-Axis.
      .xGap = 0
      ' Changes the spacing between divisions on the
      ' Z-Axis.
      .zGap = 0.8
   End With
End Sub