VB中非子窗体能不能设为子窗体的子窗体？

Question

例如Form1为非子窗体，Form2为子窗体，实现Form1.Show,Form2可以吗？

Answer 1

--------------------------------------------------------------------------------例如：Form1为非子窗体，Form2为MDIForm1的子窗体，能否实现Form1.Show,Form2？--------------------------------------------------------------------------------

Answer 2

form2要在母窗体的环境下才能SHOW出来，如果你要FORM1.SHOW的时候要显示FORM2就必须把MDIFORM1也SHOW出来。但两个窗体只能有一个是激活的。

Answer 3

程序启动后，双击窗体MDIForm1，出现Form1,再双击窗体Form1,程序报错，我想让Form2 Show出来。贴上源码：'------------------------------[工程1.VBP]----------------------------------
Type=Exe
Form=Form1.frm
Form=Form2.frm
Form=MDIForm1.frm
Startup="MDIForm1"
HelpFile=""
Command32=""
Name="工程1"
HelpContextID="0"
CompatibleMode="0"
MajorVer=1
MinorVer=0
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
VersionCompanyName="lk"
CompilationType=0
OptimizationType=0
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
Retained=0
ThreadPerObject=0
MaxNumberOfThreads=1[MS Transaction Server]
AutoRefresh=1'------------------------------[MDIForm1.frm]----------------------------------
VERSION 5.00
Begin VB.MDIForm MDIForm1 
   BackColor       =   &H8000000C&
   Caption         =   "MDIForm1"
   ClientHeight    =   3195
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   4680
   LinkTopic       =   "MDIForm1"
   StartUpPosition =   3  '窗口缺省
End
Attribute VB_Name = "MDIForm1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub MDIForm_DblClick()
Form2.Show
End Sub'------------------------------[Form1.frm]----------------------------------
VERSION 5.00
Begin VB.Form Form1 
   Caption         =   "Form1"
   ClientHeight    =   3195
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   4680
   LinkTopic       =   "Form1"
   ScaleHeight     =   3195
   ScaleWidth      =   4680
   StartUpPosition =   3  '窗口缺省
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
'------------------------------[Form2.frm]----------------------------------
VERSION 5.00
Begin VB.Form Form2 
   Caption         =   "Form2"
   ClientHeight    =   3195
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   4680
   LinkTopic       =   "Form2"
   MDIChild        =   -1  'True
   ScaleHeight     =   3195
   ScaleWidth      =   4680
End
Attribute VB_Name = "Form2"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_DblClick()
Form1.Show , Form2
End Sub

Answer 4

Sorry程序启动后，双击窗体MDIForm1，出现Form2,再双击窗体Form2,程序报错，我想让Form1 Show出来，并且让Form1作为Form2的子窗体。