用VB编写的选择排序源代码
以下是使用Visual Basic编写的选择排序源代码:
Sub SelectionSort(arr() As Integer)
Dim i As Integer, j As Integer, minIndex As Integer, temp As Integer
For i = 0 To UBound(arr) - 1
minIndex = i
For j = i + 1 To UBound(arr)
If arr(j) < arr xss=removed> i Then
temp = arr(i)
arr(i) = arr(minIndex)
arr(minIndex) = temp
End If
Next i
End Sub
2.73KB
文件大小:
评论区