如何在vb中插入MSChart控件

添加MSChart控件 选择菜单【工程】->【部件】 快捷键为Ctrl+T, 在列表中选择Microsoft Chart control, 确定后就可以在控件箱中看到MSChart. 添加报表 选择菜单【工程】->【添加 data report】

1、首先，单击左侧工具框中的命令按钮，如下图所示，然后进入下一步。2、其次，双击以直接在表单上绘制，如下图所示，然后进入下一步。3、接着，或者可以单击命令按钮控件，再在页面上拖动绘制，如下图所示，然后进入下一步。4、然后，如果对外观不满意，可以在属性窗口中对其进行更改，如下图所示，...

Private Sub GraphShowBasic()With MSChart1.Plot.Backdrop ' 除非将样式属性正确地设置为VtFillStyleBrush ' 否则不会有颜色显示。.Fill.Style = VtFillStyleBrush .Fill.Brush.FillColor.Set 100, 255, 200 ' 添加边框。.Frame.Style = VtFrameStyleThickInner ' 将样式设置为显示阴影。

Private Sub Command1_Click()Dim iCol As Integer Dim iRow As Integer Dim i As Integer With MSChart1 '// 以线条方式显示 .ChartType = VtChChartType2dLine '// 把刻录改为手工方式 .Plot.Axis(VtChAxisIdY).ValueScale.Auto = False '// 设置最大值 .Plot.Axis(VtChAxisIdY).ValueSc...

Private Sub Command1_Click()Dim arrData(3, 1 To 3) arrData(1, 1) = " " & 2012 & " " ' 在第一列设置标签。 arrData(2, 1) = 2013 arrData(3, 1) = 2014 arrData(1, 2) = 8 arrData(2, 2) = 4 arrData(3, 2) = 0.3 arrData(1, 3)...

程序应该分两部分 1，从数据库读想显示的数据到变量数组。2，配置MSCHART属性显示。第一步的话需要SQL语句读取数据库的知识。第二步需要了解MSCHART控件，在CSDN下载可以下到MSCHART控件的用法DEMO。

Option Base 1 Private Sub Form_Load()Dim arrData(3, 1 To 2)arrData(1, 1) = "Jan" ' 在第一列设置标签。arrData(2, 1) = "Feb"arrData(3, 1) = "Mar"arrData(1, 2) = 8 arrData(2, 2) = 4 arrData(3, 2) = 0.3 MSChart1.ChartData = arrData End Sub 它...

先在“部件”里选上“Microsoft Chart Control 6.0”，并添加一个MSChart1。Private Sub Form_Load()With MSChart1 .chartType = VtChChartType2dPie '表示饼图 .ColumnCount = 3 '这里是每个饼图的数据个数 .ColumnLabel = "你的数据名称".RandomFill = True '暂且用随机数填图，数据请自己...

使用 MSChart 控件可以按照一定的规范将数据以图表的形式绘制出来。可以通过在控件的属性页中设置数据来创建图表，或者也可以从其它数据源，如 Microsoft Excel 的电子数据表中检索出要绘制的数据。本主题中的信息主要讨论将 Excel 工作表作为数据源。可能的用途对动态数据绘制图表，例如选定商品的当前价格。

先加入一个mschart控件 插入如下显示代码 Private Sub GraphShowBasic()With MSChart1.Plot.Backdrop ' 除非将样式属性正确地设置为VtFillStyleBrush ' 否则不会有颜色显示。.Fill.Style = VtFillStyleBrush .Fill.Brush.FillColor.Set 100, 255, 200 ' 添加边框。.Frame.Style = VtFrame...