下列程序用选择法升序排序。阅读程序并填空。 Option Base 1 Private Sub paixu(a()) n = Ubound(a
下列程序用选择法升序排序。阅读程序并填空。 Option Base 1 Private Sub paixu(a()) n = Ubound(a) For i = 1 To n - 1 k = i For j = i + 1 To n If a(j) <a(k) then k="j" next j t="a(i):" a(i)="a(k):" a(k)="t" i end sub private command1_click() dim b(), as integer b="Array(15," 8, 4, 13, 6, 10, 17, 1) n print "排序前:"; for to b(i); _____________ "排序后:";> A、call paixu(b)
B、paixu(b)
C、call paixu(b(i))
D、call paixu(b,n)