以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 图表问题---(已经完美解决-----感谢谢狐爸) (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=12434) |
||||
-- 作者:qhczy -- 发布时间:2011/9/2 17:35:00 -- 图表问题---(已经完美解决-----感谢谢狐爸)
如何实现双柱状,双折线图综合图表? [此贴子已经被作者于2011-9-8 15:35:51编辑过]
|
||||
-- 作者:狐狸爸爸 -- 发布时间:2011/9/2 18:20:00 --
|
||||
-- 作者:qhczy -- 发布时间:2011/9/5 16:07:00 -- 能根据所给的示例数据做个例字吗?你所给的例子中不明白X,Y轴应该怎么绑定到数据表. |
||||
-- 作者:紙上不談兵 -- 发布时间:2011/9/5 17:17:00 -- 以下是引用qhczy在2011-9-5 16:07:00的发言:
能根据所给的示例数据做个例字吗?你所给的例子中不明白X,Y轴应该怎么绑定到数据表. 你传个EXCEL2007上来,很多人打不开的,不如直接上传FoxTable文件 |
||||
-- 作者:qhczy -- 发布时间:2011/9/5 17:25:00 -- 已传示例 传个示例文件.
[此贴子已经被作者于2011-9-5 18:13:06编辑过]
|
||||
-- 作者:狐狸爸爸 -- 发布时间:2011/9/5 21:34:00 -- Dim t As Table = Tables("统计表") Dim Chart As WinForm.Chart \'定义一个图表变量 Dim Series As WinForm.ChartSeries \'定义一个图系变量 Dim Series2 As WinForm.ChartSeries \'定义一个图系变量 Chart= e.Form.Controls("Chart1") \' 引用窗口中的图表 Chart.SeriesList.Clear() \'清除图表原来的图系 Chart.ChartType =ChartTypeEnum.Bar Chart.ChartType2 = ChartTypeEnum.XYPlot Chart.SeriesList.Clear Chart.SeriesList2.Clear Chart.VisualEffect= True Series = Chart.SeriesList.Add Series2 = Chart.SeriesList2.Add Series.Length = t.Rows.Count Series2.Length = t.Rows.Count Series2.MarkSize = 0 Series2.MarkBorderWidth = 0 Series2.FitType = FitTypeEnum.Spline For i As Integer = 0 To t.Rows.count - 1 Series.X(i) = i \'指定水平坐标 Series.Y(i) = t.Rows(i)("计划") Series2.X(i) = i \'指定水平坐标 Series2.Y(i) = t.Rows(i)("完成") Chart.AxisX.SetValueLabel(i, t.Rows(i)("月份")) \'指定字符表 Next |
||||
-- 作者:qhczy -- 发布时间:2011/9/6 8:29:00 -- 狐爸这个是单柱单折线...不是想要的结果. |
||||
-- 作者:狐狸爸爸 -- 发布时间:2011/9/6 11:57:00 -- 你的表本来就只有计划和完成两个数据、 |
||||
-- 作者:qhczy -- 发布时间:2011/9/6 12:17:00 -- 你理解错了,我想要的是双柱双折线.如下图这个效果.把柱状和折线合并到一起.(不要Y2轴)
此主题相关图片如下:201192953011705.bmp
|
||||
-- 作者:qhczy -- 发布时间:2011/9/6 16:13:00 -- 顶一下. |