Pos
返回文本光标的水平（从左到右）位置
Declare Function Pos Overload ( ) As Integer
Declare Function Pos ( ByVal dummy As Integer ) As Integer
result = Pos[ ( dummy ) ]
dummy
返回文本光标的水平位置。
返回文本光标的水平（从左到右）位置。最左边的列是数字1.
语法
Declare Function Pos Overload ( ) As Integer
Declare Function Pos ( ByVal dummy As Integer ) As Integer
用法
result = Pos[ ( dummy ) ]
参数
dummy
保留未使用的参数，以便与QBASIC向后兼容。
返回值
返回文本光标的水平位置。
说明
返回文本光标的水平（从左到右）位置。最左边的列是数字1.
例子
Dim As Integer p
''打印起始栏位置
p = Pos()
Print "位置："; p
''打印一个字符串，没有新行
Print "ABCDEF";
''打印新列位置：
p = Pos()
Print: Print "位置："; p
Print
''每次打印后的位置更改：
Print "列号："
Print Pos(), Pos(), Pos(), Pos(), Pos()
''打印起始栏位置
p = Pos()
Print "位置："; p
''打印一个字符串，没有新行
Print "ABCDEF";
''打印新列位置：
p = Pos()
Print: Print "位置："; p
''每次打印后的位置更改：
Print "列号："
Print Pos(), Pos(), Pos(), Pos(), Pos()
与QB差别
- QBASIC中的dummy 参数不是可选的。
参考