9.  设有如下通用过程： Public Sub Fun(a(),ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程 Private Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) Text1.Text = n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。
A. 10
B. 15
C. 25
D. 24
      满分：5  分
10.  下面叙述错误的是（ ）。
A. 驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器
B. 目录列表框DirListBox显示当前驱动器分层目录树
C. 文件列表框FileListBox显示选定目录中的所有文件
D. 文件列表框FileName属性是设定允许显示文件名的文件类型
      满分：5  分
11.  设a=10,b=5,c=1,执行语句Print a>b>c后，窗体上显示的是（ ）。
A. True
B. False
C. 1
D. 出错信息
      满分：5  分
你下载的这门作业如果没有答案，请联系客服QQ1137561768，QQ1270396195