有如下VB程序段

Dim a（1 To 5）As Integer

Dim d（1 To 5）As Integer

a（1）=12：a（2）=21：a（3）=19：a（4）=11：a（5）=20

n=5：Max=0

For i=1 To n

    d（i）=0

    For j=1 To i-1

        If a（j）<a（i）Then d（i）=d（i）+1

    Next j

    If d（i）>Max Then Max=d（i）

Next i

执行完以上程序段后，Max的值为（    ）

A、1

B、2

C、3

D、4