vb问题 好像是输入两个数据，交换后输出

Private Sub Form_Load()
Dim a As Double
Dim b As Double
Dim c As Double
a = InputBox("第一个数")
b = InputBox("第二个数")
c = a
a = b
b = c
MsgBox (a)
MsgBox (b)
End Sub

开了两个题...我回答在你的原题上了

498483439