设有如下程序： Option Base 0 Private Sub Form_Click() Dim a Dim i As Integer a=Array(1，2，3，4，5，6，7，8，9) For i=0 To 3 Print a(5-i)； Next End Sub 程序运行后，单击窗体，则在窗体上显示的是( )。

单项选择题编写如下事件过程： Private Sub Form_Activate() Dim score(1 To 3)As Integer Dim i As Integer，t As Variant For i=3 To 1 Step-1 score(i)=2*i Next i For Each t In score Print t； Next End Sub 程序运行后窗体上显示( )。

单项选择题下列程序执行后，其输出结果为( )。Dim a(5) For i=0 To 4 a(i)=i+1：m=i+1 Ifm=3 Then a(m-1)=a(i-2)Else a(m)=a(i) If i=2 Then a(i-1)=a(m-3) a(4)=i Print a(i)； Next i