Copies selected text to the Clipboard.
This sample selects an area on the screen and copies it to the clipboard. You can test this sample by pasting the contents into a text editor.
Sub CopyScreenTextToClipboard()
'Select the area to copy
ThisIbmScreen.SetSelectionStartPos 8, 9
ThisIbmScreen.ExtendSelectionRect 13, 71
ThisIbmScreen.Copy
End Sub