VB中如何使用mschart 控件画曲线图

VB中如何使用mschart 控件画曲线图

（1）在窗体上布置一个MSChart控件

（2）窗体代码
Option Explicit

Private Sub Form_Load()
    '设置MSChart1
    With MSChart1
        '图上只画一条曲线
        .ColumnCount = 1
        '设置图表类型为二维曲线；默认为直方图
        .chartType = VtChChartType2dLine
        'X轴显示10个单位
        .RowCount = 10
    End With
    
    '曲线数据
    Dim v(1 To 10) As Single
    Dim i As Integer
    '曲线数据随机产生
    For i = 1 To 10
        v(i) = Rnd * 99 + 1
    Next
    ' 显示曲线
    With MSChart1
        For i = 1 To 10
            ' 指定X轴的坐标
            .Row = i
            ' X轴标签
            .RowLabel = i
            ' 与x对应的值
            .data = v(i)
        Next
    End With
End Sub（3）运行结果

（4）其他注意事项
在设计状态，鼠标右键单击MSChart控件，在弹出菜单中单击“属性”，可以调出控件的属性页窗口。利用这个窗口，可以直观地设计MSChart

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息