Dim jo As JavaObject = FileChooser1
dim ef1, ef2 As JavaObject
Dim l1 As List = Array("*.*")
ef1.InitializeNewInstance("javafx.stage.FileChooser$ExtensionFilter", Array("All Images", l1))
l1 = Array("*.jpg")
ef2.InitializeNewInstance("javafx.stage.FileChooser$ExtensionFilter", Array("JPG", l1))
jo.RunMethodJO("getExtensionFilters", null).RunMethod("addAll", array(ef1, ef2))