[問題] 急!!!排列相關問題
物件有:
TextBox1
TextBox2
Button1
For I = 0 To b.Length - 1
If b.Substring(I, 1) <> "," Then
c = c + b.Substring(I, 1)
Else
a(J) = c
J = J + 1
c = ""
End If
Next
For I = 0 To 3
For J = I + 1 To 4
If a(I) > a(J) Then
Temp = a(J)
a(J) = a(I)
a(I) = Temp
End If
Next
Next
Dim dis As String
For i = a.GetLowerBound() To a.GetUpperBound()
dis = dis + a(i).tostring()
If i < a.GetLowerBound Then
dis = dis + ","
End If
Next
怎麼套用在物件裡面
例如TextBox1裡面有:69,51,12,9,10
按Button1後
TextBox2裡面出現9,10,12,51,69
要有逗點唷!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 211.20.115.43
Programming 近期熱門文章
PTT數位生活區 即時熱門文章
