Paxar 6039 Printer User Manual


 
3-20 Programmer’s Manual
Example VB.NET
Imports Ultra
Dim rPrint As New Print ' Instantiate class
Dim blnOnDemand As Boolean
blnOnDemand = rPrint.fOnDemand
If (blnOnDemand) Then ' If True
MsgBox("Blocked", MsgBoxStyle.Information, "OnDemand
Sensor")
Else ' If False
MsgBox("Not Blocked", MsgBoxStyle.Information, "OnDemand
Sensor")
End If