- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 图表问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61179)
-- 发布时间：2014/12/8 14:16:00
-- 图表问题
代码及窗体如下
此主题相关图片如下：无标题1.png
出错信息如下
此主题相关图片如下：无标题2.png
此主题相关图片如下：无标题2.png-- 发布时间：2014/12/8 14:18:00
--
运行结果如下
此主题相关图片如下：无标题3.png
-- 发布时间：2014/12/8 14:20:00
--
代码：
Dim g As New GroupTableBuilder("统计表12", DataTables("出库"))
g.Groups.AddDef("出库日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("出库日期", "月")
g.Totals.AddDef("出库数量", "", "数量_值")
g.Totals.AddDef("金额", "", "金额_值")
g.Totals.AddDef("利润", "", "利润_值")
g.SamePeriodGrowth = True
g.CircleGrowth = True
g.VerticalTotal = True \'自动垂直汇总
Tables("月销售曲线_Table1").DataSource = g.BuildDataSource()
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Dim t As Table = Tables("月销售曲线_table1") \'定义一个变量t引用数据表
Chart= e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Length = t.Rows.Count \'图系的数据点数等于表的行数
For i As Integer = 0 To t.Rows.Count - 1 \'指定每个数据点的位置
Series.X(i) = t.Rows(i)("月") \'指定水平坐标
Series.Y(i) = t.Rows(i)("金额") \'指定垂直坐标
Next
-- 发布时间：2014/12/8 14:24:00
--
问题：根据生成统计表生成按月的曲线图。曲线图没有出来
-- 发布时间：2014/12/8 14:30:00
--
在线等
-- 发布时间：2014/12/8 14:36:00
--
是不是你的列名写错了啊？ Series.Y(i) = t.Rows(i)("金额")
做个小例子上来看看
-- 发布时间：2014/12/8 14:40:00
--
请帮忙看看，所有的东西，包括窗体，执行过程，代码都在上面，帮助也看了很多遍，唯一可能有错的地方在
此主题相关图片如下：无标题4.png
，这是帮助中的列子，感觉问题是出在这，但又没法解决，谢谢，在线等。-- 发布时间：2014/12/8 14:58:00
--
另外，提个建议，可否在命令窗口中加入分布执行的按钮？
顺便也顶下，免得沉底了
-- 发布时间：2014/12/8 15:02:00
--
最简单的，是你上传一个例子；
或者，你直接查看一下生成的表的表结构 http://www.foxtable.com/help/topics/0193.htm
-- 发布时间：2014/12/9 11:22:00
--
问题已解决，原来是因为自动合计的问题，自动合计去掉后一切正常