expression.Copy()
where expression is a variable that represents a IbmScreen Object
expression.Copy()
Sub CopyScreenTextToClipboard() 'Select the area to copy ThisIbmScreen.SetSelectionStartPos 8, 9 ThisIbmScreen.ExtendSelectionRect 13, 71 ThisIbmScreen.Copy End Sub