资源描述：
《vb mschart控件的使用》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、一、先看个小例子PrivateSubForm_Load()DimMyData(20,1)AsDouble'-----x轴坐标值-----Y轴坐标值----------MyData(0,0)=0:MyData(0,1)=180'本句代表了：第一点数据的X轴坐标为0，Y轴坐标为180MyData(1,0)=6:MyData(1,1)=60MyData(2,0)=8:MyData(2,1)=60MyData(3,0)=11:MyData(3,1)=0MyData(4,0)=16:MyData(4,1)=0MyData(5,0)=19:MyData(5,1)=60MyData(6,0)=25.8:
2、MyData(6,1)=60MyData(7,0)=28.8:MyData(7,1)=0MyData(8,0)=31.8:MyData(8,1)=60MyData(9,0)=40.3:MyData(9,1)=60MyData(10,0)=43.3:MyData(10,1)=0MyData(11,0)=93.3:MyData(11,1)=0MyData(12,0)=96.3:MyData(12,1)=60MyData(13,0)=99.3:MyData(13,1)=0MyData(14,0)=105.3:MyData(14,1)=0MyData(15,0)=135.3:MyData(15,1
3、)=0MyData(16,0)=144.3:MyData(16,1)=180MyData(17,0)=148.8:MyData(17,1)=270MyData(18,0)=405.03:MyData(18,1)=270MyData(19,0)=409.53:MyData(19,1)=180MyData(20,0)=564.17:MyData(20,1)=180'波形图外观设置WithMSChart1.TitleText="速度m/min"''设置图线的外观.Plot.SeriesCollection(1).Pen.Width=30.Plot.SeriesCollection(1).Pen.
4、Style=VtPenStyleSolid''设置XY轴.Plot.Axis(VtChAxisIdX).ValueScale.Auto=False.Plot.Axis(VtChAxisIdY).ValueScale.Auto=False'//设置最大值.Plot.Axis(VtChAxisIdX).ValueScale.Maximum=600'设置横轴标注最大值.Plot.Axis(VtChAxisIdY).ValueScale.Maximum=300'设置纵轴标注最大值'//设置最小值.Plot.Axis(VtChAxisIdY).ValueScale.Minimum=0.Plot.Ax
5、is(VtChAxisIdX).ValueScale.Minimum=0'//.Plot.Axis(VtChAxisIdX).ValueScale.MajorDivision=6'X轴主要网格数量.Plot.Axis(VtChAxisIdY).ValueScale.MajorDivision=6'Y轴主要网格数量.Plot.Axis(VtChAxisIdX).ValueScale.MinorDivision=0'X轴次要网格数量.Plot.Axis(VtChAxisIdY).ValueScale.MinorDivision=0'Y轴次要网格数量.Plot.Axis(VtChAxisIdX)
6、.AxisGrid.MajorPen.Style=VtPenStyleDotted.Plot.Axis(VtChAxisIdY).AxisGrid.MajorPen.Style=VtPenStyleDottedMSChart1.Plot.AutoLayout=FalseMSChart1.Plot.UniformAxis=FalseMSChart1.chartType=VtChChartType2dXY'设置图形为二维散点图MSChart1.ChartData=MyData'数据EndWithEndSub二、mschart控件属性介绍1．RowCount属性设置作图数据的行数。2．Colum
7、nCount属性设置作图数据的列数。3．TitleText属性设置图题。4．RowLabelCount属性设置行标的个数。5．RowLabel属性设置行标。6．ColumnLabelCount属性设置列标的个数。7．ColumnLabel属性设置列标。8．Row属性设置当前行。9．Column属性设置当前列。10．AutoIncrement属性如果数据是连续存放的，将AutoIncrement属性设为True，可以10.
