3.17 VB 变量 变换

将a与b的值进行变换

Private Sub Command1_Click()
    Cls
    Dim a As Integer, b As Integer, c As Integer
    a = 10: b = 20
    Print "a=" & a
    Print "b=" & b
    c = a
    a = b
    b = c
    Print "a=" & a
    Print "b=" & b
End Sub