数组a中各元素在列表框List1中以“个数逐行递增”的形式分布如图所示，在文本框Text11中输人行号，单击“排序”按钮，对该行数据做排序处理，并将排序之后的数据显示在文本框Text2。VB程序段如下：

Dim a(1 To 15) As Integer

'生成数组a， a(1)=24：a(2)= 17：a(3)=21：

a(4)=15：a(5)=14    …代码略

n= Val(Text1. Text)

For i=1 To n-1

    For j=(n+1) * n/2 To  ①  Step-1

        If  ②  Then

            t=a(j)：a(j)=a(j- 1)：a(j- 1)=t

        End If

    Next j

Next i

'将处理后的数组，以金字塔形显示，代码略

上述程序段中①②处的语句分别为(    )

A、(n-1) *n/2+1+I    a(j)>a(j- 1)

B、(n-1) *n/2+1+i    a(j)<a(j-1)

C、(n+1) * n/2+i-1    a(j)<a(j-1)

D、(n+1) * n/2+i-1    a(j)>a(j-1)