Private Sub Application_Start (Nav As NavigationController)
'SetDebugAutoFlushLogs(True) 'Uncomment if program crashes before all logs are printed.
NavControl = Nav
Page1.Initialize("Page1")
Page1.Title = "Main Page"
Page1.RootPanel.LoadLayout("mainView")
NavControl.ShowPage(Page1)
tabPages.Initialize()
Dim gradePage As Page
gradePage.Initialize("gradePage")
gradePage.RootPanel.LoadLayout("gradeView")
gradePage.Title = "Grades"
Dim gradePage1 As Page
gradePage1.Initialize("gradePage")
gradePage1.RootPanel.LoadLayout("gradeView")
gradePage1.Title = "Grades1"
tabPages.Add(gradePage)
tabPages.Add(gradePage1)
TabStrip1.SetPages(tabPages)
End Sub