| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 图表跨年问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=128535) |
| -- 作者：zhenghangbo -- 发布时间：2018/12/10 9:19:00 -- 图表跨年问题 Dim Chart3 As WinForm.Chart \'定义一个图表变量 Dim Series3 As WinForm.ChartSeries \'定义一个图系变量 Dim t5 As Table = Tables("统计表5") \'定义一个变量t引用数据表 Chart3= Forms("主界面").Controls("Chart2") \' 引用窗口中的图表 Chart3.ChartType = ChartTypeEnum.Bar Chart3.VisualEffect = True Chart.DataSource = "统计表5" Chart3.SeriesList.Clear() \'清除图表原来的图系 Series3 = Chart3.SeriesList.Add() \'增加一个图系 Series3.Length = t5.Rows.Count \'图系的数据点数等于表的行数 For i As Integer = 0 To t5.Rows.Count - 1 \'指定每个数据点的位置 Series3.X(i) = t5.Rows(i)("月") \'指定水平坐标 Series3.Y(i) = t5.Rows(i)("故障次数") \'指定垂直坐标 Next Series3.DataLabelText = "{#YVAL}" 现在遇到跨年横坐标会被第二年的覆盖，怎么处理可以重新生成2019年的，或者2018年后面跟着2019年。
[此贴子已经被作者于2018/12/10 9:53:01编辑过]
|
| -- 作者：有点甜 -- 发布时间：2018/12/10 9:23:00 -- Dim Chart2 As WinForm.Chart \'定义一个图表变量 Dim Series2 As WinForm.ChartSeries \'定义一个图系变量 Dim t2 As Table = Tables("统计表4") \'定义一个变量t引用数据表 Dim sm2 As Integer = t2.Compute("Sum(故障次数)") Chart2= Forms("主界面").Controls("Chart3") \' 引用窗口中的图表 Chart2.VisualEffect = True \'加上这一行,让你的图表更漂亮 Chart2.ChartType = ChartTypeEnum.Pie \'图表1类型改为Bar(条形) Chart2.SeriesList.Clear Chart2.AxisX.ClearValueLabel For Each r As Row In t2.Rows Series2 = Chart2.SeriesList.Add() \'增加一个图系 Series2.Length = 1 \'一个系列只能包括一个值 Series2.Text = r("系统") & "(" & r("故障次数") & ")" \'设置图系的标题 Series2.Y(0) = r("故障次数") \'指定值 Series2.DataLabelText = Math.Round(r("故障次数")*100/sm2,2) & "%" Next Chart2.LegendVisible = True \'显示图列 Chart2.LegendCompass= CompassEnum.East |
| -- 作者：zhenghangbo -- 发布时间：2018/12/10 9:33:00 -- 能解释下加的那两句是什么意思吗？ AxisX.ClearValueLabel特别是这句是什么意思啊
|
| -- 作者：zhenghangbo -- 发布时间：2018/12/10 9:42:00 -- 刚才试了你的方法，没有效果啊。我把我电脑日期变了，没有重新生成 |
| -- 作者：zhenghangbo -- 发布时间：2018/12/10 9:54:00 -- 不好意思刚才程序考错了，是我生成统计表的时候有问题。 [此贴子已经被作者于2018/12/10 9:56:04编辑过]
|
| -- 作者：有点甜 -- 发布时间：2018/12/10 10:55:00 -- 以下是引用zhenghangbo在2018/12/10 9:54:00的发言：
不好意思刚才程序考错了，是我生成统计表的时候有问题。 [此贴子已经被作者于2018/12/10 9:56:04编辑过]
如果还有问题，做一个实例发上来测试。 |