Dim grados As Float
Dim Bitmap1 As Bitmap
    ' aqui cargas la imagen
    Try
       'Bitmap1.Initialize(Dir, NombreImagen )  ' si quieres maxima calidad
       Bitmap1.InitializeSample(Dir, NombreImagen,240,320) ' le puedes dar tamaño
   Catch
   End Try
 
' grados= ExtraerGradosDelEXIF ' esto seria para hacerlo automaticamente
'   Log( "grados EXIF " & grados)
grados = 90 ' para tu caso
 
 
    If grados <> 0 Then' esto lo puedes quitar si lo haces manual
      ' Girar Imagen
      Dim matrix As JavaObject
        Try
          matrix.InitializeNewInstance("android.graphics.Matrix", Null)
          matrix.RunMethod("postRotate", Array(grados))
          Dim bmp As JavaObject
          bmp.InitializeStatic("android.graphics.Bitmap")
          Dim NewImage As Bitmap = bmp.RunMethod("createBitmap", Array(Bitmap1, 0, 0,Bitmap1.Width, Bitmap1.Height,matrix, True))
           ' en NewImage ya tienes la imagen girada, luego lo puedes pasar a un imageView por ejemplo
        Catch
             LogColor("Error al girar imagen", Colors.Red)
         End Try
   End If