Italian ContentChooser ed exif

[Luigi S]

Prelevo le immagini dalla memoria del telefono con il codice seguente

Sub ButtonGetImage_Click
    
    CC.Show("image/*", "Choose image")
    
End Sub

Sub CC_Result (Success As Boolean, Dir As String, FileName As String)
    
    If Success = True Then
        ImageView1.Bitmap = LoadBitmap(Dir,FileName)
    Else
        ToastMessageShow("No Success",True)
    End If
        
End Sub

Succede però che se la foto è stata scattata col device in orizzontale la foto viene caricata correttamente, mentre se è stata scattata in verticale viene ruotata in senso antiorario di 90 gradi.
Come posso corregere questa anomalia, magari leggendo i dati exif che stanno nel jpg?