Sub Activity_Create(FirstTime As Boolean)
Dim panMain As Panel
panMain.Initialize("panEvent")
panMain.Color = Colors.White
panMain.Tag = "Main Base Big Panel"
Dim panSubOne As Panel
panSubOne.Initialize("panEvent")
panSubOne.Tag = "little SubOne Panel"
panMain.Color = Colors.Red
Dim panSubTwo As Panel
panSubTwo.Initialize("panEvent")
panSubTwo.Tag = "little SubTwo Panel"
panSubTwo.Color = Colors.Blue
Dim aw As Int,ah As Int
aw=Activity.Width
ah=Activity.Height
Activity.AddView(panMain,0,0,aw,ah)
panMain.AddView(panSubOne,0,0,aw,ah/2)
panMain.AddView(panSubTwo,0,ah/2,aw,ah/2)
ToastMessageShow("Methods initialized.", False)
End Sub