Dim jframe As JavaObject
jframe.Initializenewinstance("javax.swing.JFrame",Null)
jframe.RunMethod("setSize",Array(600,600))
jframe.RunMethod("setAlwaysOnTop",Array(True))
Dim jfilechooser As JavaObject
jfilechooser.Initializenewinstance("javax.swing.JFileChooser",Null)
jfilechooser.RunMethod("setFileSelectionMode",Array(2)) 'be able to select files or directories
jfilechooser.RunMethod("showDialog",Array(jframe,"Select"))
Log(jfilechooser.RunMethod("getSelectedFile",Null)) 'null or fullpath