Reflection Desktop VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Attachmate.Reflection.Objects.Emulation.IbmHosts Library / IbmScreen Object / SetSelectionStartPos Method
The row in which the selection begins.
The column in which the selection begins.
Example
In This Topic
SetSelectionStartPos Method (IbmScreen)
In This Topic
Sets starting coordinates for selecting text. The default start position is the current cursor position.
Syntax
expression.SetSelectionStartPos( _
   ByVal row As Integer, _
   ByVal column As Integer _
)
where expression is a variable that represents a IbmScreen Object

Parameters

row
The row in which the selection begins.
column
The column in which the selection begins.
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).
Example
This sample selects a text area and assigns it to a screen region. 
Private Sub SelectScreenArea()
    
    Dim screenRegionIbm As ScreenRegion
    
    'Select the text area
    ThisIbmScreen.SetSelectionStartPos 5, 5
    ThisIbmScreen.ExtendSelection 21, 21
    
    'Get the selected screen region
    Set screenRegionIbm = ThisIbmScreen.selection
    MsgBox ("Start Row = " & screenRegionIbm.StartRow & ", End Column = " & screenRegionIbm.EndColumn)
    
End Sub
See Also

Reference

IbmScreen Object
IbmScreen Members

Send Feedback