设有如下程序：

Private Sub Command1_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 I

End Sub

程序运行后，单击窗体，则在窗体上显示的是（）

A.4321

B.5432

C.6543

D.7654