设X与Y是同一类型的变量，试设计一个算法，把X与Y中的数据相互交换。---- 第二章 答案 新编Visual Basic程序设计教程 陈斌 著

设X与Y是同一类型的变量，试设计一个算法，把X与Y中的数据相互交换。---- 第二章 答案 新编Visual Basic程序设计教程 陈斌 著

解答：第一步：输入X与Y
         第二步：X => Z （Z值临时记录X值）
         第三步：Y => X
         第四步：Z => Y

在窗体上建立2个文本框用于输入数据，再建一个按钮，代码如下：

Dim A As String, B As String, Z As String

Private Sub Command1_Click()
    A = Text1.Text
    B = Text2.Text
    Z = A
    A = B
    B = Z
    Text1.Text = A
    Text2.Text = B
End Sub

程序运行效果图如下：

---- 新编Visual Basic程序设计教程  第一章 答案 陈斌  著

打赏 支付宝打赏 微信打赏

来源：济亨网

本文链接：http://wb86.com/post/145.html