Pos

Returns the horizontal (left to right) position of the text cursor

Syntax
	KeyPgDeclareDeclare KeyPgFunctionFunction Pos ( ) KeyPgAsAs KeyPgLongLong
	KeyPgDeclareDeclare KeyPgFunctionFunction Pos ( KeyPgByvalByVal dummy KeyPgAsAs KeyPgLongLong ) KeyPgAsAs KeyPgLongLong

Usage
	result = Pos[ ( dummy ) ]

Parameters
	dummy
		An unused parameter retained for backward compatibility with QBASIC.

Return Value
	Returns the horizontal position of the text cursor.

Description
	Returns the horizontal (left to right) position of the text cursor. The 
	leftmost column is number 1.

Example
	Dim As Long p

	'' print starting column position
	p = Pos()
	Print "position: "; p

	'' print a string, without a new-line
	Print "ABCDEF";

	'' print new column position:
	p = Pos()
	Print: Print "position: "; p
	Print

	''position changes after each Print:
	Print "Column numbers: "
	Print Pos(), Pos(), Pos(), Pos(), Pos()

Differences from QB
	* The dummy parameter was not optional in QBASIC.

See also
	* KeyPgCsrlinCsrLin
	* KeyPgTabTab
	* KeyPgLocateLocate

