Question

VB程序设计题:用Inputbox函数输入三个任意整数，按从小到大的顺序输出。

VB程序设计题:用Inputbox函数输入三个任意整数，按从小到大的顺序输出。 求大神帮忙，，谢谢

Answer 1

Private Sub Form_Click()
Dim a#, b#, c#, x#, y#, z#
i: a = InputBox("请输入a")
b = InputBox("请输入b")
c = InputBox("请输入c")
If a = b Or b = c Or a = c Then
Print "输入数据无法运算，请重新输入"
GoToi
End If
If a < b Then
x = b
If x < c Then
x = c
y = b
z = a
End If Else
x = a
If b > c Then
y = b
z = c
Else
y = c
z = b
End If
End If
Print "自大至小排序为："; x, y, z
End Sub

追问

用inputbox函数输入一个百分制的成绩，用msgbox函数给出优（90-100分），良（80-89分），中（70-79分），及格（60-69分），不及格（0-59分）

追答

一个一个来撒
先把这个采纳了 再提问一个 我回答
这样对大家都好