VB 将ab两个变量的值互换

问题描述:

VB 将ab两个变量的值互换
要求:将a、b两个变量的值互相交换,并在窗体上输出变量交换前后的值.程序运行后,单击窗体时,一次弹出两个输入信息对话框.

我写的代码:
Private Sub Form_Click()
'请求用户给a和b输入值
Dim a As String,b As String
a = InputBox("输入a的值","输入信息")
b = InputBox("输入b的值","输入信息")
'交换a和b的值
Dim c As String
c = a
a = b
b = c
'在窗体上输出变量交换前后的值
Print "交换后a的值为:" & a
Print "交换后b的值为:" & b
End Sub