机房收费系统——MDI窗体


在这几天开始做机房收费了,刚开始就按着自己的想法开始弄了。在做了几个窗体之后运行,明显看到跟资料里面的有区别。

自己写的窗体在全屏之后就会把主窗体给覆盖,而给的材料里面的是在主窗体下全屏的。然后我发现了它——MDI窗体。

     刚开始我在百度搜索时,搜索的是“VB实现父窗体、子窗体”,然后大部分的搜索内容都是设置窗体的MDIChild属性给为true就可以。自己在修改之后运行提示“没有可运行的MDI窗体”。

那么到底什么是MDI窗体?

多文档界面(Multiple-DocumentInterface)简称MDI窗体。MDI窗体用于同时显示多个文档,每个文档显示在各自的窗口中。MDI窗体中通常有包含子菜单的窗口菜单,用于在窗口或文档之间进行切换。

那么怎么来设置MDI窗体呢?

答:新建一个VB6工程。在“工程资源管理器”中点鼠标右键调出菜单,添加-->添加MDI窗体

机房收费系统——MDI窗体

 

机房收费系统——MDI窗体

 

2)添加MDI子窗体

Form1MDIChild属性设置为True

机房收费系统——MDI窗体

 

3)运行效果

机房收费系统——MDI窗体

 

4)添加窗体Form2Form3,将这些窗体的属性MDIChild属性设置为True

5)修改MDIForm1窗体代码.

Option Explicit

Private Sub MDIForm_Load()

Form1.Show

    Form2.Show

    Form3.Show

End Sub

运行结果如下:

机房收费系统——MDI窗体

 

特别注意:使用MDI窗体必须把普通的form窗体的MDIChild属性必须设置为true,否则运行结果会是这样

机房收费系统——MDI窗体