Private Sub WebBrowser1_Navigating(sender As Object, e As Microsoft.Phone.Controls.NavigatingEventArgs)
ProgressBar1.Visibility = Visibility.Visible
End Sub
Code (VB.NET)
Private Sub WebBrowser1_Navigated(sender As Object, e As System.Windows.Navigation.NavigationEventArgs)
ProgressBar1.Visibility = Visibility.Collapsed
End Sub