内容发布更新时间 : 2024/5/5 5:39:23星期一 下面是文章的全部内容请认真阅读。

11年级计算机专业VB试题（三）

出题人:马玉辉

一、填空题：

1、空Print语句的功能是________或________。

2、用Print语句输出多个表达式的值时，表达式之间用________或________。

3、在赋值语句中，变量和表达式的数据类型必须一致，若两者同为数值型但进度不一样，则________。

4、x=a=b语句的含义是________。

5、赋值语句兼有________与________双重功能。

6、在Visual Basic中有两个注释语句________和________，语法格式为________。

7、使用Rem关键字时，Rem关键字与注释文本之间要________，放在其他语句尾时，要用________隔开。

8、在Visual Basic中有两个结束语句：________和________。 9、End语句的功能是________；Unload语句的功能是________。 10、“For k =________To-11 Step -3”的循环体循环50次。 11、假设有以下程序段：For i = 1 To Step 3 For j = 15 To 3 Step -4 Print i * j Next j Next i

Print s，i, j

则语句Print i*j的执行次数是________，执行后i 的值为________，j 的值为________。 12、下列程序段的执行结果为________。 i = 1 a = 4 Do i = i + 1 a= a + 2

Loop Until i >= 6 Print \；a

13、在Visual Basic中，把一组具有相同________、不同________的变量称为数组。

14、在计算机中，数组占据一块连续的内存区域，________就是这个区域的名称，区域的每个单元都有自己的地址，________指出每个单元在该区域的位置。

15、在Visual Basic中，用来声明数组的语句有________、________、________、和________。16、在定义数组时，下标的范围可以是不超过________数据类型的范围。如果省略了“下标下界To”，数组默认下界为________，如果希望下标从1开始，通过________语句来设置。

老师寄语：一分耕耘，一分收获，未必；九分耕耘，会有收获，一定！

17、数组的维数最多可以有________维。

18、创建动态数组通常分为两步：首先在窗体级别、标准模块或过程中________，然后在过程中________。

19、如果用Redim重新声明动态数组只能修改________，不能修改________。

20‘如果用ReDim语句重新分配动态数组时，数组中的内容将被清除，如果ReDim语句中使用了________选择项，则保留数组内容。

21、用Dim声明数组时，在默认情况下，数组下界为________，如果需要数组下界为1可以在

通用声明中，使用________项加以说明。

22、控件数组是由一组________相同的控件组成，它们具有一个共同的________，相同的

________，而且它们实现的功能基本相视。控件数组一经建立，每个控件数组元素通过________唯一确定。

23、使用ReDim语句________改变数组类型，在ReDim语句中加看Preserve关键字，对重 定义数组的限制是________。

24、我们利用函数________及________能分别求出数组的下、上界。 25、假设Dim a(8) As Double，则该数组声明了9个元素可供使用。如果设Dimb(4,1 to 9)As Single,

则它声明了一个具有________个元素的________维数组。

26、用Dim语句定义数组时，数值数组中的全部元素初始化为________，字符串数组中的全部

元素初始化为________。

27、利用Array（）函数给数组元素输入初值，数组应该声明为________数组，数组的数据类型

为________类型。

28、如果想释放动态数组的存储空间或清除定长数组的内容，可以用________语句来实现，语

法格式：________。

29、Erase语句的功能是________或________。

30、当把Erase语句用于动态数组时，将删除整个数组结构并释放该数组所占有的内存，下一次

使用需要重新用________语句定于。

二、选择题：

1、表达式Right（\的值是 （ ） A.Beij B、JingC、Eiji D、Ijin

2、设X = 4，Y=8，Z=7，表达式X>Z Or Z

3、设A=\则表达式Val（Left（A，4）+ Mid（A,4,2))的值为（ ） A、987654 B、987665 C、9 D、6

4、将数学表达式cos^2(a+b)+5e2VB的表达式，正确的形式是（ ）

A、cos(a+b)^2+5exp(2) B、Cos(a+b)^2+5*ln(2) C、Cos^2(a+b)+5*ln(2) 5、表达式Int（rnd（0）*100）的范围是（ ） A、（0,99） B、（0,100） C、[0,99] D、(0,100)

6、X是大于0小于45的数，用VB表达式表达正确的是 （ ）

不必每分钟都学习，但求学习每分钟都有收获

1

A、0<=X<45 B、0<=X<=45 C、0<=X and x<=45 D、0<=X or X<45 7、表达式4+5/6*7/8 Mod 9 的值是 （ ） A、4 B、5 C、6 D、7 8、以下VB程序段的输出结果是（ ） a= sqr(7):b=sqr(5):c=a>b Print c

A、-1 B、0 C、False D、True 9、下列4个逻辑表达式，其逻辑值为“真”的是 （ ）

A、Not（3+4<4+6) B、2>1 AND 3<2 C、1>2 OR 2>3 D、NOT(1>2) 10、表达式Val（\的值是（ ）

A、123 B、12.3 C、0 D、123e2CD

11、如X是一个正实数，对X的第二位小树四舍五入的表达式是 （ ） A、0.1*INT(X+0.05) B、0.1*INT(10*(X+0.05)) C、0.1*INT(100*(X+0.5)) D、0.1*INT(X+0.5)

12、可以同时删除字符串前部和尾部空白的函数是 （ ） A、Ltrim B、Rtrim C、Trim D、Mid 13、表达式INT(-27.8)+Sgn（37.8）的值是（ ） A、10 B、-27 C、-18 D、-16

14、表达式INT（5*Rnd+1）*Int（5*RND-1)值的范围是（ ） A、[0,15] B、[-1,15] C、[-4,15] D、[-5,15]

15、函数INstr（\程序设计教程\程序\的值是 （ ） A、11 B、13 C、15 D、16

16、表达式x=sqr(a^2-5)+sqr(b^2-5)的类型是（ ）

A、算术表达式 B、逻辑表达式 C、关系表达式 D、字符表式 17、表达式PRINT INT(-20.45)的值是 （ ） A.-21 B.-20 C.20 D.21

18、函数PRINT UCASE(\的值是 （ ） A.Basic B.Basic C.BASic D.BASIC

19、为了使用窗体输出，是PRINT方法在Form_Load 事件中起作用，必须设置窗体的（性

A.AutoReDraw B.BackColor

2

老师寄语：一分耕耘，一分收获，未必；九分耕耘，会有收获，一定！

C.Moveable D.Caption

20、下列程序段输出结果为（ ） A=0

PRINT A+1 A=3

A、1 B、-1 C、3 D、0

三、判断题：

1、在编写程序代码时，可以使用Dim语句对已经声明了的数组进行重新声明。（ ） 2、可以使用Ibound和Ubound这两个函数确定数组的大小。（ ） 3、Array只适应于一维数组和二维数组赋值，不适合多维数组赋值。（ ） 4、动态数组在程序运行过程中完成声明，动态数组可以在任何适合改变大小。（ ） 5、动态数组时指计算机在执行过程中才给数组开辟存储控件的数组。（ ） 6、动态数组可以用ReDim语句再次分配动态数组占据的存储空间。（ ） 7、动态数组可以用Erase语句删除，收回分配给它的存储空间。（ ）

8、创建动态数组时，因为没有维数下标，所以数组名后的括号时可以省略的。（ ） 9、Redim语句只能出现在事件过程或通用过程中。（ ） 10、Redim语句定义的数组时一个临时数组，即在执行数组所在的过程时为数组开辟一定的内存空间，当过程结束时，这部分内存即被释放。（ ）

四、程序分析题：

1、以下程序段的运行结果是什么？ Private Sub Command1_Click() a$ = \b$ = \

c$ = b$ & UCase(Mid(a$, 4, 3)) & Right$(a$, 3) Print c$

End Sub

2、下列程序的运行结果是什么？ a$ = \

b$ = Mid$(Left$(a$, 7), 6, 2) c$ = Right$(Right$(a$, 5.2), 3)

Print Val(c$) & Val(b$) & Left$(a$, 5) + c$ + b$

3、下列程序运行后输出的结果是什么？

不必每分钟都学习，但求学习每分钟都有收获

）属Private Sub Form_Load() x = \y = \z = 1 u = 2

Print x; l; y, z; u Print z; x, y; u End Sub

4、下列程序运行后输出的结果是什么？ Dim a As Integer, b As Integer, max As Integer a = 2.6 b = 3

max = IIf(a < b, 1, 0) Print max

5、在窗体添加一个命令按钮，名称为command1，其单击事件中有如下程序段，则事件过程执行后，文本框的内容是什么？ Private Sub Command1_Click() For i = 1 To 4 For j = 1 To 3 x = 3

For k = 1 To 2 x = x + 3 Next k Next j Next i

text1.Text = Str(x) End Sub

3

老师寄语：一分耕耘，一分收获，未必；九分耕耘，会有收获，一定！

不必每分钟都学习，但求学习每分钟都有收获