[已解决]VB解析选择排序 内循环和外循环有什么用

laoau138

VB解析选择排序  内循环和外循环有什么用


10个数从小到大   用选择排序

Private Sub Command1_Click()
  Dim a(1 To 10) As Integer
  For i = 1 To 10
    a(i) = Int(100 * Rnd)
    Print a(i);
  Next i
  Print
  For i = 1 To 9         '外循环，选择排序这一句有什么用
    k = i
    For j = i + 1 To 10        '内循环，选择排序这一句有什么用  为什么要j=i+1, to  10
      If a(j) < a(k) Then k = j
    Next j
    t = a(i): a(i) = a(k): a(k) = t
  Next i
  Print "排序以后的数:"
  For i = 1 To 10
    Print a(i);
  Next i
  Print
End Sub

最佳答案

月排行榜 / 总排行榜

france723

2017-4-30 18:17

和我昨天说的一样的，外循环控制内循环范围。比如有十个数，外循环刚开始，把第一个数单独拿出来，然后把剩下的放进内循环（这就是为什么j=j+1 to 10), 内循环把这些数一个一个的和外循环单独拿出的数字比较，谁小谁就取代那个单独的数，然后再比较，最后得出最小的数放在前面。
然后再再通过外循环把刚刚得出最小的数字排除，剩下的取出剩下的第一个数，然后以及类推的比较

跳转到最佳答案楼层

france723

和我昨天说的一样的，外循环控制内循环范围。比如有十个数，外循环刚开始，把第一个数单独拿出来，然后把剩下的放进内循环（这就是为什么j=j+1 to 10), 内循环把这些数一个一个的和外循环单独拿出的数字比较，谁小谁就取代那个单独的数，然后再比较，最后得出最小的数放在前面。
然后再再通过外循环把刚刚得出最小的数字排除，剩下的取出剩下的第一个数，然后以及类推的比较