Windows Phone Image Source From URL(Website) Download and ProgressBar

Partial Public Class MainPage
    Inherits PhoneApplicationPage

    ' Constructor
    Public Sub New()
        InitializeComponent()

        Dim url As String = "https://www.thaicreate.com/wp/img.jpg"
        Dim bm As BitmapImage = New BitmapImage(New Uri(url, UriKind.Absolute))
        AddHandler bm.DownloadProgress, AddressOf Me.bitmapImage_DownloadProgress
        Image1.Source = bm

    End Sub

    Private Sub bitmapImage_DownloadProgress(ByVal sender As Object, ByVal e As DownloadProgressEventArgs)
        progressBar1.Value = e.Progress
    End Sub

End Class

     <!--LayoutRoot contains the root grid where all other page content is placed-->
    <Grid x:Name="LayoutRoot" Background="Transparent">
        <Grid.RowDefinitions>
            <RowDefinition Height="Auto"/>
            <RowDefinition Height="*"/>
        </Grid.RowDefinitions>
        
        <!--TitlePanel contains the name of the application and page title-->
        <StackPanel x:Name="TitlePanel" Grid.Row="0" Margin="12,17,0,28">
            <TextBlock x:Name="ApplicationTitle" Text="MY APPLICATION" Style="{StaticResource PhoneTextNormalStyle}"/>
            <TextBlock x:Name="PageTitle" Text="page name" Margin="9,-7,0,0" Style="{StaticResource PhoneTextTitle1Style}"/>
        </StackPanel>

        <Grid x:Name="ContentPanel" Grid.Row="1" Margin="12,0,12,0">
            <Image Height="150" HorizontalAlignment="Left" Margin="117,93,0,0" Name="Image1" Stretch="Fill" VerticalAlignment="Top" Width="200" />
            <ProgressBar Height="42" HorizontalAlignment="Left" Margin="8,313,0,0" Name="ProgressBar1" VerticalAlignment="Top" Width="442" />
        </Grid>

    </Grid>