MainForm.RootPane.MouseCursor = GetMouseCursor("V_RESIZE")
Sub GetMouseCursor(Name As String) As Object
Dim jo As JavaObject
Return jo.InitializeStatic("javafx.scene.Cursor").GetField(Name)
End Sub
MainForm.RootPane.MouseCursor = GetMouseCursor("V_RESIZE")
Sub GetMouseCursor(Name As String) As Object
Dim jo As JavaObject
Return jo.InitializeStatic("javafx.scene.Cursor").GetField(Name)
End Sub