(2)创建MDI子窗体的代码 窗体程序运行时建立一个子窗体的程序代码如下: Dim No As Integer Public Sub FileNewProcOT Dim NewDoc as New frmChi ld NO=No+1 NewDoc. Caption="编辑区 NewDoc Show 显示子窗体 End sub 如果多次调用 FileNewProc过程,则可以产生多个 “ frmChild”的子窗体,图12.1就是此程序运行的效果。 aual basic语言程序设计Visual Basic 语 言 程 序 设 计 (2)创建MDI子窗体的代码 ◼ 窗体程序运行时建立一个子窗体的程序代码如下： ◼ Dim No As Integer ◼ Public Sub FileNewProc() ◼ Dim NewDoc As New frmChild ◼ No=No+1 ◼ NewDoc.Caption="编辑区" ◼ NewDoc.Show '显示子窗体 ◼ End Sub ◼ 如果多次调用FileNewProc过程，则可以产生多个 “frmChild”的子窗体，图12.1就是此程序运行的效果