a) how b) are c) you d) ho 16、以下不属于Visual Basic系统的文件类型是 _____

a) .frm b) .cls c) .bat d) .vbp

17、以下程序段的运行结果是___ ____。 Private Sub Form_Click() m = 1 n = 1 Do

m = m * n n = n + 1 Loop Until n > 4 Print m End Sub D. 24

18、如果有声明Dim a(5) As Integer，则该数组共占用______个字节内存。

6

A. 25 B. 45 C. 55

a) 5 b) 6 c) 10 d) 12 19、在Visual Basic设计界面中不能隐藏的窗口是______。

a)工程窗口 b) 属性窗口 c) 立即窗口 d) 窗体窗口

20、8.6787E+8写成普通的十进制数是_______。

a)86787000 b)867870000 c) 8678700 d)8678700000

21、从键盘上输入一个实数nu，执行Visual

Basic语句，利用字符串函数对该数进行处理，如果输出的内容不是字符END，则程序输出的内容是 ( ) nu=InputBox(\ n＄=Str＄(nu) p=InStr(n＄,\ If p>0 Then

Print Mid＄(n＄,p) Else

7

Print \ End If

A．用字符方式输出数据nu B．输出数据的整数部分

C．输出数据的小数部分+小数点（包括小数点）

D．只去掉数据中的小数点，保留所有数字输出

22、Visual Basic中如果在立即窗口中执行以

下操作，则输出的结果是( ) m = 123: n = 145

p = Len(Str＄(m) + Str＄(n)) Print p

A．2 B．4 C．5 D．8

23、执行如下程序段时，从键盘输入-5，输出的结果是_______。 x=-5

s=Val(InputBox(\请输入s的值:\

8

Select Case s Case Is>0 y=x+1 Case Is=0 y=x+2 Case Else y=x+3 End Select Print x;y

A. -5 -2 B. -5 -4 C. -5 -3 D. -5 -5

24、执行下面Visual Basic程序，最后输出s是（ ） Dim a As Integer, i As Integer Dim b As Integer, j As Integer Dim s As Integer a = 5 b = 10 s = 0

9

For i = 1 To a b = 5

For j = 1 To b s = s + b b = b - 1 Next j Next i Print s

A. 15 B. 30 C. 45 D. 75

25、以下说法不正确的是（ ） A．使用ReDim语句可以改变数组的维数 B．使用ReDim语句可以改变数组的类型 C．使用ReDim语句可以改变数组每一维的大小 D．使用ReDim语句可以对数组中的所有元素进行初始化

二、判断题（每题1分，共8分）

1. VB中，变量按其作用范围来说可以分为全局变量、模块级变量和局部变量三种类型（ ）

10