- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 图表重复 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98054)
-- 发布时间：2017/3/23 12:50:00
-- 图表重复
为什么类型重复显示呢，感谢 感谢
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Dim t As Table = Tables("财务汇总窗口_Table3") \'定义一个变量t引用数据表
Dim sm As Integer = t.Compute("Sum(支出金额)") \'计算总数量
Chart= Forms("财务汇总窗口").Controls("Chart1") \' 引用窗口中的图表
Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.Pie \'图表1类型改为Bar(条形)
For Each r As Row In t.Rows
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Length = 1 \'一个系列只能包括一个值
Series.Text = r("支出类型") & "(" & r("合计价格") & ")" \'设置图系的标题
Series.Y(0) = r("合计价格") \'指定值
Series.DataLabelText = Math.Round(r("合计价格")*100/sm,2) & "%" \'计算百分比
Next
Chart.LegendVisible = True \'显示图列
Chart.LegendCompass= CompassEnum.East \'图列显示在东方(右方)
感谢 感谢
此主题相关图片如下：捕获.png
-- 发布时间：2017/3/23 14:03:00
--
Tables("财务汇总窗口_Table3") 这个多少行。是什么数据
-- 发布时间：2017/3/23 14:05:00
--
被筛选出的表，
-- 发布时间：2017/3/23 14:17:00
--
你的数据重复，自然会重复，请对表进行统计后再生成
http://www.foxtable.com/webhelp/scr/0158.htm
-- 发布时间：2017/3/23 14:30:00
--
为什么用代码生成不可以呢 感谢 感谢
Dim tp As DateGroupEnum = 0
Dim g As New GroupTableBuilder("临时统计表", DataTables("财务汇总窗口_Table3"))
g.Groups.AddDef("支出日期", tp, "日期")
g.Totals.AddDef("支出类型")
g.Totals.AddDef("合计价格")
g.VerticalTotal = True
-- 发布时间：2017/3/23 15:21:00
--
设置好统计，然后拷贝人家的代码出来。
你最后的g.build都没写，肯定不生成。
-- 发布时间：2017/3/23 16:52:00
--
临时统计表不能在窗口表生成吗？
感谢 感谢
-- 发布时间：2017/3/23 17:22:00
--
以下是引用yangwenghd在2017/3/23 16:52:00的发言：
临时统计表不能在窗口表生成吗？
临时统计表不能在窗口表生成吗？
感谢 感谢
可以，参考
http://www.foxtable.com/webhelp/scr/1909.htm
-- 发布时间：2017/3/23 18:04:00
--
能在帮忙看看吗？为什么会生成在窗口的表格里面呢 感谢 感谢
-- 发布时间：2017/3/23 18:41:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:统计.table |