单项选择题

编写如下事件过程:
Private Sub Form Activate()
Dim score(1 To 3) As Integer
Dim i As Integer,t As Variant
For i=3 To 1 Step-l
score(i)=2*i
Next i
For Each t In score
Print t;
Next
End Sub
程序运行后窗体上显示( )。

A.6 4 2
B.2 4 6
C.2
D.6