InfoConnect for Unisys VBA Guide
PutText1 Function (IbmScreen)
Puts the text at the specified screen location, taking up "length" number of byte positions.
Syntax
object.PutText1( _
   ByVal text As String, _
   ByVal row As Long, _
   ByVal column As Long, _
   ByVal length As Long _
) As ReturnCode

Parameters

text
row
column
length
Exceptions
ExceptionDescription
System.ArgumentOutOfRangeException This exception is thrown if the row or column parameters are outside the range of valid values: (1 to Rows) or (1 to Columns).
Remarks
If the text string is longer than "length", the text is truncated.
See Also