uname = Text1.Text          '输入用户名                 

   psd = Text2.Text            '输入密码

   vcode = Val(Text3.Text)     '输入验证码 

   If vcode <> Val(Label3.Caption) Then      

   MsgBox “ ”       ' Label3显示的是随机验证码

   ElseIf uname <> "admin" Or psd <> "123456" Then

   MsgBox “ ”

   Else

   MsgBox “ ”

   方框中正确的语句是（   ）。

Dim m As Integer  'm 为模块级变量，用于记录随机数个数

Private Sub Command1Click()

Randomize

Timer1.Enabled = True

End Sub

Private Sub Timer1Timer()

Dim n As Integer

        ①      

If      ②      Then  

     List1.AddItem n

Else

     List2.AddItem n  

End If

m = m + 1          

If m = 20 Then       ③       

End Sub

在程序①、②、③划线处，填入适当的语句或表达式，把程序补充完整:

程序中①划线处应填入{#blank#}1{#/blank#}。

程序中②划线处应填入{#blank#}2{#/blank#}。

程序中③划线处应填入{#blank#}3{#/blank#}。

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中显示的内容是（   ）