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
    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