以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  为何不能生成图表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1281)
--  作者：小狐
--  发布时间：2008/11/30 17:42:00
--  为何不能生成图表

公式为:

dim a as winform.chart
dim b as winform.chartseries
dim c as list (of string)
c = datatables("订单").getuniquevalues("","产品")
a = forms("窗口2").controls("chart1")
a.serieslist.clear()
b = a.serieslist.add()
b.length = c.count
for  i as integer = 0 to c.count-1
 b.x(i) = i
 b.y(i) = datatables("订单").compute("sum(金额)","[产品] = \'"& c(i) &"\' ")
 a.axisx.setvaluelabel(i,c(i))
next
 a.AxisX.AnnoWithLabels = True

哪里错了????
--  作者：狐狸爸爸
--  发布时间：2008/12/1 8:17:00
--  
兄弟，你得先打开这个窗口2，这段代码才会有效。
我用你的代码测试，没有任何问题的。