神马品牌网90版本战法哪个流派好:请教VB高手．．．．
来源：百度文库 编辑：神马品牌网 时间：2024/04/30 15:10:31
其运行的结果是???
Private Sub Form_click()
Dim a As Integer
Dim b As Integer
a = 10
b = 20
Print "a", "b"
swap1 a, b
Print a, b
swap2 a, b
Print a, b
End Sub
Private Sub swap1(ByVal x As Integer, ByVal y As Integer)
Dim k As Integer
k = x
x = y
y = x
y = k
End Sub
Private Sub swap2(x As Integer, y As Integer)
Dim k As Integer
k = x
x = y
y = k
Print x, y
End Sub
Private Sub Form_click()
Dim a As Integer
Dim b As Integer
a = 10
b = 20
Print "a", "b"
swap1 a, b
Print a, b
swap2 a, b
Print a, b
End Sub
Private Sub swap1(ByVal x As Integer, ByVal y As Integer)
Dim k As Integer
k = x
x = y
y = x
y = k
End Sub
Private Sub swap2(x As Integer, y As Integer)
Dim k As Integer
k = x
x = y
y = k
Print x, y
End Sub
a b
10 20
20 10
20 10
单击一下Form，显示以下内容：
a b
10 20
20 10
20 10