Public Sub Initialize
wChestionar.Initialize("wChestionar",True)
wChestionar.AddMinimizeIcon(False,"wChestionar")
wChestionar.AddCloseIcon(False)
wChestionar.Title="Chestionar"
wChestionar.ContentPane.LoadLayout("frmChestionar")
Main.MainForm.RootPane.get
Main.MainForm.RootPane.AddNode(wChestionar,Main.pMain.Left,Main.pMain.Top,Main.pMain.Width,Main.pMain.Height)
End Sub