发布时间 : 星期六 文章南京工业大学vb期末题库6更新完毕开始阅读
30、有如下程序：
Private Sub Command1_Click( ) score=65 select Case score Case Is<60 a$=\Case 60 To 69 a$=\Case 70 To 79 a$=\Case 80 To 89 a$=\Case else a$=\End Select MsgBox a$ End Sub
程序运行后，消息对话框中显示的内容为_______。 ( )
A、A B、B C、C D、D
31、在过程中有语句ForI=N1 To N2 Step N3，在该循环体内有下列四条语句，其中________会影响循环执行的次数。 ①N1=N1+I ②N2=N2+N3 ③I=I+N3 ④N3=2*N3 ( )
A、①② B、①②③ C、③ D、①②③④ 32、下列程序
Private Sub Command1_Click( ) a=InputBox(\请输入\b=InputBox(\请输入\Print a+b End Sub
运行时输入3和4输出的结果是 ________ 。 ( )
A、7 B、34 C、3+4 D、出错
33、如下二维数组声明语句，____________正确。 ( )
A、Dim a[3，4] As Integer B、Dim a(3，4) As Integer C、Dim a(n，n) As Integer D、Dim a(34) As Integer
34、在窗体模块的通用声明处用下面的语句声明变量、数组，正确语句有________个。 ①Public A(5) As Integer ②Public N As Integer ③Public St As String
④Private b() As Integer ( )
A、2 B、3 C、4 D、1
35、在窗体的通用声明处有语句Dim A() As Single，以下在某事件过程中重定义此数组的一组正确语句是：____________。 ( )
A、ReDim A(3,3)
ReDim A(4,4) As Integer B、ReDim A (3,3)
ReDim Preserve A (4,4) C、ReDim A(3)
ReDim A(3,3) As Integer D、ReDim A (3,3)
ReDim Preserve A(3,4) 36、对窗体编写如下代码： Option Base 1
Private Sub Command1_Click( ) a=Array(237,126,87,48,498) m1=a(1) m2=1 For i=2 To 5 If a(i)>m1 Then m1=a(i) m2=i End If Next i Print m1;m2 End Sub
程序运行后，按回车键，输出结果为_________。 ( )
A、48 4 B、237 1 C、498 5 D、498 4
37、下列有关数组的说法中，不正确的是________。 ( )
A、在窗体模块中不可以定义全局数据组
B、可以使用Erase语句释放所有数组所占据的存储储空间
C、语句Dim X(3.6+2)As Integer定义了一个维上界是6的一维的整型数组 D、形参数组的类型可以是定长符串类型
38、在窗体上添加一个命令按钮，名为Command1，事件过程如下。执行结果是________。 Sub pb(b( ) As Integer) For i=1 To 4 B(i)=2*i Next i End Sub
Private Sub Command1_Click( ) Dim a(1 To 4) As Integer a(1)=5:a(2)=6: a(3)=7:a(4)=8 pb a For i=1 To 4 Print a(i); Next i
End Sub ( )
A、2 4 6 8 B、1 3 5 7 C、3 6 6 12 D、4 8 12 16
39、当发生Command1_Clik事件后，下列程序的输出结果是____________。
Dim i As Integer
Dim a(10) As Integer
For i=9 To 0 Step–1
a(i)=10–i
Next i
Print a(2);a(5);a(8) ( )
A、2 5 8 B、7 4 1 C、8 5 2 D、3 6 9
40、在窗体模块的通用声明处用下面的语句声明变量、数组，正确语句有________个。 ①Public A(5) As Integer ②Public N As Integer ③Public St As String
④Private b() As Integer ( )
A、2 B、3 C、4 D、1
41、以下有关数组的说明中，错误的是________。 ( )
A、根据数组说明的方式，可将数组分为动态数组和静态数组。 B、在过程中，不能用Private语句定义数组。
C、利用ReDim语句重新定维时，不得改变已经说明过的数组的数据类型。 D、数组重新定维后，原有的数组元素内容将不予保留。
42、当发生Command1_Click事件后，程序输出结果是________。
Option Base 1
Private Sub Command1_Click()
Dim a(4, 4) As Integer,i As Integer,s As Integer
s=0
Fori=1 To 4
For
j=1 To 4
a(i, j) = (i-1)*4+j*2
Next j
Next i
For i = 1 To 4
s=s+a(i, i)
Next i
Print s
End Sub ( )
A、28B、32C、30D、44
43、在窗体上画一个命令按钮，然后编写如下事件过程： Option Base 1
Private Sub Command1_Click( ) Dim a As Variant 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、4321B、12C、34D、1234
44、如下二维数组声明语句，____________正确。 ( )
A、Dim a[3，4] As Integer B、Dim a(3，4) As Integer C、Dim a(n，n) As Integer D、Dim a(34) As Integer
45、运行以下程序段，输出结果是 。
Dim a(1 To 10)
Dim p(1 To 4)
k = 5
For i = 1 To 4
p(i) = i * 2
Next i
For i = 1 To 4
k = k + p(i) * 2
Next i
Print k ( )
A、48B、32C、30D、45
46、当发生Command1_Clik事件后，下列程序的执行结果是____________。
Private Sub Command1_Click()
Dim a
a = Array(1, 2, 3, 4, 5)
For i = 1 To 4
Print a(i) - a(i–1);
Next i
End Sub ( )
A、1 1 1 1 1B、1 1 1 1C、1 1 1D、2 2 2
47、以下有关Sub过程与Function过程的区别，正确的是________。 ( )
A、Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以 B、Function过程可以有形参，Sub过程不能有形参 C、两种过程参数传递方式不同
D、Sub过程没有返回值，Function过程能返回值
48、 ( )
A、 B、 C、 D、
49、 传递。 ( )
A、