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