Visual Basic.NET - Incluir fotos en un picture box

Dim sp As String = String.Empty                        ' No he investigado para que sirve

Dim orientacion As Integer = 1                           ' Por defecto la pongo como Landscape

Dim imagen As Bitmap

Dim exif As EXIFextractor

imagen = Image.FromFile(dirfot & dgvFotos.Rows(fila).Cells(0).Value)

exif = New EXIFextractor(imagen, sp)

pboFoto.Image = imagen

If Not IsNothing(exif("Orientation")) Then

    If Not (Integer.TryParse(exif("Orientation").ToString(), orientacion)) Then

        Return

    End If

    Select Case orientacion

        Case 1, 6                            'Orientación Landscape (Ojo depende de la cámara)

        Case Else                           ' Orientación Portrait

            pboFoto.Image.RotateFlip(RotateFlipType.Rotate270FlipNone)    ' Roto la foto 270º en sentido del reloj

        Application.DoEvents()

    End Select

End If