神马品牌网希尔斯天然猫粮:请VB高手解决mschart的显示问题！
来源：百度文库 编辑：神马品牌网 时间：2024/05/15 02:22:37
我编写了一段用mschart显示数据曲线的代码如下：
Private Sub Command1_Click()
Dim i As Integer, j As Integer
Dim dou() As Single
MSChart1.ColumnCount = 2
MSChart1.RowCount = 10
ReDim dou(1 To 10, 1 To 2)
For i = 1 To 7
For j = 1 To 10
dou(i, 1) = i ^ 2
dou(j, 2) = j * 5
MSChart1.ChartData = dou
Next j
Next i
MSChart1.Plot.SeriesCollection(1).LegendText = "原始曲线"
MSChart1.Plot.SeriesCollection(2).LegendText = "预测曲线"
End Sub
mschart控件选择的是“线”图形。
我的原意是第一条曲线只显示7个数据，第二条曲线显示10个数据，运行后结果第一条曲线也同样显示了10个数据（最后3个数据都为0），请问有什么方法不显示那3个点？
Private Sub Command1_Click()
Dim i As Integer, j As Integer
Dim dou() As Single
MSChart1.ColumnCount = 2
MSChart1.RowCount = 10
ReDim dou(1 To 10, 1 To 2)
For i = 1 To 7
For j = 1 To 10
dou(i, 1) = i ^ 2
dou(j, 2) = j * 5
MSChart1.ChartData = dou
Next j
Next i
MSChart1.Plot.SeriesCollection(1).LegendText = "原始曲线"
MSChart1.Plot.SeriesCollection(2).LegendText = "预测曲线"
End Sub
mschart控件选择的是“线”图形。
我的原意是第一条曲线只显示7个数据，第二条曲线显示10个数据，运行后结果第一条曲线也同样显示了10个数据（最后3个数据都为0），请问有什么方法不显示那3个点？
：VB的mschart控件，在显示“不好看”；你从1.yahoo;2.google;3.baidu 的搜索引擎中，给出关键词，答案会很多，别闲烦，有十分了事。