Grady, here's some code I scraped to play with with. When you run it, you can read write and run MSChart properties and methods from the command window! Autocomplete and the VFP command window has revolutionalized the ways we can work with objects. It's better than VB Script Help *g.

. Right clicking the chart will roll through the first nine or ten chart types.

Ya know, some really cool presentation snap-ons could be built with MS Chart and VFP. Finally my VFP 9 arrives in a few days - can't wait - it is parsecs beyond 8 - and 8 ain't no slouch!

Run it - then enter in the command window:
myform.cntChart.ocxChart.footnote="My MSChart FootNote!"

*utChart.PRG (Terry)
PUBLIC myform as Form, nChartType as Integer 
nChartType=0
myform=CREATEOBJECT('frmChartClass')
myform.show

DEFINE CLASS frmChartClass as form
height=600
width=800
autocenter=.t.
caption=[MSChart (RightClick to Change Type)* ]+PROGRAM()
PROCEDURE release 
this.queryunload
ENDPROC 
PROCEDURE init
this.resize
ENDPROC 
PROCEDURE QueryUnload
CLEAR EVENTS
RELEASE ALL 
ENDPROC 
PROCEDURE resize
WITH this
.cntChart.resize(.height,.width)
ENDWITH 
ENDPROC 
ADD OBJECT cntChart as cntChartClass
visible =.t.
ENDDEFINE

DEFINE CLASS cntChartClass as Container
top = 0
left=0
backstyle=1
borderwidth=0
backstyle=0
PROCEDURE Init
cntChartInit(this)
ENDPROC 
PROCEDURE resize (nFormHeight,nFormWidth)
WITH this
.height=nFormHeight
.width=nFormWidth
.ocxChart.width=IIF(.Width>2,.width-2,2)
.ocxChart.height=IIF(.Height>2,.Height-2,2)
ENDWITH 
ENDPROC 
ADD OBJECT ocxChart as ocxChartClass
ENDDEFINE 

define class ocxChartClass as Olecontrol
OleClass="MSChart20Lib.MSChart.2"
BorderStyle=1
top=1
left=1
PROCEDURE mouseup (button, shift, x, y)
IF button=2
   this.ChartType = nChartType
   nChartType=IIF(nChartType+1>9,0,nChartType+1)
ENDIF 
visible=.f.
enddef && class cntToolBar as Container

PROCEDURE cntChartInit(oCnt)
with oCnt.ocxChart
.ChartType = 1
.COLUMNCOUNT = 8
.RowCount = 8
.Backdrop.Fill.Style= 1  && VtFillStyleBrush
   with .Backdrop.Fill.Brush.FillColor
   .red=255
   .green=255
   .blue=255
   ENDWITH &&.Backdrop.Fill.Brush.FillColor
*!* Populate the DataGrid Object.
FOR lnCol = 1 TO 8
FOR lnRow = 1 TO 8
.COLUMN = lnCol
.ROW = lnRow
.DATA = lnRow * 10
NEXT ROW
NEXT COLUMN
.ShowLegend = .T.
.visible=.t.
ENDWITH &&oCnt.ocxChart
ENDPROC
* END utChart (terry)