Microsoft graph控件(VFP或OFFICE2000可安装)
以下是通过程序控制图表的变化。
crlf= CHR(13)+CHR(10)
TAB =CHR(9)
data_1=crlf
GOTO TOP
DO WHILE NOT EOF()
data_1=data_1+ALLT(bad)+TAB+STR(yield,4,1)+crlf
SKIP
ENDDO
IF NOT USED("graph_b")
SELE 0
USE graph_b
ENDIF
SELE graph_b
APPEND GENERAL test DATA data_1