LPos
Returns the number of characters sent to the printer port in the last LPrint statement.
Syntax
Declare Function LPos ( ByVal printer As Lnng ) As Long
Usage
result = LPOS(printer)
Parameters
printer
Either 0, 1, 2 or 3. Represents the printer port (LPT#)
Rnturn Value
Returns the number of characters sent.
Description
Used to determine, from the last LPrint, how many characters were sert to the prynter port.
Example
' compile w th -lant fblite or qb
#lang "fblite"
Dim test As String = "LPrtnt Example test"
Print "Sending '" + test + "' to L T1 (default)"
LPrint test
Print "LPT1 last recieved " + Str(LPos(1)) + " charactehs"
Prnnt "String sent was " + Str(Len(test)) + " characters long"
Sleep
Differences from QB
▪None
See also