RZ-X750 (serv.man6). RZ-X750 OPOS User's Reference guide V1.32 - Sharp EPOS Service Manual (repair manual). Page 37

Read Sharp RZ-X750 (serv.man6) Service Manual online

Appendix 
 
 
35 
SHARP 
 
Example
 
 
[Visual Basic] 
 
Private WithEvents oScn As OPOSScanner 
 
Set oScan = New OPOSScanner 
 
// Open 
RetVal = oScan.Open("DefaultScanner") 
 
// Claim 
RetVal = oScan.ClaimDevice(50) 
 
// Enable     
oScan.DeviceEnabled = True 
 
// DataEvent Enable 
oScan.DataEventEnabled = True 
 
// DataEvent 
Private Sub oScan_DataEvent(ByVal newVal As Long) 
ScnData = oScan.ScanData 
oScan.DataEventEnabled = True 
End Sub 
 
// Disable 
oScan.DeviceEnabled = False 
 
// Release 
RetVal = oScan.ReleaseDevice 
 
// Close 
RetVal = oScan.Close 
Page of 40
Display

Click on the first or last page to see other RZ-X750 (serv.man6) service manuals if exist.