Reflection Desktop VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Attachmate.Reflection.Objects.Emulation.IbmHosts Library / IbmScreen Object / Cut Method
Example
In This Topic
    Cut Method
    In This Topic
    Cuts selected text and copies it to the Clipboard.
    Syntax
    expression.Cut() 
    where expression is a variable that represents a IbmScreen Object
    Example
    This example cuts and pastes text from one field to another.
    Sub CutAndPaste()
     
        Dim text As String
        
        Dim field As HostField
        
        Dim rcode As ReturnCode
     
        ThisIbmScreen.SetSelectionStartPos 1, 29
        
        ThisIbmScreen.ExtendSelectionRect 1, 48
        
        ThisIbmScreen.Cut
        
        rcode = ThisIbmScreen.MoveCursorTo1(5, 19)
        
        ThisIbmScreen.Paste
        
    End Sub
    See Also