在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click( )
Dim a
a=Array(1，2，3，4)
j=1
For i=4 To 1 Step -1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序，单击命令按钮，其输出结果是______。

A．显示当前驱动器或指定驱动器上的某目录下的文件名
B．显示当前驱动器或指定驱动器上的目录结构
C．显示根目录下的文件名
D．显示该路径下的文件

A) Open "text.dat" For Write As#1
B) Open "text.dar" For Binary As#1
C) Open "text.dat" For Input As#1
D) Open "text.dat" For Random As#1