Visual_Basic程序设计项目教程 教学课件 ppt 作者 李天真 李宏伟 教程代码任务6—7.docVIP

PAGE 129系统管理模块设计 任务7 PAGE 129 系统管理模块设计 任务7 任务6 系统主界面设计 知识 通用对话框 3．多文档界面 （1）多文档界面 6）编写代码，在MDI窗体加载事件中显示所有子窗体。 Private Sub Form_Load() Form1.Show Form2.Show Form3.Show End Sub 假设先建立的子窗体名称为frmChild，则具体实现的程序代码如下： Private Sub Form_Click() Dim frmx As New frmChild Static i As Integer i = i + 1 frmx.Caption = 第 i 个窗体 frmx.Show End Sub （3）排列子窗体 Arrange方法形式如下： MDI窗体对象．Arrange 排列方式 下面的实例给出了“层叠”、“平铺”和“排列图标”菜单项的Click事件过程： Private Sub mn_层叠 Click() 层叠子窗体 MDIForml．Arrange vbCascade End Sub Private Sub mn_平铺 Click() 平铺子窗体 MDIForml．