Private Sub Command1 Click() Dim a As Integer,b As Integer a=10:b=20 Exl:Swapl a,b调用 Print“al=”,a,bl=,b a=10:b=20 Ex2:Swap2a,b调用 Print“a2=”;a,b2=,b End Sub Private Sub Command1_Click() Dim a As Integer,b As Integer a=10:b=20 Ex1: Swap1 a,b ’调用 Print “a1=”;a, “b1=”;b a=10:b=20 Ex2: Swap2 a,b ’调用 Print “a2=”;a, “b2=”;b End Sub