NET框架组件太大了比任何以前所写的封装功能的库都要大这样有好处因为它大幅削减了建立应用程序所需编写的代码但是也使我们不可能完全了解该框架组件但是我们很容易从中找到一些技巧
窗体嵌套
经验丰富的Visual Basic开发者知道多文档界面(MDI)应用程序能够包含子窗体那些子窗体由MDI父窗体管理但是如果没有MDI的能力你怎样实现包含嵌套窗体?例如一个MDI子窗体也可能需要包含另一个窗体
有时能够使用用户控件(UserControl)实现这种功能但是如果你真的需要把一个窗体嵌套进另一个窗体有多种方法可以实现窗体衍生自Control类这意味着它能被放入另一个窗体的控件集合中使用如下的逻辑
Dim f As New frmEmbed()
MeControlsAdd(f)
fShow()
但是很不幸这段代码将会导致一个运行时(runtime)异常(见图)
图试图把一个窗体添加到另一个窗体的控件集合时出现的运行时错误
为了避免这种异常该窗体的TopLevel属性必须设置为False(见下面的代码)
Dim f As New frmEmbed()fTopLevel = FalseMeControlsAdd(f)fShow()
图显示的是使用上面的逻辑实现的一个窗体嵌入另一个窗体嵌入的窗体有一个标题条(它的颜色是未激活的系统颜色)因此该嵌入窗体能在容器窗体内四处拖动在图中该窗体从它的开始位置(左上角)拖到了右下角
图在容器窗体中有一个嵌入的窗体嵌入的窗体能在容器窗体中拖动
通常在显示嵌入的窗体前先设置它的位置这只需要简单的设置嵌入窗体的Left和Top属性嵌入窗体的位置与容器窗体是相对的
与MDI子窗体不同嵌入窗体能覆盖容器窗体上的控件图显示了它们的不同
图嵌入窗体(左)可以覆盖容器窗体上的控件MDI子窗体(右)不能覆盖MDI父窗体上的控件
在右边的MDI例子中没有办法使按钮隐藏在子窗体的后面但是在左边该按钮被嵌入窗体覆盖了
当窗体第一次被嵌入时它将显示在容器窗体上的已存在的控件的后面当它被点击时它走向前台并停留在那儿这会打扰用户但是能通过插入下面的代码防止这种情况发生
fBringToFront()
嵌入的窗体可以包含其它的嵌入窗体没有实际的限制图显示了一个本身包含嵌入的窗体的嵌入窗体
图一个包含嵌入窗体的嵌入窗体