以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 为什么图表不显示内容 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139598) |
-- 作者:yetle -- 发布时间:2019/8/16 17:35:00 -- 为什么图表不显示内容 If Forms("流水线生产进度").Opened Then Tables("流水线生产进度_Table1").Fill(" select 款号,颜色,尺码,工序号,工序名,SUM(件数) as 件数,订单号,制单号,客款号,货品名,系列 F ROM [xsc_erp].[dbo].[派发工序表] where 单据状态 = \'已完成\' group by 订单号,制单号,款号,客款号,货品名,系列,颜色,尺码,工序号,工序名 order by 工序号","xsc_erp",True) End If DataTables("流水线生产进度_Table1").Load() Dim Chart As WinForm.Chart \'定义一个图表变量 Dim Series As WinForm.ChartSeries \'定义一个图系变量 Chart = e.Form.Controls("Chart2") \' 引用窗口中的图表 Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮 Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形) Chart.DataSource = "流水线生产进度_Table1" \'设置绑定表 Chart.SeriesList.Clear() \'清除图表原来的图系 Series = Chart.SeriesList.Add() \'增加第一个图系 Series.Text = "工序完成情况" Series.X.DataField = "工序名" \'X轴绑定到产品列 Series.Y.DataField = "件数" \'Y轴绑定到数量列 Series.DataLabelText = "{#YVAL}" Chart.LegendVisible = True \'显示图列 Chart.LegendCompass= CompassEnum.South \'图列显示在南方 |
-- 作者:有点蓝 -- 发布时间:2019/8/16 17:40:00 -- 表格有没有数据?直接遍历赋值,不采用绑定的方式有没有问题:http://www.foxtable.com/webhelp/topics/0967.htm |
-- 作者:yetle -- 发布时间:2019/8/17 9:16:00 -- 表格有数据,图表不显示 |
-- 作者:有点蓝 -- 发布时间:2019/8/17 10:10:00 -- 实例发上来看看 |
-- 作者:yetle -- 发布时间:2019/8/17 10:24:00 -- 方法一增加编码增加图系和数据点图表也没有显示数据 |
-- 作者:有点蓝 -- 发布时间:2019/8/17 10:48:00 -- 上传实例说明 |