a=aray(1,2,3,4) B)Dim ao, bo a=aray(1,2,3,4)b=a C)Dim a As Variant a=array (l, "asd", true) D)Dim a(As variant a=aray(1,2,3,4) (9)引用列表框(Lst)最后一个数据项应使用的表达式是() A)Listl List( Listl List Count) B)Listl, List(ListI List Count-1) C)Listl List(List Count) D)Listl List(List Count-1) (10)在窗体上画一个名称为 Command1的命令按钮编写如下程序: Private Sub Command1 Click Print pl(3, 7) End Sub Public Function pl(x As Single, n As Integer )As Single If n=0 Then pl=I Else If n mod 2=1 then =XX+n Pl=x'x-n End if End If End Function 程序运行后,单击该命令按钮,屏幕上显示的结果是 B)I C)0 D)16 (11)执行如下语句a= Finut Box(" Today"," Tomorrow," Yesterday"," Day before yesterday",5) 将显示一个输入对话框,在对话框的输入区中显示的信息是 A)Today B)Tomorrow C)Yesterday D)Day before yesterday (12)设有语句open"c: \Test dat" For Out Put则以下错误的叙述是O A)该语句打开C盘根目录下一个己存在的文件 Test Da B)该语句在C盘根目录下建立一个名为 Test. Dat的文 C)该语句建立的文件的文件号为1 D)执行该语句后就可以通过 Print语句向文件 Test. Dat中写入信息 (13)Sub过程与 Function过程最根本的区别是O A)Sub过程可以用Cal语句直接使用过程名调用,而 Function过程不可以 B) Function过程可以有形参,Sub过程不可以 C)Sub过程不能返回值,而 Function过程能返回值a = array(1,2,3,4) B)Dim a(),b() a = array(1,2,3,4):b = a C)Dim a As Variant a = array(1,"asd",true) D)Dim a() As Variant a = array(1,2,3,4) (9)引用列表框(List1)最后一个数据项应使用的表达式是() A)List1.List(List1.ListCount) B)List1.List(List1.ListCount-1) C)List1.List(ListCount) D)List1.List(ListCount-1) (10)在窗体上画一个名称为 Command1 的命令按钮,编写如下程序: Private Sub Command1_Click() Print pl(3,7) End Sub Public Function pl(x As Single,n As Integer) As Single If n=0 Then pl=1 Else If n Mod 2=1 Then pl=x*x+n Else P1=x*x-n End If End If End Function 程序运行后,单击该命令按钮,屏幕上显示的结果是() A)2 B)1 C)0 D)16 (11)执行如下语句:a=inutBox("Today","TomorroW,"Yesterday","Day before yesterday" ,5) 将显示一个输入对话框,在对话框的输入区中显示的信息是 A)Today B)Tomorrow C)Yesterday D)Day before yesterday (12)设有语句 open "c:\Test.Dat" For OutPut 则以下错误的叙述是 () A)该语句打开 C 盘根目录下一个己存在的文件 Test.Da B)该语句在 C 盘根目录下建立一个名为 Test.Dat 的文 C)该语句建立的文件的文件号为 1 D)执行该语句后,就可以通过 Print#语句向文件 Test.Dat 中写入信息 (13) Sub 过程与 Function 过程最根本的区别是() A) Sub 过程可以用 Call 语句直接使用过程名调用,而 Function 过程不可以 B) Function 过程可以有形参,Sub 过程不可以 C) Sub 过程不能返回值,而 Function 过程能返回值