对数组元素a(1)到a(8)进行排序，其排序算法的VB部分程序段如下:
For m="1" To 7
p=m
For n="m+1" To 8

Next n
If p <> m Then t=a(p):a(p)=a(m):a(m)=t
Next m
方框中的语句是（   ）

A．If a(n)<a(p) Then p=m

B．If a(n)<a(p) Then p=n

C．If a(n)>a(p) Then p=n

D．If a(n)>a(p) Then p=m