有VB程序段如下：

Dim a(1 To 9) As Integer

Dim m As Integer, k As Integer, i As Integer

a(1)=2 , a(2)=8 , a(3)=6 , a(4)=5 , a(5)=4 , a(6)=3 , a(7)=9 , a(8)=7 , a(9)= 1

m=1 : k=1

For i=2 To 9

    If a(i)<a(i-1) Then

    k=k+1

        If k>m Then m=k

    Else

        k =1

    End If

    Next i

Text1. Text = Str(m)

该程序段运行后，文本框Text1中显示的内容是(     )

A、3

B、4

C、5

D、9