Returns the current row position of the cursor
ret = GetCursorRow ( )
ret | Integer, output |
The row position of the cursor. |
The row position ranges in value from 1 to 24 for a model 2 screen size, 1 to 32 for a model 3 screen size, 1 to 43 for a model 4 screen size, and 1 to 27 for a model 5 screen size. For VT screen sizes the row position ranges from 1 to 24.
The parentheses after GetCursorRow are optional.
This is a PASSPORT function.
Example
Sub
ZMain()
Dim strText, nRet
Dim nCursorRow
nCursorRow = GetCursorRow
strText = "Current row position = " & nCursorRow
nRet = MsgBox (strText, 0, "Row Position")
End Sub