深入浅出CChart 每日一课——快乐高四第二十六课 不可不戒，ActiveX控件恒山别院通元谷之VB篇

VB?前面不是已经讲过了吗？

不不不，那里讲的是VB.Net。虽然名字差不多，看起来也差不多，实际上根本是两码事。

VB的最后版本是VB6，已经是二十年前的事了，此后微软已经放弃了VB，转向VB.Net。二十年前，VB6可是红遍五湖四海，而现在听说过它的人都不多了。想想，这真是一个伤感的故事。

VB虽然是这么一个老古董了，但实际上，由于简单易用，功能也不弱，直到现在也还是有不少不离不弃的用户，尤其是在工业控制领域。这不，有个朋友就问我CChart能不能在VB6上用。为此，笨笨就专门写了这一课。

实际在VB6上的使用非常简单。与VB.Net上使用不同，这里需要使用ActiveX控件版。

首先请保证PlotCom控件已经在计算机上注册。

第一步，打开VB6，建立一个标准EXE工程。

第二步，点击菜单“工程”-->“部件…”，然后在对话框中找到PlotCom控件，点击确定后，设计面板上将会出现PlotCom控件的图标。

第三步，在Form1窗体上放置一个PlotCom控件。

第四步，右键点击设计窗口，选择查看代码

利用代码窗口产生Form_Load过程，并修改成如下型式。

Private Sub Form_Load()
    Dim i As Long
    For i = -10 To 10
        Call PlotCtrl1.AddPoint2D_S(i, i * i, 0)
    Next i
    PlotCtrl1.Title = "VB6测试"
End Sub

注意到了吗？这里AddPoint2D后面还带了_S。前面已经说过，带_S的函数用于弱类型的语言，VB正好就是弱类型的语言！

好了，结果如图。

在VB6中使用CChart，实在是太简单了。