vfp6 用这个代码创的图表

#define crlf chr(13)+chr(10)
#define tab chr(9)
local lcdata
select month(交货日期) as 交货日期,金额 from 订单 order by 交货日期 into cursor temp
select 交货日期,sum(金额) as 金额 from temp group by 交货日期 order by 交货日期 into cursor temp

select temp
lcdata=""+tab+"金额"+crlf

scan
lcdata=lcdata+str(交货日期)
lcdata=lcdata+tab
lcdata=lcdata+alltrim(str(金额))+crlf
endscan

select vfpgraph
append general olegraph data lcdata CLASS "MsGraph.Chart"
thisform.refresh

不耻下问: 如何将红线数值标注落图表中,使图表更直观?
          两个select临时表的语句简化如何写
水平有限才来报到,见笑,谢了