Android Question SimpleMediaManager metadata or EXIF

#Region  Project Attributes
  #MainFormWidth: 600
  #MainFormHeight: 400
  #AdditionalJar: metadata-extractor-2.11.0        'Change the name accordingly!'
#End Region

Sub Process_Globals
  Private fx As JFX
  Private MainForm As Form
  Private NativeMe As JavaObject
End Sub

Sub AppStart (Form1 As Form, Args() As String)
  MainForm = Form1
  MainForm.Show
    
  NativeMe = Me
 
  Dim fn As String = "test.jpg"

Dim imgmeta As List = NativeMe.RunMethod("GetImgMeta", Array(fn))
      
    For Each s1 As String In imgmeta
        Log(s1)
    Next
End Sub

#If JAVA
import com.drew.imaging.*;
import com.drew.metadata.*;
import com.drew.lang.*;

import java.io.*;
import java.util.*;

public static List GetImgMeta(String filename)
{
  File file = new File(filename);
  List lstMeta = new ArrayList<Object>();
 
  try {
    Metadata metadata = ImageMetadataReader.readMetadata(file);

    for (Directory directory : metadata.getDirectories()) {
      for (Tag tag : directory.getTags()) {
        lstMeta.add(tag.toString());
      }

      if (directory.hasErrors()) {
        for (String error : directory.getErrors()) {
          System.err.println("ERROR: " + error);
        }
      }
    }
  }
  catch (ImageProcessingException e) {
    // handle exception
    lstMeta.add("ImageProcessingException");
  }
  catch (IOException e) {
    // handle exception
    lstMeta.add("IOException");
  }
 
  return(lstMeta);
}
#End If

Dim MetadataReader As JavaObject
    Dim ExifReader As JavaObject
    ExifReader.InitializeNewInstance("com.drew.metadata.exif.ExifReader", Null)
    Dim readers As List = Array(ExifReader)
    Try
        Dim Metadata As JavaObject = MetadataReader.InitializeStatic("com.drew.imaging.jpeg.JpegMetadataReader").RunMethod("readMetadata", Array(In, readers))
        For Each dic As JavaObject In Metadata.RunMethod("getDirectories", Null).As(List)
            Dim orientation As Object = dic.RunMethod("getInteger", Array(274)) 'orientation
            If orientation <> Null Then
                Media.Media = RotateBitmapBasedOnOrientation(Media.Media, orientation)
                Exit
            End If
        Next
    Catch
        Log(LastException)
    End Try