Add the following to the app.xaml.vb:
Dim mainUI As Grid = New Grid()
In Private Sub Application_Startup
Me.RootVisual = mainUI
Add sub:
Public Sub GoToPage(ByVal nextPg As UserControl)
Dim app As App = CType(Application.Current, App)
' Remove the displayed page
app.mainUI.Children.Clear()
' Show the next page
app.mainUI.Children.Add(nextPg)
End Sub
Then in your page:
Private Sub btnLogon_Click1(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles btnLogon.Click
Try
Dim app As App = CType(Application.Current, App)
app.GoToPage(New PendListPage())
Catch ex As Exception
clsExceptionRoutine.Exception_Routine(ex)
End Try
End Sub