Reflection Desktop VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Attachmate.Reflection.Objects.Emulation.IbmHosts Library / IbmScreen Object / PutCharacter Method
 This is a ScreenCharacter Object.
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
     This is a ScreenCharacter Object.
    row
    column
    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