使用inputbox函数输入三个两位整数a、b、c,点击命令按钮后按照从小到大的顺序输出
1个回答
展开全部
Private Sub Command1_Click() a = InputBox("请输入数字a") b = InputBox("请输入数字b") c = InputBox("请输入数字c") If a > b Then '先把a,b按从小到大排序 t=a a=b b=t End If if c<a Then '如果c<a,c最小 Print c Print a Print b Else If c>b Then'如果c>b,c最大 Print a Print b Print c Else '剩下的情况就是c在中间 Print a Print c Print b End If End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询