以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  做图表时遇到两个问题,请问大神们怎么处理?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113671)

--  作者:sunion0769
--  发布时间:2018/1/20 16:46:00
--  做图表时遇到两个问题,请问大神们怎么处理?

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180120164316.png
图片点击可在新窗口打开查看


做图表时遇到两个问题,请问大神们怎么处理?
1.如何去掉图表外面的的边框?
2.折线显示的数据能设置1位小数吗?

我的代码如下:
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.Bar \'图表1类型该为Bar(条形)
Chart.ChartType2 = ChartTypeEnum.XYPlot \'图表2类型该为线形
Chart.DataSource = "统计表" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系

Series = Chart.SeriesList.Add() \'增加第一个图系
Series.Text = "最高分"
Series.X.DataField = "班级" \'X轴绑定到产品列
Series.Y.DataField = "总分_最高分" \'Y轴绑定到数量列
Series.TooltipText = "X = {#XVAL}, Y = {#YVAL}"
Series.LineColor = Color.Blue \'设置该图系的颜色

Series = Chart.SeriesList.Add() \'增加第二个图系
Series.Text = "最低分"
Series.X.DataField = "班级" \'X轴绑定到产品列
Series.Y.DataField = "总分_最低分" \'Y轴绑定到数量列


Chart.SeriesList2.Clear() \'清除图表原来的图系
Series = Chart.SeriesList2.Add() \'给图表2增加一个图系
Series.Text = "平均分"
Series.X.DataField = "班级" \'X轴绑定到产品列
Series.Y.DataField = "总分_平均分" \'Y轴绑定到数量列
Series.DataLabelText = "{#YVAL}"

Chart.LegendVisible = True \'显示图列
Chart.LegendCompass= CompassEnum.South \'图列显示在南方(底端)

--  作者:有点蓝
--  发布时间:2018/1/20 16:58:00
--  
参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=104196&skin=0
--  作者:sunion0769
--  发布时间:2018/1/20 18:11:00
--  
数据显示已经搞定了,按照你的建议,代码改成Series.DataLabelText = "{#YVAL:0.0}",非常感谢!
顺便问一下,第2个问题,要去掉图表的边框,有什么办法没?!


--  作者:有点甜
--  发布时间:2018/1/21 23:17:00
--  
以下是引用sunion0769在2018/1/20 18:11:00的发言:
数据显示已经搞定了,按照你的建议,代码改成Series.DataLabelText = "{#YVAL:0.0}",非常感谢!
顺便问一下,第2个问题,要去掉图表的边框,有什么办法没?!

 

这个意思? http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=106658&skin=0