[.NET] 排順序大小～
這是VB6的寫法～～～～～～～～～～～～
Private Sub Form_Load()
Dim i, j As Integer
Dim data(5) As Integer
Dim temp As Integer
Me.AutoRedraw = True .................這行.net要怎麼改寫勒？？？？？
For i = 0 To 4
data(i) = Val(InputBox("請輸入數字"))
Next
For i = 0 To 3
For j = i + 1 To 4
If data(i) > data(j) Then
temp = data(i)
data(i) = data(j)
data(j) = temp
End If
Next
Next
For i = 0 To 4
Print data(i)
Next
End Sub
--
再做十個伏地挺身好了~ 是!是!是!是!是!是!是!是!是!是!是!是!是!是!是!是!是!
( ￣□￣)/ <(￣ㄧ￣ ) <(￣ㄧ￣ ) <(￣ㄧ￣ )<(￣ㄧ￣ ) <(￣ㄧ￣ )
<(￣ㄧ￣ ) <(￣ㄧ￣ ) <(￣ㄧ￣ )<(￣ㄧ￣ ) <(￣ㄧ￣ )
<(￣ㄧ￣ ) <(￣ㄧ￣ ) <(￣ㄧ￣ )<(￣ㄧ￣ ) <(￣ㄧ￣ )
<(￣ㄧ￣ ) <(￣ㄧ￣ ) <(￣ㄧ￣ )<(￣ㄧ￣ ) <(￣ㄧ￣ )
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 219.80.131.91