Henry的VB.NET之旅（十一）—可视继承
韩睿
闭关修练了一晚上VB.NET的继承程序的我，早上进入公司时自信满满。白经理看到我，问了一句：“学习得怎么样？对VB.NET是不是已经可以上手了？”我点了点头：“应该可以做点事了吧。”“好的，”白经理拍了拍我肩膀说，“再跟大李好好学习几天，会有机会的。”
得到领导的指示，我冲了杯咖啡，恭敬地走向大李，放在他的桌上。大李嘴角一翘，笑着说：“别这么客气，来，坐。让我看看你昨天继承学习得怎么样。今天我们来看一下VB.NET提供的新的继承方式，可视化继承。”
“可视化？是不是就是指在可视化编辑器里就可以实现的继承方式？”我跟着问了一句。
大李点头说：“当然，就是看得见的继承。一般指的就是对窗体的继承。”
我想了一下说：“在VB.NET中，窗体都已经是类的形式了，如果要实现窗体继承，是不是生成一个基类窗体，然后通过声明Inherits的方式在新窗体中实现对基类窗体的继承？”
“大体上是这样的，但今天我们来看一下怎么通过可视化编译环境来实现这个过程。首先，是建一个基类窗体。”大李一边说，一边打开VB.NET编译器，从菜单中选择从“文件”菜单中依次选择“新建”和“项目”，打开“新建项目”对话框。创建了一个名为 “可视继承”的 Windows 应用程序。
然后右击解决方案资源管理器中的“可视继承”项目节点并选择“属性”。在项目的属性中，将输出类型从“Windows 应用程序”更改为“类库”，然后单击“确定”。
在“工具箱”的“Windows 窗体”选项卡上将一个按钮添加到窗体中。命名为btnProtected。然后在它的“属性”窗口中，将 Text 属性设置为 “保护”，同时将 Modifiers 属性设置为 Protected。
接着大李双击 btnProtected 按钮，切换到代码窗口，书写了这样的代码：
Private Sub btnProtected_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnProtected.Click
MsgBox("protected的按钮")
End Sub
接着切换回设计窗口，添加了第二个按钮btnPrivate，并将 Text 属性设置为 “私有”， Modifiers 属性设置为 Private。
双击 btnPrivate 按钮，添加了如下代码：
Private Sub btnPrivate_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnPrivate.Click
MsgBox("private的按钮")
End Sub
最后从“生成”菜单中选择“生成”，在项目的bin文件夹内生成了一个“可视继承.dll”文件。
“是不是这样就可以完成基类窗体的建造了？”
“是呀。”大李手也没停地说，“我们再通过集成环境来建一个派生的窗体吧。”
大李从“文件”菜单中选择“添加项目”中的“新建项目”，创建了一个名为“派生窗体”的Windows 应用程序。右击项目节点，选择“添加”中的“继承的窗体”。
在弹出的“添加新项”对话框中，可以看到已经选定了“继承的窗体”，大李点击了“打开”。又弹出一个“继承选择器”对话框中，从 “可视继承.dll”中选择“Form1”作为要从其中继承的窗体，然后单击“确定”。
于是在“派生窗体”项目中创建了一个从 “可视继承”项目中的窗体Form1派生出的窗体，命名为“InheritanceForm”。
随即在Windows 窗体设计器中，派生窗体的继承而来的按钮左上角会带有一个箭头标志符号。
9 7 3 1 2 3 4 8 :
