VB三个数从小到大排序

来源：百度知道 编辑：UC知道 时间：2024/06/19 11:33:52
随机产生三个[10,90]之间的整数,按从小到大排序输出 不需要Inputbox 直接在Text中输出

Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a = (Rnd * 80) + 10
b = (Rnd * 80) + 10
c = (Rnd * 80) + 10
If a > b Then t = a: a = b: b = t
If a > c Then t = a: a = c: c = t
If b > c Then t = b: b = c: c = t
Cls
Print a, b, c
Text1.Text = a
Text2.Text = b
Text3.Text = c
End Sub
可以？

你认为你问的问题只值0分。。那就无语了。