中易网

vbs输入9个数怎么获取最小的数和最大的数

答案:2  悬赏:30  
解决时间 2021-11-25 08:17
s1=inputbox("请第一个正整数")
s2=inputbox("请第二个正整数")
s3=inputbox("请第三个正整数")
s4=inputbox("请第四个正整数")
s5=inputbox("请第五个正整数")
s6=inputbox("请第六个正整数")
s7=inputbox("请第七个正整数")
s8=inputbox("请第八个正整数")
s9=inputbox("请第九个正整数")
***********************
*************
************
msgbox("最小的数是: " &x &" 最大的数是: " &d)

新手求代码,谢谢
最佳答案
s1=inputbox("请第一个正整数")
s2=inputbox("请第二个正整数")
s3=inputbox("请第三个正整数")
s4=inputbox("请第四个正整数")
s5=inputbox("请第五个正整数")
s6=inputbox("请第六个正整数")
s7=inputbox("请第七个正整数")
s8=inputbox("请第八个正整数")
s9=inputbox("请第九个正整数")

min = s1
max = s1
For i=1 To 9
Execute "n = s" & i '这里i是变量,需要Execute来执行
If n < min Then
min = n
End If
If n > max Then
max = n
End If
Next
MsgBox("最小的数是: " &min &" 最大的数是: " &max)
全部回答
期待看到有用的回答!
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
岳阳市荆剑地区人民检察院地址有知道的么?有
30岁转行进公司做销售或者人力资源,还有发展
岳阳市屈原管理区检察院地址在什么地方,想过
广西2016年事业单位的招考信息,报名时间,招
苏州男科检查多少钱nx北兵营优惠
引钓的意思是什么啊?请解释下!
4岁孩子患紫癜,四肢肿胀起疙瘩
华容县人民检察院地址在哪,我要去那里办事
阳朔中学1992年高考录取光荣榜
君山区人民检察院反贪污贿赂局办公地址在什么
南宫舍人的意思是什么啊?请解释下!
为什么干裂的一般是下嘴唇
君山区人民检察院反渎职侵权局办公地址在什么
云溪区人民检察院反渎职侵权局办公地址在什么
勿忸于的意思是什么啊?请解释下!
推荐资讯
达州市公安局达川区分局百节派出所地址在哪,
侠绕的意思是什么啊?请解释下!
小鸡破壳要多久?
网上订房好,还是自已打电话去酒店订好呢?
对于的意思是什么啊?请解释下!
粉阁的意思是什么啊?请解释下!
何首乌泡水喝能治白发吗
穜稑的意思是什么?穜稑的释义是什么啊?
在未正式开通的道路上交警有没有权利测定违章
9月中过来一家装饰公司上班,加上老板就四个
走泄的意思是什么啊?请解释下!
昨晚梦见发大水了,会怎么样哦
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?