vb程序设计 第一个按钮是随机生成10个两位整数，第二个按钮是从小到大排序 第一个我会，已编好，求

Question

vb程序设计
第一个按钮是随机生成10个两位整数，第二个按钮是从小到大排序
第一个我会，已编好，求第二个排序按钮的编程方法

Answer 1

利用数组存储数字，用array.sort方法排序追问

没学过

有没有简单点的

追答

那就用最笨的方法，用if 毕较大小

你不会用数组的话就需要定义10个变量。。。

追问

好吧

Answer 2

Private Sub rank(n As Integer, a() As Long) 
For i = 1 To n - 1 
    tmax = i 
        For j = i + 1 To n 
            If a(j) > a(tmax) Then tmax = j 
        Next j 
            If tmax <> i Then t = a(i): a(i) = a(tmax): a(tmax) = t 
Next i 
End Sub

Private sub Command2_Click()
Call Rank(10,a)
text2.text=text2.text & a(i) & " "
End Sub

还没上机测试呢，自己先试试吧，自己调整一下

本回答被网友采纳

Answer 3

Private Sub Command2_Click()
Dim a, i, t
a = Split(RTrim(TExt1.Text)," ")
For i = 0 To 8
For j = i To 9
If a(j)<a(i) Then
t = a(i)
a(i) = a(j)
a(j) = t
End If
Next
Next
Text1.Text = Join(a," ")
End Sub