Reflection Desktop VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Attachmate.Reflection.Objects.Emulation.IbmHosts Library / IbmScreen Object / PutCharacter Method
A screen character. This is a ScreenCharacter Object.
The screen row on which to put the character.
The screen column on which to put the character.
Example
In This Topic
PutCharacter Method
In This Topic
Puts a ScreenCharacter at the specified screen location.
Syntax
expression.PutCharacter( _
   ByVal character As ScreenCharacter, _
   ByVal row As Integer, _
   ByVal column As Integer _
) As ReturnCode
where expression is a variable that represents a IbmScreen Object

Parameters

character
A screen character. This is a ScreenCharacter Object.
row
The screen row on which to put the character.
column
The screen column on which to put the character.

Return Value

One of the following ReturnCode enum values.

Member Description
Cancelled Cancelled.
Error Error.
PermissionRequired Permission is required.
Success Success.
Timeout Timeout condition.
Truncated The text is truncated.

Exceptions
ExceptionDescription
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 ScreenCharacter is a DBCS character, the character takes a two-byte space starting at the specified screen location.
Example
This example gets a character from a screen location and puts it on another location.
Sub PutCharExample()
 
    Dim screeenchar As ScreenCharacter
    Dim rcode As ReturnCode
    
    Set screeenchar = ThisIbmTerminal.screen.GetCharacter(12, 18)
    
    rcode = ThisIbmTerminal.screen.PutCharacter(screeenchar, 5, 19)
    
    If rcode = ReturnCode_Success Then
    
        Debug.Print "success!"
        
    End If
    
End Sub
See Also

Reference

IbmScreen Object
IbmScreen Members

Send Feedback