vb 交换两个变量的值
于 2023-09-06 发布
文件大小:43.21 kB
0 114
下载积分: 2
下载次数: 1
代码说明：
vb 不借助第3个变量实现两个变量互换,交换两个变量的值,在窗口上输入a和b的值，从运行效果截图你可看出这个功能： If IsNumeric(Txt_a.Text) Then a = Val(Txt_a.Text) Else MsgBox "请输入数字！" Exit Sub End If If IsNumeric(Txt_b.Text) Then b = Val(Txt_b.Text) Else MsgBox "请输入数字！" Exit Sub End If a = a + b b = a - b a = a - b Lbl_Info.Caption = "a的值是:" & a & " b的值是:" & b
下载说明：请别用迅雷下载，失败请重下，重下不扣分！
发表评论
