手机
当前位置:查字典教程网 >脚本专栏 >vbs >vbscript 三个数比较大小的实现代码
vbscript 三个数比较大小的实现代码
摘要:复制代码代码如下:dima,b,ca=inputbox("请输入0-99的整数且不能重复更不要用汉字和字母")b=inputbox("请输入...

复制代码 代码如下:

dim a,b,c

a =inputbox ("请输入0-99的整数且不能重复更不要用汉字和字母")

b =inputbox ("请输入0-99的整数且不能重复更不要用汉字和字母")

c =inputbox ("请输入0-99的整数且不能重复更不要用汉字和字母")

if not(IsNUmberic(a) and IsNUmberic(b) and IsNUmberic(c)) then

msgbox "不乖哦>_<"

else

if a<b then

d=b

b=a

a=d

end if

if c>b then

d=b

b=c

c=a

end if

if a<b then

d=b

b=a

a=d

end if

msgbox a & " " & b & " " & c

end if

由于楼主只是三个数,所以不用复杂的冒泡排序法来排序,直接三个数比较就行了!tjoy7d的方法就是所谓的冒泡排序法,虽然代码简单,但是实际上电脑执行起来要循规很多次,运行速度会受到影响!

【vbscript 三个数比较大小的实现代码】相关文章:

XorEncode的vbs实现代码

WMI 创建系统服务的实现代码(Automatic)

ipclear.vbs源代码

用vbscript合并多个文本文件的代码

vbscript 读取xml格式的配置文件

使用vbscript脚本在表单中进行选择的代码

vbs下通过日期查找文件夹的代码

vbscript sendkeys实例代码大全

用vbs实现cmd功能的代码

VBS合并一个文件夹里的TXT的实现代码

精品推荐
分类导航