Cargar Imagen en Visual Basic

Public Class ImagenAgregar

    Private Sub Btnabrir_Click(sender As Object, e As EventArgs) Handles Btnabrir.Click

        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

            PictureBox1.Image = System.Drawing.Image.FromFile(OpenFileDialog1.FileName)

        End If

    End Sub

End Class