Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.RootPane.LoadLayout("frmMain")
jo.InitializeStatic("io.jsonwebtoken.Jwts")
MainForm.Show
End Sub
Sub cmdConnect_Action
Dim cout As String
jo.RunMethod("builder",Null)
jo.runMethod("setSubject",Null)
cout = jo.RunMethod("compact",Null)
log(cout)
End Sub