Creo dinamicamente un PictureBox

codice:
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
        Dim f As Form = DirectCast(sender, Form)
        f.DesktopBounds = New Rectangle(0, 0, 400, 400)

        Dim pb As New PictureBox()
        pb.ImageLocation = Me.fileName
        pb.Dock = DockStyle.Fill
        pb.SizeMode = PictureBoxSizeMode.StretchImage
        f.Controls.Add(pb)
    End Sub
L'immagine è molto grande. Vorrei vedere l'immagine alla massima estensione, senza che venga deformata. Si può fare? :master: