Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
MainForm.Show
Dim frm1, frm2 As Form
frm1.Initialize("", 300, 300)
frm2.Initialize("", 300, 300)
frm1.SetOwner(MainForm)
frm2.SetOwner(MainForm)
frm1.Show
frm2.Show
End Sub