从头创建 Visual Basic .NET 控件 (三)

第 2 步：更改基类
在控件库中创建的类自动命名为 UserControl1，默认情况下，从 UserControl 类继承。如果我们要创建复合控件，那非常容易，只需将其他控件从工具箱中拖到设计表面上即可。

但是，由于我们要从头创建自己的控件，因此需要做一些更改。将控件类的名称从 UserControl1 更改为 TrafficLight。然后，将以下行：

    Inherits System.Windows.Forms.UserControl

更改为：

    Inherits System.Windows.Forms.Control

这样，使最一般的 Control 类成为基类。您会发现，不再显示可视设计表面，而是替换为组件设计表面。

为保持代码的一致性，也要将代码文件名从 UserControl1.vb 更改为 TrafficLight.vb。可以在 Solution Explorer（解决方案资源管理器）中进行更改：右键单击代码文件的名称，并选择 Rename（重命名）。

还需要在类模块的顶部添加几行代码。将 Option Strict 设置为 On，并导入包含我们将来要用到的某些属性的命名空间。下面是要放到代码最上面的两行：

Option Strict On
Imports System.ComponentModel