Declare Function Pos Overload ( ) As Long
Declare Function Pos ( ByVal dummy As Long ) As Long

result = Pos[ ( dummy ) ]

dummy

Returns the horizontal position of the text cursor.

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

Dim As Integer 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()

• The dummy parameter was not optional in QBASIC.
  
  

• CsrLin
  
• Tab
  
• Locate