#AdditionalJar: C:\Program Files (x86)\Wacom STU SDK\Java\jar\x64\wgssSTU.jar
Sub Process_Globals
Private fx As JFX
Private MainForm As Form
End Sub
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.RootPane.LoadLayout("Layout1")
MainForm.Show
End Sub
Sub Button1_Click
Dim J As JavaObject = Me
J.RunMethod("queryUsb2",Null)
End Sub
#if JAVA
import com.WacomGSS.STU.*;
import com.WacomGSS.STU.Protocol.*;
public static void queryUsb2()
{
com.WacomGSS.STU.UsbDevice[] usbDevices = UsbDevice.getUsbDevices();
if (usbDevices != null && usbDevices.length > 0)
{
System.out.println("Num: "+usbDevices.length);
}
else
{
System.out.println("no USB devices found");
}
}
#End If