多语言展示
当前在线:780今日阅读:176今日分享:34

编程实现两个数值的交换

在我们学习数学的过程中,经常会用到交换两个变量的数值问题,对于这个问题我们如何使用编程来实现呢?下面我将使用vb6编程来解决这一个数学问题,同时把制作的步骤和截图分享给大家,希望对大家有所帮助。
工具/原料

vb6

方法/步骤
1

首先启动vb6,执行文件-新建工程命令,在弹出的新建工程对话框中选择标准exe文件。

2

进入窗体,选择form1拖动周边调节窗体的大小,直至自己认为合适为止。

3

选择form1,在属性对话框中修改caption属性值为“交换两个变量的值”,修改boderstyle属性值为4-fixed。

4

在窗体上创建一个fram1对象,修改其caption属性值为无,调节其大小并使它填充整个窗体。

5

接着在fram上创建两个按钮控件,调整他们的位置,修改command1的caption属性值为“方法一”,修改command2的caption属性值为“方法二”。

6

在frame1中创建一个标签对象,修改caption属性值为“交换两个变量的值”,设置font属性,字体为王羲之书法字体,字号为二号。

7

双击command1进入代码区域,在代码区域中对象选择command1,过程选择click,然后输入代码为:Dim a As Integer, b As Integer, c As Integera = Val(InputBox('输入a'))b = Val(InputBox('输入b'))Me.Print '交换前:a=  '; a, 'b='; bc = aa = bb = cMsgBox '交换后a=' & a & 'b=' & b, vbOKOnly, '交换结果'

8

接着双击command2,进入代码区域,输入代码为:Dim X, Y As IntegerX = Val(InputBox('请输入x的值!'))Y = Val(InputBox('请输入y的值!'))X = X + YY = X - YX = X - YPrint X, Y

9

点击工具栏中的启动按钮进行程序代码的编译,根据错误提示进行修改程序,直至无误并且实现预先功能为止。

10

程序检测完毕后,执行文件-保存工程命令,在弹出对话框中点击保存,先保存窗体,再保存工程。

11

接着执行文件-生成工程.exe命令,在弹出对话框中输入名称为“交换两个变量的值”,保存位置为桌面,这样就生成了可执行文件。

推荐信息