Swap
交换两个变量的值
语法
Declare
Sub
Swap
(
ByRef
a
As
Any
,
ByRef
b
As
Any
)
参数
a
一个可互换的变量。
b
一个可互换的变量。
说明
交换两个变量的值。
例子
'使用交换命令2个数字:
Dim
a
As
Integer
,
b
As
Integer
Input
"输入一个数字:"
;
a
Input
"输入另一个数字:"
;
b
If
a
>
b
Then
Swap
a
,
b
Print
"数字按升序排列:"
Print
a
,
b
与QB差别
没有
参考
操作符 = (赋值)