11.下列_____程序段能删除列表List1中的所有项。 A、Private Sub Command1_Click() For I=0 To List.ListCount-1 List1.RemoveItem 0 Next I End Sub B、Private Sub Command1_Click() For I=0 To List.ListCount-1 List1.RemoveItem 1 Next I End Sub C、Private Sub Command1_Click() For I=0 To List1.ListCount List1.RemoveItem 0 Next I End Sub D、Private Sub Command1_Click() For I=0 To List1.ListCount-1 List1.RemoveItem 1 Next I End Sub

A       B       C       D

12.若N=365，下述的语句中_____显示的值是33。 A、Print n - Int(n / 100) * 100 B、Print Int(n / 10) - Int(n / 100) * 10 C、Print Int(n / 10) - Int(n / 100) D、Print Int(n - Int(n / 10) * 10) / 10

A       B       C       D

13.执行以下Command1的Click事件过程在窗体上显示____。 Option Base 0 Private Sub Command1_Click( ) Dim a a=Array("a","b","c","d","e","f","g") Print a(1);a(3);a(5) End Sub A、abc B、bdf C、ace D、无法输出结果

A       B       C       D

14.下面叙述中不正确的是____。 A、自定义类型只能在窗体模块的通用声明段进行声明 B、自定义类型中的元素类型可以是系统提供的基本数据类型或已声明的自定义类型 C、在窗体模块中定义自定义类型时必须使用Private关键字 D、自定义类型必须在窗体模块或标准模块的通用声明段进行声明

A       B       C       D

15.要在C盘当前文件夹下建立一个名为StuData.dat的顺序文件，应先使用_____语句。 A、Open "C:\StuData.dat" For Output As #1 B、Open "C:\StrData.dat" For Input As #1 C、Open "C;StuData.dat" For Output As #1 D、Open "C:StuData.dat" For Input AS #1

A       B       C       D