首页| JavaScript| HTML/CSS| Matlab| PHP| Python| Java| C/C++/VC++| C#| ASP| 其他|
购买积分 购买会员 激活码充值

您现在的位置是:虫虫源码 > 其他 > vb 交换两个变量的值

vb 交换两个变量的值

  • 资源大小:43.21 kB
  • 上传时间:2021-06-30
  • 下载次数:0次
  • 浏览次数:1次
  • 资源积分:1积分
  • 标      签: VB源码

资 源 简 介

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

文 件 列 表

codesc.net
不借助第3个变量实现两个变量互换
Form1.frx
不借助第3个变量实现两个变量互换
不借助第3个变量实现两个变量互换
Form1.frm
codesc.net

相 关 资 源

您 可 能 感 兴 趣 的

同 类 别 推 荐

VIP VIP