共9 条记录, 每页显示 10 条, 页签: [1]

标题：求助图表问题。（未解决）

1楼

张海兵 发表于：2011/9/6 16:21:00

狐爸帮忙看一下。我想要X轴绑定的客户显示的是累计值，不像现在这样一个个分开的。这个可以办到吗。密码0000

下载信息 [文件大小：下载次数： ]
点击浏览该文件:我的工作(1).rar

[此贴子已经被作者于2011-9-6 17:10:13编辑过]

2楼

张海兵 发表于：2011/9/6 16:53:00

狐爸搞不定也说句话

3楼

张海兵 发表于：2011/9/6 17:18:00

帮帮忙吧。

4楼

狐狸爸爸 发表于：2011/9/6 17:24:00

这个更简单，主动一点，不要太依赖别人。

不要用绑定，直接一个一个点地添加，Y轴的值设置为累计值，看这里的示例二：

http://www.foxtable.com/help/topics/0968.htm

Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Dim t As Table = Tables("业务大表") '定义一个变量t引用数据表
Chart= e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar
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) = i '指定水平坐标
    Series.Y(i) = t.Rows(i)("应收款合计") + t.Rows(i)("支出合计") + t.Rows(i)("利润分析") '指定垂直坐标
    Chart.AxisX.SetValueLabel(i, t.Rows(i)("客户")) '指定字符表示
Next
Chart.AxisX.AnnoWithLabels = True '启用字符标

e.Form.Controls("TextBox1").Value = DataTables("业务大表").Compute("Sum(应收款合计)")
e.Form.Controls("TextBox2").Value = DataTables("业务大表").Compute("Sum(支出合计)")
e.Form.Controls("TextBox3").Value = DataTables("业务大表").Compute("Sum(利润分析)")

[此贴子已经被作者于2011-9-6 17:23:58编辑过]

5楼

张海兵 发表于：2011/9/6 17:46:00

没用啊狐爸。你帮我弄弄吧。我看了帮助弄了半天了也没弄好。还有我是要合并客户。不是应收款加利润加支出

[此贴子已经被作者于2011-9-6 17:50:21编辑过]

6楼

狐狸爸爸 发表于：2011/9/6 17:48:00

下载信息 [文件大小：下载次数： ]
点击浏览该文件:我的工作.rar

7楼

张海兵 发表于：2011/9/6 17:54:00

不好意思我表达能力不强。我是要合并客户。不是应收款加利润加支出

8楼

狐狸爸爸 发表于：2011/9/6 17:55:00

这样不行的，你的先生成一个分组统计表，再根据这个统计表来生成报表。

9楼

张海兵 发表于：2011/9/6 17:57:00

谢谢狐爸

共9 条记录, 每页显示 10 条, 页签: [1]