GetCursorRow

Description

Returns the current row position of the cursor

Syntax

ret = GetCursorRow ( )

Parameters
ret Integer, output
  The row position of the cursor.

 

Remarks

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