AutoFloatingBar Object
The AutoFloatingBar object controls the settings for 2D floating bar charts.
Derived from: AutoPlot object (All methods and properties of AutoPlot apply to this object.)
Properties
Methods
Example
This example shows how to create a floating bar plot.
Sub Main
'Declares GrapherApp as an object
Dim GrapherApp As Object
'Creates an instance of the Grapher Application object
'and assigns it to the variable named "GrapherApp"
Set GrapherApp = CreateObject("Grapher.Application")
'Make Grapher visible
GrapherApp.Visible = True
'Declare Docs Plot, Shapes, Graph1,
'and Floating1 as Object
Dim Docs, Plot, Shapes, Graph1, Floating1 As Object
'Assigns the Documents collection to the
'variable named "Docs"
Set Docs = GrapherApp.Documents
'Creates a new plot window and assigns it to
'the variable named "Plot"
Set Plot = Docs.Add(grfPlotDoc)
'Assigns the AutoShapes collection to
'the variable named "Shapes"
Set Shapes = Plot.Shapes
'Adds a floating bar chart and assigns it
'to the variable named "Graph1"
Set Graph1 = Shapes.AddFloatingBarGraph(GrapherApp.Path+\samples\floatingbars.dat)
'Assigns the floating bar plot to the
'variable named "Floating1"
Set Floating1 = Graph1.Plots(1)
End Sub