用VB做数据折线图
2个回答
2013-09-25
展开全部
用MSCHART控件
定义一个二维数组,例如:Global studydata(1 To 5, 1 To 7) '学历数据
ElseIf cb_sort.Text = "学历" And cb_chart.Text = "折线图" Then
With MSChart1
.ColumnCount = 6
.ChartData = studydata
.DataGrid.ColumnLabel(1, 1) = "研究生及以上"
.DataGrid.ColumnLabel(2, 1) = "本科"
.DataGrid.ColumnLabel(3, 1) = "专科"
.DataGrid.ColumnLabel(4, 1) = "中专"
.DataGrid.ColumnLabel(5, 1) = "高中"
.DataGrid.ColumnLabel(6, 1) = "初中及以下"
.TitleText = "全公司学历结构图示"
.ToolTipText = "全公司学历结构图示"
.ChartType = VtChChartType2dLine '折线图
'MSChart1.Stacking = True
End With
定义一个二维数组,例如:Global studydata(1 To 5, 1 To 7) '学历数据
ElseIf cb_sort.Text = "学历" And cb_chart.Text = "折线图" Then
With MSChart1
.ColumnCount = 6
.ChartData = studydata
.DataGrid.ColumnLabel(1, 1) = "研究生及以上"
.DataGrid.ColumnLabel(2, 1) = "本科"
.DataGrid.ColumnLabel(3, 1) = "专科"
.DataGrid.ColumnLabel(4, 1) = "中专"
.DataGrid.ColumnLabel(5, 1) = "高中"
.DataGrid.ColumnLabel(6, 1) = "初中及以下"
.TitleText = "全公司学历结构图示"
.ToolTipText = "全公司学历结构图示"
.ChartType = VtChChartType2dLine '折线图
'MSChart1.Stacking = True
End With
2013-09-25
展开全部
msChart
用这个控件,可以满足你的要求。
用这个控件,可以满足你的要求。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询