- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何改进图表下端标识 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147066)
-- 发布时间：2020/3/9 9:54:00
-- 如何改进图表下端标识
请问一下，图表的下面怎么能减少2月，，，，，，，3月。。。。。。。，本来就只有两个月的数据
此主题相关图片如下：qq图片20200309095455.png
-- 发布时间：2020/3/9 10:35:00
--
写了什么代码？贴出来
-- 发布时间：2020/3/9 12:14:00
--
Dim g As New GroupTableBuilder("统计表6", DataTables("价格管理"))
g.Groups.AddDef("商品名称")
g.Groups.AddDef("型号")
g.Groups.AddDef("日期", DateGroupEnum.Month, "月")
g.Totals.AddDef("现货价格", AggregateEnum.Average, "现货价")
g.Build()
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Dim t As Table = Tables("统计表6") \'定义一个变量t引用数据表
Chart= Forms("价格管理").Controls("Chart2") \' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形)
Chart.DataSource = "统计表6" \'设置绑定表
Chart.AxisX.AnnoFormatString = "0月"
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.X.DataField = "月" \'X轴绑定到产品列
Series.Y.DataField = "现货价" \'Y轴绑定到数量列
\'Chart.BarClusterWidth = 30
Series.DataLabelText = "{#YVAL}"
Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮
Chart.LegendVisible = True \'显示图列
Series.Text = "现货价格"
Chart.LegendCompass= CompassEnum.South \'图列显示在南方(底端)
Tables("统计表6").Visible = False
-- 发布时间：2020/3/9 14:09:00
--
蓝版，请帮助看看啊
-- 发布时间：2020/3/9 14:44:00
--
蓝版，请帮助看看啊 |
-- 发布时间：2020/3/9 14:47:00
--
看看生成的统计表的数据是怎么样的？
-- 发布时间：2020/3/9 14:49:00
--
此主题相关图片如下：qq图片20200309144935.png
-- 发布时间：2020/3/9 15:16:00
--
不能使用绑定，改为方法二：http://www.foxtable.com/webhelp/topics/0968.htm