MSCHART在VFP50中如何使用
编号：QA002585
建立日期: 2000年2月17日 最后修改日期：2000年2月17日
所属类别：
rose:
操作系统：win9.X
编程工具：vfp50
问题：MSCHART在VFP50中如何使用,有否详细说明,或者源程序(要求根据数据不同,图形能变化)谢谢
回答:
********
Sele chart1
no=reccount()
Thisform.olecontrol1.ChartType = 3
Thisform.olecontrol1.ColumnCount = 1
Thisform.olecontrol1.RowCount = no
Thisform.olecontrol1.columnlabel="销售金额"
****************
Thisform.olecontrol1.titletext='销售曲线' &&表示标题
Thisform.olecontrol1.ShowLegend =.f. &&表示图例
*****************
For i=1 to no step 1
Sele chart1
go i
rq=chart1.riqi
je=chart1.jine
Thisform.olecontrol1.Row = i
Thisform.olecontrol1.Rowlabel = rq
Thisform.olecontrol1.Data = je
Endfor &&将图表作为图例的背景。
附chart1的库结构如下:
riqi D 8
jine N 11 2
把以上代码放入一表单中，运行该表单（图表会随着chart1库的变化而变化！）
此问题由qiud回答。
| |
|
|
| |
|
|
