On the Liberty BASIC Community Forum was a posting asking:
Has anyone used LB to interface to USBmicro I/O modules see http://usbmicro.com/
RobotBasic & VB provide this functionality
The moderator “Rod” replied:
If I take the short VB example listed on the web page it would convert like this.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
'open the .dll Open "USBm.dll" for dll as #micro 'find device CallDll #micro, "USBm_FindDevices", w as long, Result as long if w then print "Device number ";w;" is open" else print "Device not found" end end if 'initiate the ports on device w CallDll #micro, "USBm_InitPorts", w as long, Result as long |
Easy peasy.
Leave a Reply