图表控件MsChart使用demo
chart 控件主要有 Titles 标题集合 Chart Area图形显示区域 Series图表集合 Legends图列的集合
(1) 常用事件:
1. Series1.Points.DataBind()绑定数据点集合,如果要在一个MSChart控件的一个绘图区(ChartArea)内添加多个不同数据源的图表,就用这个主动绑定数据集合的方法。可以将表中指定字段的值绑定到指定的坐标轴上。
2. MSChart1.DataBind()给整个MSChart绑定一个数据源,该MSChart中的图表全部可以使用该数据源作为统计来源
(2)MSChart的元素组成,最常用的属性包括:
ChartAreas:增加多个绘图区域,每个绘图区域包含独立的图表组、数据源,用于多个图表类型在一个绘图区不兼容时。
AlignmentOrientation:图表区对齐方向,定义两个绘图区域间的对齐方式。
AlignmentStyle:图表区对齐类型,定义图表间用以对其的元素。
AlignWithChartArea:参照对齐的绘图区名称。
InnerPlotPosition:图表在绘图区内的位置属性。
Auto:是否自动对齐。
Height:图表在绘图区内的高度(百分比,取值在0-100)
Width:图表在绘图区内的宽度(百分比,取值在0-100)
X,Y:图表在绘图区内左上角坐标
Position:绘图区位置属性,同InnerPlotPosition。
Name:绘图区名称。
Axis:坐标轴集合
Title:坐标轴标题
TitleAlignment:坐标轴标题对齐方式
Interval:轴刻度间隔大小
IntervalOffset:轴刻度偏移量大小
MinorGrid:次要辅助线
MinorTickMark:次要刻度线
MajorGrid:主要辅助线
MajorTickMark:主要刻度线
DataSourceID:MSChart的数据源。
Legends:图例说明。
Palette:图表外观定义。
(3)Series:最重要的属性,图表集合,就是最终看到的饼图、柱状图、线图、点图等构成的集合;可以将多种相互兼容的类型放在一个绘图区域内,形成复合图。
IsValueShownAsLabel:是否显示数据点标签,如果为true,在图表中显示每一个数据值
Label:数据点标签文本
LabelFormat:数据点标签文本格式
LabelAngle:标签字体角度
Name:图表名称
Points:数据点集合
XValueType:横坐标轴类型
YValueType:纵坐标轴类型
XValueMember:横坐标绑定的数据源(如果数据源为Table,则填写横坐标要显示的字段名称)
YValueMembers:纵坐标绑定的数据源(如果数据源为Table,则填写纵坐标要显示的字段名称,纵坐标可以有两个)
ChartArea:图表所属的绘图区域名称
ChartType:图表类型(柱形、饼形、线形、点形等)
Legend:图表使用的图例名称
Titles:标题集合。
width:MSChart的宽度。
height:MSChart的高度。
4.例子
Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim dt As DataTable
dt = CreateDataTable() SetMSChartStyle()
ConvertChart(dt) 'databind
Chart1.DataBind()
End Sub Private Function CreateDataTable() As DataTable
Dim dt As New DataTable
'Add three columns to the DataTable
dt.Columns.Add("Date") 'X
dt.Columns.Add("Series1") 'data1
dt.Columns.Add("Series2") 'data2
dt.Columns.Add("Series3") 'data1
dt.Columns.Add("Series4") 'data2
dt.Columns.Add("Series5") 'data1
dt.Columns.Add("Series6") 'data2 Dim dr As DataRow
'Add rows to the table which contains some random data for demonstration
Dim rnd As New Random
Dim i As Double
For i = To Step 0.2
dr = dt.NewRow()
dr("Date") = i
dr("Series1") = + rnd.Next(, )
dr("Series2") = + rnd.Next(, )
dr("Series3") = + rnd.Next(, )
dr("Series4") = + rnd.Next(, )
dr("Series5") = + rnd.Next(, )
dr("Series6") = + rnd.Next(, )
dt.Rows.Add(dr)
Next CreateDataTable = dt
End Function Private Sub ConvertChart(dt As DataTable)
For Each dr As DataRow In dt.Rows
Dim s As Double = dr("Date")
Chart1.Series("Series1").Points.AddXY(s, dr("Series1"))
Chart1.Series("Series2").Points.AddXY(s, dr("Series2"))
Chart1.Series("Series3").Points.AddXY(s, dr("Series3"))
Chart1.Series("Series4").Points.AddXY(s, dr("Series4"))
Chart1.Series("Series5").Points.AddXY(s, dr("Series5"))
Chart1.Series("Series6").Points.AddXY(s, dr("Series6"))
Next
End Sub '/ <summary>
'/ 设置mschart样式
'/ </summary>
Private Sub SetMSChartStyle()
' 坐标轴设置
Chart1.ChartAreas().AxisY.IsMarginVisible = False
Chart1.ChartAreas().AxisY.LabelStyle.Enabled = False
Chart1.ChartAreas().AxisX.IsMarginVisible = False
Chart1.ChartAreas().AxisX.LabelStyle.Enabled = False '设置当前X轴Label自动设置格式 = 关闭
Chart1.ChartAreas().AxisX.LabelAutoFitStyle = DataVisualization.Charting.LabelAutoFitStyles.None ''设置当前X轴Label的双行显示格式= 关闭,这个会影响到Y轴线条的显示
Chart1.ChartAreas().AxisX.LabelStyle.IsStaggered = False
''.设置当前X轴Label的显示间隔周期=1 (1个项目) (=2的意思: 间隔2个项目显示...以此类推)
'Chart1.ChartAreas(0).AxisX.LabelStyle.Interval = 1
'X 轴坐标最大最小值
Chart1.ChartAreas().AxisX.Minimum =
Chart1.ChartAreas().AxisX.Maximum = 'X 轴坐标最大最小值
Chart1.ChartAreas().AxisY.Minimum =
Chart1.ChartAreas().AxisY.Maximum = ' 坐标轴刻度线不延长出来设置
Chart1.ChartAreas().AxisX.MajorTickMark.Enabled = False
Chart1.ChartAreas().AxisY.MajorTickMark.Enabled = False 'X 次要辅助线设置
Chart1.ChartAreas().AxisX.MinorGrid.Enabled = True
'X 次要辅助线间距
Chart1.ChartAreas().AxisX.MinorGrid.Interval = 0.5
'X 次要辅助线颜色
Chart1.ChartAreas().AxisX.MinorGrid.LineColor = Color.LightGray
Chart1.ChartAreas().AxisX.MinorGrid.LineDashStyle = DataVisualization.Charting.ChartDashStyle.Dash 'Y 次要辅助线设置
Chart1.ChartAreas().AxisY.MinorGrid.Enabled = True
'Y 次要辅助线间距
Chart1.ChartAreas().AxisY.MinorGrid.Interval =
'Y 次要辅助线颜色
Chart1.ChartAreas().AxisY.MinorGrid.LineColor = Color.LightGray
Chart1.ChartAreas().AxisY.MinorGrid.LineDashStyle = DataVisualization.Charting.ChartDashStyle.Dash 'X 主要辅助线设置
Chart1.ChartAreas().AxisX.MajorGrid.Enabled = True
'X 主要辅助线间距
Chart1.ChartAreas().AxisX.MajorGrid.Interval =
'X 主要辅助线颜色
Chart1.ChartAreas().AxisX.MajorGrid.LineColor = Color.Black
Chart1.ChartAreas().AxisX.MajorGrid.LineDashStyle = DataVisualization.Charting.ChartDashStyle.Solid 'Y 主要辅助线设置
Chart1.ChartAreas().AxisY.MajorGrid.Enabled = True
'Y 主要辅助线间距
Chart1.ChartAreas().AxisY.MajorGrid.Interval =
'Chart1.ChartAreas(0).AxisY.MajorGrid.IntervalOffset = 1000
'Y 主要辅助线颜色
Chart1.ChartAreas().AxisY.MajorGrid.LineColor = System.Drawing.Color.FromArgb(CType(CType(, Byte), Integer), CType(CType(, Byte), Integer), CType(CType(, Byte), Integer))
Chart1.ChartAreas().AxisY.MajorGrid.LineDashStyle = DataVisualization.Charting.ChartDashStyle.Solid '坐标主要辅助线刻度间距
Chart1.ChartAreas().AxisX.Interval =
Chart1.ChartAreas().AxisY.Interval = '边框样式设置
Chart1.ChartAreas().BorderColor = Color.Black
Chart1.ChartAreas().BorderDashStyle = DataVisualization.Charting.ChartDashStyle.Solid
Chart1.ChartAreas().BorderWidth = '图例文字
'Chart1.Series["Series"].LegendText = "当前" '图例位置、字体设置;坐标轴位置设定
'Chart1.Legends[0].Position = new ElementPosition(10, 10, 88, 7)
'Chart1.Legends[0].Font = new Font("宋体", 9)
'Chart1.ChartAreas[0].InnerPlotPosition = new ElementPosition(1, 1, 1, 1)
End Sub Private Sub CmbYMax_SelectedValueChanged(sender As Object, e As EventArgs) Handles CmbYMax.SelectedValueChanged
Chart1.ChartAreas().AxisY.Maximum = CmbYMax.Text
End Sub Private Sub CmbYMin_SelectedValueChanged(sender As Object, e As EventArgs) Handles CmbYMin.SelectedValueChanged
Chart1.ChartAreas().AxisY.Minimum = CmbYMin.Text
End Sub Private Sub CmbXMin_SelectedValueChanged(sender As Object, e As EventArgs) Handles CmbXMin.SelectedValueChanged
Chart1.ChartAreas().AxisX.Minimum = Convert.ToDouble(CmbXMin.Text)
End Sub Private Sub CmbXMax_SelectedValueChanged(sender As Object, e As EventArgs) Handles CmbXMax.SelectedValueChanged
Chart1.ChartAreas().AxisX.Maximum = Convert.ToDouble(CmbXMax.Text)
End Sub Private Sub CheckBox_1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox_1.CheckedChanged, CheckBox_6.CheckedChanged, CheckBox_5.CheckedChanged, CheckBox_4.CheckedChanged, CheckBox_3.CheckedChanged, CheckBox_2.CheckedChanged
If (sender.Name.Split("_").length = ) Then
Dim seriesName As String = "Series" + sender.Name.Split("_")()
If sender.Checked = True Then
Chart1.Series(seriesName).Enabled = True
Else
Chart1.Series(seriesName).Enabled = False
End If
End If
End Sub
End Class
图表控件MsChart使用demo的更多相关文章
- 问题:MSChart.exe;结果:微软图表控件MsChart使用方法及各种插件下载地址
微软图表控件MsChart使用方法及各种插件下载地址 (2012-08-10 17:32:33) 转载▼ 标签: 图表 控件 下载地址 kernel32 微软 it 分类: C# 昨天在网上看到了微软 ...
- asp.net微软图表控件MsChart
前段时间,开发项目时,由于需要,需要将一些数据统计,并以图表形式显示.由于是asp.net,所以就找到了MsChart图表控件,还是挺方便实用的,分享一下. MsChart控件的主要组成如图所示 工具 ...
- 微软图表控件MsChart使用
assemblies节点下:<add assembly="System.Web.DataVisualization, Version=3.5.0.0, Culture=neutral, ...
- .net chart(图表)控件的使用-System.Windows.Forms.DataVisualization.dll
这个案例指在介绍微软这套免费又功能强大的图表控件Microsoft Chart Controls for Microsoft .NET Framework 3.5,通过它,可让您的项目及报表,轻松套用 ...
- 比achartengine更加强大的Android图表控件。
比achartengine更加强大的图表控件MPAndroidChart. 详细使用及demo:http://www.see-source.com/androidwidget/detail.html? ...
- 基于MVC4+EasyUI的Web开发框架经验总结(4)--使用图表控件Highcharts
在我们做各种应用的时候,我们可能都会使用到图表统计,以前接触过一些不同的图表控件,在无意中发现了图表控件Highcharts,其强大的功能和丰富的互动效果,令人难以忘怀.本篇主要介绍在Web开发中使用 ...
- echart图表控件配置入门(二)常用图表数据动态绑定
上一节 <echart图表控件配置入门(一)>介绍了echarts图表控件的入门配置,使开发人员可以快速搭建出一个静态的图表.但是在实际开发过程这还是不够的,不可能所有的图表控件都是静态数 ...
- echart图表控件配置入门(一)
现在主流的web图表控件主要有hightchart.fusionchart.echart: echart作为百度前端部门近期推出的一个基于html5的免费图表控件,以其丰富图表类型和良好的兼容性速度得 ...
- asp.net微软图表控件使用示例
<configuration> <system.webServer> <handlers> <remove name="ChartImageHand ...
随机推荐
- android小细节
1.资源包图片尽量控制在50k以内,否则可能读取失败 2.资源图片建议使用png格式,此格式在android系统上支持最好.对于jpeg和gif格式的图片,在android4.0以后版本,通过系统自缩 ...
- Arch-Linux-添加中文字体
代码下载: Arch-Linux-添加中文字体.txt
- DPdao
hrbust1053 http://acm.hrbust.edu.cn/index.php?m=ProblemSet&a=showProblem&problem_id=1053 #in ...
- 多媒体编程基础之RGB和YUV
一.概念 1.什么是RGB? 对一种颜色进行编码的方法统称为“颜色空间”或“色域”.用最简单的话说,世界上任何一种颜色的“颜色空间”都可定义成一个固定的数字或变量.RGB(红.绿.蓝)只是众多颜色空间 ...
- 慕课网-安卓工程师初养成-3-9 Java中运算符的优先级
来源 http://www.imooc.com/code/1315 所谓优先级,就是在表达式中的运算顺序.Java 中常用的运算符的优先级如下表所示: 级别为 1 的优先级最高,级别 11 的优先级最 ...
- PostMessage与SendMessage的区别(二)
在做基于窗口的Windows程序的时候,我们避免不了要向窗口发送消息,有两种方式,一种是PostMessage,另外一种是SendMessage.关于这两个宏,我是通过狠狠的看MSDN才搞明白的,那里 ...
- yii中的若干问题
一直觉得”程序猿“是个很细致的工作,就像绣花一样,一不小心缝错一针,就可能是个很大的bug,但是为什么平时看起来大而化之的男同胞们确能在这方面如此care呢?? 以下进入正文,省去华丽丽的词语,这里仅 ...
- 学习记录 java 值类型和引用类型的知识
1. Java中值类型和引用类型的不同? [定义] 引用类型表示你操作的数据是同一个,也就是说当你传一个参数给另一个方法时,你在另一个方法中改变这个变量的值, 那么调用这个方法是传入的变量的值也将改变 ...
- 在 JNI 编程中避免内存泄漏
JAVA 中的内存泄漏 JAVA 编程中的内存泄漏,从泄漏的内存位置角度可以分为两种:JVM 中 Java Heap 的内存泄漏:JVM 内存中 native memory 的内存泄漏. Java H ...
- SimpleAdapter类使用方法
SimpleAdapter的构造函数是: public SimpleAdapter (Context context, List<? extends Map<String, ?>&g ...