【VB开源代码栏目提醒】：本文主要为网学会员提供Ex7_1_1.frm，希望对需要Ex7_1_1.frm网友有所帮助，学习一下!

    VERSION 5.00
    Begin VB.Form Ex7_1_1 
       Caption         =   "模式和非模式窗体"
       ClientHeight    =   5040
       ClientLeft      =   60
       ClientTop       =   450
       ClientWidth     =   7725
       LinkTopic       =   "Form1"
       ScaleHeight     =   5040
       ScaleWidth      =   7725
       StartUpPosition =   3  '窗口缺省
       Begin VB.CommandButton Command2 
          Caption         =   "非模式窗体"
          Height          =   375
          Left            =   4200
          TabIndex        =   1
          Top             =   4320
          Width           =   1215
       End
       Begin VB.CommandButton Command1 
          Caption         =   "模式窗体"
          Height          =   375
          Left            =   2160
          TabIndex        =   0
          Top             =   4320
          Width           =   1215
       End
    End
    Attribute VB_Name = "Ex7_1_1"
    Attribute VB_GlobalNameSpace = False
    Attribute VB_Creatable = False
    Attribute VB_PredeclaredId = True
    Attribute VB_Exposed = False
    Private Sub Command1_Click()
        Ex7_1_2.Show 1  '显示模式窗体Ex7_1_2
        Ex7_1_3.Show 1  '显示模式窗体Ex7_1_3
    End Sub
    
    Private Sub Command2_Click()
        Ex7_1_2.Show  '显示非模式窗体Ex7_1_2
        Ex7_1_3.Show  '显示非模式窗体Ex7_1_3
    End Sub