这段代码可以创建一个动态窗口并将现有的窗口模板放进去,可是关掉动态窗口的时候怎么把里面的窗口模板也自动关掉呢?
Dim f As System.Windows.Forms.Form = New System.Windows.Forms.Form()
f.Name = "认购表"
f.Text = "认购表"
f.Width = 1036
f.Height = 768
vars("abc")=f
Dim pnl As new windows.Forms.Panel
pnl.Width = 1036
pnl.Height = 768
pnl.Left = 200
pnl.Top = 200
pnl.Dock = Windows.Forms.DockStyle.Fill
f.controls.add(pnl)
forms("通用窗口").open(-1000,-1500)
forms("通用窗口").baseform.toplevel=False
Forms("通用窗口").BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms("通用窗口").BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
pnl.Controls.add(Forms("通用窗口").BaseForm)
vars("abc").show