一、选择题

 第一章 开启VB编程之旅

1.（2011）31．在Visual Basic 6.0集成开发环境中，不能运行程序的操作是

A．按“F 5”键                                            B．从“运行”菜单中选择“启动”命令

C．在工具栏中单击“启动”按钮       D．按“F6”键

2.（2012）31．在设计阶段，双击窗体上的某个控件时所打开的窗口是

A．工程资源管理器窗口                         B．工具箱窗口

C．代码窗口                                                 D．属性窗口

3.（2013）31．    操作不能打开代码窗口。

A．双击窗体或窗体上包含的控件      

B．选择“视图”→“代码窗口”命令

C．单击工程资源管理器窗口中的“查看代码”按钮      

D．按“F8”键

4.（2014）31．在设计阶段，双击窗体上的某个控件时打开的窗口是

A．代码窗口                                                 B．工具箱窗口

C．工程资源管理器窗口                         D．属性窗口

5. （2015）31．Visual Basic 应用程序中的一个窗体最多可容纳    个控件。 

A．31               B．255 

C．127            D．32767 

6. （2015）32．    是指控制对象动作行为的方式。 

A．事件          B．对象 

C．方法          D．属性 

7.（2015）33．    不能打开“属性”窗口。 

A．选择“视图”菜单中的“属性窗口”命令 

B．按 Alt+F4 组合键 

C．按 F4 键 

D．单击“工具栏”中的“属性窗口”按钮 

8. （2016）31.Visual Basic有____种工作模式。

         A．设计、运行和中断           B.设计、运行和调试

         C．调试、运行和中断           D.运行、中断和调试

9.（2016）32.窗体或控件的标题、名称、颜色、字体大小和可见性都是____

         A．对象           B.事件               C.方法               D.属性

10.（2016）33.不能在Visual Basic集成开发环境中运行程序的操作是­­­______

         A.按F5键                           B.从运行菜单中选择启动按钮

         C．按F7键                        D.在工具栏中单击启动按钮

 

第二章 快速掌握VB编程语言

1.（2011）32．布尔型（boolean）数据的取值范围是

A．0或1                                                        B．1或-1                 

C．True或False                                           D．T或F

2.（2011）33．关于常量，描述错误的是

A．在程序执行期间数值始终不变的量称为常量

B．常量分为一般常量和符号常量两种

C．数值常量包括整数、定点数和浮点数

D．系统内部定义的符号常量在程序设计中不能直接使用

3.（2011）34．符合Visual Basic 6.0规范的变量名是

A．a3                         B．3a                         C．If                           D．a+b

4.（2011）35．符合Visual Basic 6.0规范的表达式是

A．(a+b)(a-b)  B．a2-b2                   C．a^2-b^2               D．[a+b]*[a-b]

5.（2011）36．表达式 14 Mod 3的值是

A．2                            B．-2                          C．  1                          D．-1

6.（2011）37．设a=”abcdefghij”，则表达式Right（a,3）&Mid（a,3,3）的值是

A．”abc”          B．”hij”                      C．”cde”          D．”hijcde”

7.（2011）38．下列各种运算符，运算级别最高的是

A．关系运算符                                            B．布尔运算符      

C．算术运算符                                            D．字符串连接运算符

8.（2011）39．假设变量a=1234，执行t=(a\100) Mod 10语句以后，t的值是

A．1                            B．2                            C．3                          D．4

9.（2011）40．用min表示a和b中的最小值，不能实现该功能的程序段是

A．If a．If a

min=a

Else

min=b

End if

C．min=IIf(a．min=IIf(a

10.（2011）41．程序段：s=0

For i=1 To 10 Step 2

                            s=s+i

                            Next i

                            Print i

中的Print i 输出的结果是

A．11                         B．10                         C．9                            D．25

11.（2011）42．能求出 s=1*2*3*4*5的程序段是

A．s=1:i=1                                                      B．s=1:i=1      

          Do While i<5                                               Do Until i>=5

               s=s*i                                                                s=s*i

              i=i+1                                                               i=i+1

         Loop                                                                  Loop

C．s=1:i=1                                                      D．s=1:i=1                        

Do                                                                 Do

s=s*i                                                                 s=s*i

i=i+1                                                                i=i+1

Loop While i<=5                                     Loop Until i>=5

12.（2011）43．用Dim a(2，3) As Integer声明的数组元素的个数是

A．2                            B．5                            C．6                            D．12

13.（2011）44．关于数组的清除描述错误的是

A．Erase能够清除定长数组的内容   

B．Erase能够释放定长数组的所有空间

C．Erase用于定长数值数组时，则把该数组所有元素置为0

D．Erase用于动态数组时，将删除整个数组结构并释放该数组所占的内存

14.（2012）32．整型（Integer）数据占    字节的内存空间。

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

15.（2012）33．    可以作为Visual Basic 中变量名。

A．a+b                       B．abc                       C．2a                         D．Then

16.（2012）34．符合Visual Basic 6.0规范的表达式是

A．a²+ab                                                        B．a(a+b)                 

C．a*[a+b]                                                     D．a*(a+b)

17.（2012）35．表示x位于闭区间[-3，3] 的Visual Basic表达式是

A．-3<=x<=3                                                  B．x>= - 3 Or x<=3

C．x>= - 3 And x<=3                                   D．x>= - 3 Xor x<=3

18.（2012）36．程序执行过程中其值不变的量称为

A．表达式                B．常量                     C．变量                     D．函数

19.（2012）37．表达式Abs(-10) + Sqr(16)的值是

A．6                            B．-6                          C．26                         D．14

20.（2012）38．设a="abcdefghij"，则表达式Mid（a,5,3）& Right（a,3）的值是

A．"efg"                                                B．"hij"           

C．"efghij"                                            D．"hijefg"

21.（2012）39．假设变量a=5，b=3，执行t=a:a=b:b=t语句以后，a和b的值分别是

A．3 和5                 B．5 和3                 C．3 和3                 D．5 和5

22.（2012）40．获得当前系统日期的函数是

A．Hour                                                 B．Time                    

C．Date                                                          D．Year

23.（2012）41．程序段：s=1

For i=1 To 10 Step 2

                                     s=s*i

                                     i=i+1

                            Next i

                            Print s,i

执行结束后，输出的结果是

A．280  13              B．280  11              C．945  11              D．945  13

24.（2012）42．在窗体上画一个名称为Command1的命令按钮，然后编写如下过程：

Private Sub Command1_Click()

x = 0

n = Val(InputBox(""))

For i = 1 To n

For j = 1 To i

x = x +j

Next j

Next i

Print x

End Sub

运行后，单击命令按钮，输入4以后的输出结果是

A．9                            B．10                         C．19                         D．20

25.（2012）43．Sub过程与Function过程最根本的区别是

A．Sub过程可以直接使用过程名调用，而Function过程不可以

B．Function过程可以有参数，而Sub过程不能有参数

C．两种过程的参数的传递方式不同

D．Function过程能通过过程名返回值，Sub过程不能通过过程名返回值

26.（2012）44．    既有输出功能，又有计算功能。

A．Print                                                          B．Let                       

C．Rem                                                           D．End

27.（2013）32．Visual Basic 6.0为长整型（Long）变量分配了    字节的内存空间。

A．1                                                                 B．2                           

C．4                                                                 D．8

28.（2013）33．符合Visual Basic 6.0规范的标识符是

A．a+                                                               B．ab                        

C．2a                                                               D．Then

29.（2013）34．将数学表达式转换成符合Visual Basic 6.0规范的表达式是

A．(Sin(43*3.1415926/180)+Exp(x))/(c+d)

B．(Sin(43)+Exp(x))/(c+d)

C．Sin(43*3.1415926/180)+Exp(x)/c+d

D．(Sin43⁰+e^x)/(c+d)

30.（2013）35．日期型常量前后要加上    符号。

A．！                                                                 B．*

C．#                                                                 D．$

31.（2013）36．程序执行过程中其值可以变化的量称为

A．函数                                                          B．常量

C．变量                                                          D．表达式

32.（2013）37．算术运算符、关系运算符和布尔运算符的运算优先级由高到低依次是

A．算术运算符、布尔运算符、关系运算符

B．算术运算符、关系运算符、布尔运算符

C．布尔运算符、关系运算符、算术运算符

D．关系运算符、算术运算符、布尔运算符

33.（2013）38．设a="abcdefghijk"，则表达式Mid（a,5,2）&Right（a,3）的值是

A．"abc"                                               B．"ijk"

C．"efijk"                                                        D．"abcef"

34.（2013）39．设变量a=8，b=5，执行a=a+b:b=a-b:a=a-b语句以后，a和b的值分别是

A．8 和5                                                       B．5 和8

C．8和8                                                        D．5 和5

35.（2013）40．获得系统当前时间的函数是

A．Date                                                          B．Time 

C．Hour                                                 D．Year

36.（2013）41．程序段：

For i=1 To 10 Step 2

                               Print i

                            Next i

中循环体Print i 的执行次数是

A．5                                                                 B．10

C．4                                                                 D．6

37.（2013）42．程序段：

s = 0

n = 4

For i = 1 To n

For j = 1 To n

s = s + j

Next j

Next i

Print s

运行后的输出结果是

A．20                                                               B．22

C．40                                                               D．16

38.（2013）43．略了As子句的Function过程的返回值类型为

A．Double                                                      B．Long

C．Variant                                                      D．Integer

39.（2013）44．    不是赋值语句。

A．A="123"+"456"                             B．Label1.Caption="你好！"

C．r=Val(Text1.Text)                                    D．x+1=y

40.（2014）32．整型（Integer）变量的取值范围是

A．-128～127                                      B．-32768～32767

C．0～65535                                                 D．0～32767

41.（2014）33．通过窗体的    属性可以设置窗体的标题文字。

A．Name                   B．BackColor  C．Height                 D．Caption　

42.（2014）34．将数学表达式 转换成符合Visual Basic 6.0规范的表达式是

A．Sin(37*3.1415926/180)+Exp(x)/(a+b)

B．(Sin(37)+Exp(x))/(a+b)

C．(Sin(37*3.1415926/180)+Exp(x))/(a+b)

D．(Sin370+ex)/(a+b)

43.（2014）35．    可以作为Visual Basic 6.0的变量名。

A．a+b+c                   B．a-b-c                     C．a*b*c                   D．abc

44.（2014）36．关于变量的描述，错误的是

A．程序执行过程中其值可以变化的量称为变量

B．变量名实质是计算机内存单元的命名

C．隐式声明的变量类型是Integer类型

D．全局变量的作用域是整个应用程序

45.（2014）37．Visual Basic 6.0表达式x>= - 3 And x<8表示x位于

A．[- 3，8]                B．（- 3，8）           C．[ -3，8)             D．（- 3，8]

46.（2014）38．设x是一个实数，表达式    能够把x精确到小数点后的第三位。

A．Int(x*100+0.5)/100                               B．Int(x*1000+0.5)/100

C．Int(x*100+0.5)/1000                   D．Int(x*1000+0.5)/1000

47.（2014）39．表达式Int(400 * Rnd()) + 200表示的是    中的整数。

A．[200，600]         B．(200，600]         C．[200，600)         D．(200，600)

48.（2014）40．用max表示a和b中的最大值，不能实现该功能的程序段是

A．max=IIf(a．If a>b Then

max=a

Else

max=b

End if

C．If a>b Then max=a Else max=b D．max=IIf(a>b,a,b)       

49.（2014）41．假设变量a=3456，执行语句t=(a\100) Mod 10后，t的值是

A．3                            B．4                            C．5                            D．6

50.（2014）42．程序段：

Dim a(5), i As Integer

For i = 1 To 5

a(i) = i

Next i

For i = 2 To 4

a(i) = a(i - 1) + a(i + 1)

Next i

For i = 1 To 5

Print a(i),

Next i

的输出结果是

A．1  2  3  4  5                                     B．1  4  8  13  5

C．1  4  6  8  5                                     D．1  4  9  16  25

51.（2014）43．设a = 1，b = 0，c = 3，d = 4，执行语句a = (b = (c = d))后，a的值是

A．True                      B．1                            C．False                    D．4

52.（2014）45．程序段：

Dim a(5), i, t As Integer

For i = 1 To 5

a(i) = i

Next i

t = a(1)

For i = 2 To 5

a(i - 1) = a(i)

Next i

a(i - 1) = t

For i = 1 To 5

Print a(i),

Next i

的输出结果是

A．1  2  3  4  5                                    B．2  3  4  5  1

C．5  4  3  2  1                                     D．3  2  1  5  4

53.（2014）46．程序段：

Dim a(3, 3)

For i = 1 To 3

For j = 1 To 3

If (i = j Or i + j = 4) Then a(i, j) = 1 Else a(i, j) = 0

Print a(i, j),

Next j

Print

Next i

的输出结果是

A．  1  1  1            B．  0  0  0          C．  1  0  1            D．  0  1  0

1  1  1                     0  0  0                     0  1  0                     1  0  1

1  1  1                     0  0  0                     1  0  1                     0  1  0

54.（2014）47．用Dim a(2，4) As Integer声明的数组元素的个数是

A．24                         B．6                            C．8                            D．15

55. （2015）34．符合 Visual Basic 6.0 规范的表达式是     

A．a^2­b^2              B．a  2  ­b  2 

C．(a+b)(a­b)                    D．[a+b]*[a­b] 

56.（2015）35．表达式  ­14 Mod 5+23\4*2 的值是     

A．1        B．­1               C．2                  D．­2 

57.（2015）36．设 a$="abcdefghij"，则表达式 Left(a$, 3) & Right(a$, 3)的值是    

A．"abchij"        B．"hij"        C．"cde"         D．"hijabc" 

58. （2015）37．下列运算符中，运算级别最高的是    

A．关系运算符               B．布尔运算符 

C．算术运算符            D．字符串连接运算符 

59. （2015）38．在一个语句行内写多条语句时，各语句之间用    间隔。 

A．冒号          B．分号           C．顿号           D．逗号 

60. （2015）39．表达式 Int(­18.2) + Sgn(18.2)的值是    

A．­18            B．­19              C．­17            D．0

61. （2015）40．能够正确表示“X 是大于 10 且小于 20 的数”的表达式是    

A．20>X>10            B．10

C．X>10 And X<20  D．X>10 Or X<20 

62. （2015）41．设 a=10，b=20，执行语句 a=b 和 b=a 后，a 和 b 的值分别是    

A．10    10             B．20    20 

C．10    20             D．20    10 

63. （2015）42．表达式 IIf(10 > 20, 30, 40)的值是    

A．10       B．20            C．30               D．40 

64. （2015）43．表达式 Int(Rnd*50)的值的范围是    

A．[0，50]          B．[0，49]     C．[1，50]      D．[1，49] 

65. （2015）44．程序段：  a = 1 

b = 1 

s = a + b 

For i=3 to 10 

c = a + b 

If c Mod 2 =0 Then s = s + c 

a = b 

b = c 

Next i 

Print s 

的输出结果是    

A．46               B．55               C．99               D．143 

66. （2015）45．程序段：  a = 15 

b = 9 

While b < > 0 

c = a Mod b 

a = b 

b = c 

Wend 

Print a 

的输出结果是    

A．15               B．9                  C．3     D．24

67.（2016）34.关于Visual Basic注释语句正确的是______

         A.只有Rem语句             B.有两种形式:Rem和’(单撇号)

         C.只有’(单撇号)               D.只能用/*

68.（2016）35. 7/2的值是_____

         A.3                      B.3.5                  C. 2           D.1

69.（2016）36.表达式m=IIF(2>3,3,2)的值是______

         A.0                      B.1                      C.2            D.3

70.(2016) 37.以下Visual Basic程序段的输出结果是_______

         Dim c As Integer

         a=sqr(9):b=sqr(3):c=a

         print c

         A.-1                    B.0                      C.False     D.True

71.(2016) 38.函数Print UCase(“basic”)的值是______

         A.Basic              B.basic              C.BAsic     D.BASIC

72.(2016) 39.程序段:      Dim a, I as Integer

                                               A=array(2,3,4,5,6,7,8)

                                               For i=LBound(a) to UBound(a)

                                                        a(i)=a(i)*a(i)

                                               Next i

                                               Print a(i)

         的执行结果为_____

         A.64                   B.0                      C.不确定          D.下标越界

73.(2016) 40.程序段:     Private Sub Command1_Click()

                                               Dim i as Integer

                                               i=8

                                               Do Until i>10

                                                       i=i+2

                                                        print i;

                                               Loop

                    End Sub

         运行程序后,单击命令按钮,显示的结果为_______

         A.0   1                B.8  10            C.10   12                 D.12   14

74.(2016) 41.Print Mid(“abcdef”,3,2)语句的执行结果为______

         A.ab                   B.bc                    C.cd                             D.de

 

第三章 设计应用程序窗体

1.（2011）45．鼠标单击窗体的一个空白区或一个无效控件时，发生的窗体事件的事件名是

A．Click            B．DbClick                C．Load                     D．Unload

2.（2011）46．InputBox函数的语法格式

InputBox（prompt[,title][,default][,xpos][,ypos][,helpfile,context]）

用来指定显示在对话框标题栏中的字符串表达式的参数是

A．default                 B．helpfile                C．context                D．title

3.（2011）47．调用CommonDialog控件的    方法显示“打开”对话框。

A．ShowSave  B．ShowOpen C．ShowColor D．ShowHelp

4.（2012）45．改变窗体的    属性值，可以实现窗体标题的改变。

A．Width                                                        B．BackColor 

C．Height                                                       D．Caption

5.（2012）46．    不是键盘事件。

A．MouseUP                                                 B．KeyDown           

C．KeyUp                                                       D．KeyPress

6.（2012）47．利用MsgBox函数中的buttons参数只显示“确定”和“取消”按钮，buttons的取值是

A．0                            B．1                            C．2                            D．3

7.（2013）45．窗体的    属性用于设置窗体的标题。

A．FontName                                      B．BackColor 

C．Height                                                       D．Caption

8.（2013）47．buttons的取值是    时，MsgBox函数只显示“确定”按钮。

A．2                                                                 B．1                           

C．0                                                                 D．3

9.（2013）49．用鼠标单击标签控件时发生    事件。

A．MouseMove                                            B．Click                    

C．DblClick                                                    D．Change

10.（2014）48．    不是鼠标事件。

A．MouseUP            B．MousePress       C．MouseDown      D．MouseMove     

11.（2014）51．执行st = InputBox("请输入字符串", "字符串对话框", "字符串")语句时，用户输入了新的字符串，单击“确定”按钮，变量st的值是

A．"请输入字符串"                                   B．"字符串对话框"

C．"字符串"                                                 D．用户输入的新字符串

12.（2015） 46．改变窗体的    属性值，可以实现窗体标题的改变。 

A．Width        B．ForeColor    C．Height  D．Caption 

13. （2015）47．载入窗体时发生的事件是    

A．KeyUp       B．Unload 

C．Load          D．Click 

14. （2015）48．MsgBox 函数的返回值是    

A．用户单击的按钮所对应的值        B．对话框中的消息 

C．对话框中的按钮个数                           D．对话框中的提示信息 

15. （2015）49．执行 st$ = InputBox("aaaa", "bbbb", "cccc")语句时，用户单击“取消”按钮后， 变量 st$的值是    

A．"aaaa"      B．"bbbb" 

C．"cccc"       D．长度为零的字符串 

16.（2016）42.设有以下语句：S=InputBox(“录入参数”,”2”,”管理”),则运行程序时,当用户输入数值20,并按Enter键,则下列说法正确的是______

         A.信息提示区显示的是“管理”

         B．在InputBox对话框标题栏中显示的是“管理”

         C．“录入参数”是默认值

         D．变量S的值是字符串“20”

17.（2016）43.下列关于多文档界面程序的叙述中，错误的是______

         A.子窗体最小华图标显示在任务栏上

         B．子窗体最大化后，标题和MDI窗体标题合并

         C．可以根据需要指定启动窗体

         D．要让一个窗体成为MDI窗体的子窗体，需将MDIchild属性设置为True

18.（2016）44.在鼠标事件中，若button参数的值为2，则说明用户按下鼠标的____键。

         A．左按钮                B.右按钮

         C．中间按钮           D.左按钮和右按钮

 

第四章 用标准控件构建用户界面

1.（2011）48．为了使文本框控件具有水平滚动条和垂直滚动条，应把ScrollBars属性值设置为

A．0                            B．1                            C．2                            D．3

2.（2011）49．在文本框的KeyDown事件中，如果Shift被按下，则参数Shift的值是

A．1                            B．2                            C．4                            D．6

3.（2011）50．    用于显示项目列表，从其中可以选择一项或多项。

A．文本框控件       B．框架控件           C．列表框控件       D．菜单控件

4.（2012）48．标签控件中的    属性返回或设置一个值，该值指定标签控件的背景是否透

明。

A．BackColor                                       B．Font                     

C．ForeColor                                        D．BackStyle

5.（2012）49．标签控件中的DblClick事件，在    时发生。

A．移动鼠标                                                 B．用鼠标单击标签控件

C．用鼠标双击标签控件                         D．松开鼠标

6.（2013）48．标签控件中的    属性返回或设置控件中文本和图形的背景颜色。

A．Name                                                        B．Font                     

C．BackColor                                       D．BackStyle

7.（2013）50．    能够为其它控件提供可标识的分组，可以在功能上进一步分割窗体。

A．文本框控件                                            B．菜单控件          

C．框架控件                                                 D．单选按钮控件

8.（2013）52．列表框控件中被选中项的数量用    属性返回。

A．Style                                                          B．Sorted

C．Selected                                                   D．SelCount

9.（2014）49．标签控件的    属性用来设置控件中文本和图形的前景颜色。

A．BackColor  B．Font                      C．ForeColor  D．BackStyle

10.（2014）50．    控件将文本框控件和列表框控件的特性结合在一起，既可以在控件的文本框部分输入信息，也可以在控件的列表框部分进行选择。

A．复选框                B．菜单                     C．组合框                D．框架

11.（2015）50．    是对控件属性的错误说法。 

A．Enabled 属性返回或设置一个布尔值，决定控件是否响应用户生成事件 

B．Visible 属性返回或设置一个布尔值，决定控件是否可见 

C．BackColor属性返回或设置控件中文本和图形的背景颜色 

D．Name 属性返回或设置在控件中显示的文本 

12.（2016）45.不能选择复选框控件的方法是_____

         A.用鼠标左键选择复选框

         B．当复选框具有焦点时按下空格键

         C．把复选框的Value属性设置为True

         D.Enable属性设置为True

13．（2016）46.Split(“Zhengzhou and Beijing”,”AND”,,1)返回数组包含的元素值是___

         A.”Zhengzhou”                  B.” Zhengzhou and Beijing”

         C.”Beijing”                          D.”Zhengzhou”,”Beijing”

14.（2016）47.通过引发____事件，计时器控件可以有规律地每隔一段时间执行一次代码。

         A.Caption                   B.Enabled                  C.Timer             D.VScroll

15.（2016）48.支持时向列表框中添加项目的方法是_____

         A.Add                 B.AddItem                 C.Fill                            D.FillItem

 第五章 制作多媒体程序

1.（2011）51．在窗体或图像框中画圆的方法是

A．Line                      B．Circle          C．Scale                    D．PSet

2.（2011）52．在模块级别声明对DLL动态链接库的外部过程的引用，应使用    语句。

A．Call                       B．Dim                      C．ReDim                 D．Declare

3.（2012）51．“开始播放动画”是通过ShockWaveFlash控件的    方法实现的。

A．Rewind                                                     B．Stop                     

C．Back                                                          D．Play

4.（2012）52．若图形的填充效果为水平线，则Shape 控件的FillStyle属性值应设置为

A．0                                                                 B．1                           

C．2                                                                 D．3

5.（2013）51．若图形的填充效果为垂直线，则Shape控件的FillStyle属性值应设置为

A．0                                                                 B．1                           

C．2                                                                 D．3

6.（2014）52．ShockWaveFlash控件中    方法的作用是返回动画的第1帧。

A．Rewind                B．Stop                      C．Back                     D．Play

7.（2014）53．Line控件BorderStyle属性值为    时，表示设置对象的边框为点划线。

8.（2015）51．Shape 控件的 FillStyle 属性值为 3 时，所设置的填充效果是    

A．垂直线     B．水平线 

C．交叉线     D．对角交叉线 

9.（2016）49.在窗体或图像框中设置点颜色的方法_____

         A．Line             B.Circle             C.Scale              D.Pset

10.（2016）_____语句用于声明API函数。

         A．Dim             B.Call                 C.Declare                   D.ReDim