有如下VB: Dim a(1 To 9) As Integer, m As Integer, k As Integer, i As Integer a(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)=9 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 中显示的内容是( )