Dim robot As JavaObject
robot.InitializeNewInstance("javafx.scene.robot.Robot", Null)
Dim MouseButton As JavaObject
MouseButton.InitializeStatic("javafx.scene.input.MouseButton")
Dim MBA As Object = MouseButton.InitializeArray("javafx.scene.input.MouseButton",Array(MouseButton.GetField("PRIMARY")))
robot.RunMethod("mousePress", Array(MBA)) 'left button
robot.RunMethod("mouseRelease", Array(MBA)) 'left button