Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.Show
Dim tf As TextField = CreatePasswordField
MainForm.RootPane.AddNode(tf, 0, 0, 100, 50)
End Sub
Sub CreatePasswordField As TextField
Dim jo As JavaObject
jo.InitializeNewInstance("javafx.scene.control.PasswordField", Null)
Return jo
End Sub