有如下程序段: Dim a(1 To 9) As Integer, m As Integer, k As Integer, i As Integera(1)=2 : a(2)=8 : a(3)=3 : a(4)=4 : a(5)=5 : a(6)=6 : a(7)=1 : a(8)=7 : a(9)=9m = 1: k = 1For i = 2 To 9 If a(i) > a(i - 1) Then k = k + 1 If k > m Then m = k Else k = 1 End IfNext iText1.Text = Str(m)该程序段运行后,文本框Text1中显示的内容是( )
A . 4
B . 6
C . 8
D . 9
答案:A