Foxtable(狐表) → 用户栏目 → 专家坐堂 → 图表重复


  共有3337人关注过本帖树形打印复制链接

主题：图表重复
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		图表重复  发帖心情 Post By：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
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/23 14:05:00 [显示全部帖子]

被筛选出的表，

 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：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
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/23 16:52:00 [显示全部帖子]

临时统计表不能在窗口表生成吗？
感谢 感谢
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/23 18:04:00 [显示全部帖子]

能在帮忙看看吗？为什么会生成在窗口的表格里面呢 感谢 感谢 
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:统计.table
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/23 20:58:00 [显示全部帖子]

谢谢 谢谢 ，可以是统计窗口表的内容吗？不显示到窗口表，然后生成图表，比如先点年，或者月，然后统计窗口表的内容，然后点击图表生成图表  感谢 感谢 

 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/24 16:33:00 [显示全部帖子]

为什么从窗口表格生成就不行了啊
Dim b As New GroupTableBuilder("统计表1",DataTables("财务汇总窗口_Table3"))
b.Groups.AddDef("支出类型") 
b.Totals.AddDef("合计价格")
b.Build '生成统计表
MainTable = Tables("统计表1") '打开生成的统计表
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/24 19:29:00 [显示全部帖子]

谢谢  可以是从窗口表已经筛选出的内容生成为 统计表1 吗？

 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/24 21:27:00 [显示全部帖子]

找不到指定的窗口表  感谢 感谢 
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:统计.table


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20170324212539.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/3/24 22:51:00 [显示全部帖子]

我把表A 需要的内容筛选到窗口表（点击，年 月） 然后在把筛选出来的表统计到临时表，在设计另外一个按钮为图表，图表的应该没有问题，就是在已经筛选出到窗口表后，再把窗口表的内容统计到临时表会出错，把代码放到按钮里面 不知道对不对 感谢 感谢 

 回到顶部
总数 17 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07422 秒, 7 次数据查询