VB试题题库(带答案)

VB练习题

L下面哪一个叙述为正确的？D

(A)VB的编程非常简单，只要将窗体上的控件设置好，再将控件的属性按要求设置即可完成程序的编制。

(B)VB的特点中的可视化编程是指随时可使用打印预览看一下效果。

(C)VB的特点中的事件驱动机制是系统已经编制好的一些针对控件的程序，可以直接调用。

(D)VB系统提供了数据库管理功能。

2.下面哪一个叙述为错误的？D

(A)VB的编程非常简单，因为系统提供了很多编制好的控件，可直接放到界面上使用。

(B)VB是面向对象的程序设计，并且具有结构化的程序设计语言。

(C)VB的特点中的事件驱动机制是系统可以感知一些动作，当该动作产生时自动去执行对应的事件过程。

(D)VB系统没有提供数据库管理功能。

3.下面哪一个叙述为正确的？B

(A)VB源程序有工程文件、窗体文件、模块文件等，工程文件包含所有的文件，源程序备份只需要备份工程文件

即可。

(B)VB源程序有工程文件、窗体文件、模块文件等，工程文件包含所有的文件，源程序备份需要备份所有相关文

件。

(C)VB源程序有工程文件、窗体文件、模块文件等，源程序备份只需要备份窗体文件和模块文件即可。

(D)VB源程序如果有多个窗体文件，没有模块文件，源程序备份只需要备份窗体文件即可。

4.VB窗体设计器的主要功能是：A

(A)建立用户界面

(B)编写程序代码

(C)画出图形控件

(D)显示标准控件

5下面哪一个叙述为正确的？A

(A)在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序,只需要双击工程文件即可。

(B)在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序,只需要双击窗体文件即可。

(C)在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序,只需要双击模块文件即可:

(D)在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序,双击源程序中的任何文件都不能打开源

程序。

6.什么是对象？A

(A)对象是具有特殊属性和行为方式的实体。

(B)对象是控件的属性。

(C)对象是控件的方法。

(D)对象是控件的事件。

7.下面关于对象的属性设置，哪个说法是正确的？C

(A)对象的所有属性值都可以在属性窗口中修改。

(B)对象的所有属性值都不可以在属性窗口中修改。

(C)对象只有部分的属性值可以在属性窗口中修改。

(D)对象的属性值只能在程序代码中修改。

8.以下叙述中正确的是A

(A)窗体的Name属性指定窗体的名称，用来标识一个窗体。

(B)窗体的Name属性的值是显示在窗体标题栏中的文本

(C)Caption属性可以在运行期间改变Name属性值

(D)Name属性和Caption属性功能一样。

9.当程序运行出错时，系统报错信息显示"要求对象"，是下面哪种情况？C

(A)没有命令中用到的控件属性

(B)使用控件数组时下标超出范围

(C)没有命令中用到的对象

(D)没有命令中用到的控件方法

10.当需要将窗体上的控件一起移动时，需要同时选中要移动的控件，下面的方法哪种不能选中多个控件？I)

(A)用鼠标左键点击窗体空白处，不要松手，拖动，可选中区域内的多个控件。

(B)键盘按住Ctrl键，鼠标单击每个需要选中的控件。

(C)键盘按住Shift键，鼠标单击每个需要选中的控件。

(D)键盘按住Alt键，鼠标单击每个需要选中的控件。

答案：01—05DDBAA06—10ACACD

11.下面哪一个语句是正确的注释？A

(A)Printa'打印变量a

(B)"Printa”"打印变量a”

(C)Printa&&打印变量a

(D)PrintaRem打印变量a

12.下面哪一个语句是程序运行结束语句？D

(A)EndSub(B)Stop(C)ExitSub(D)End

13.一行命令可以分成多行写，在不是最后一行的行尾部需要加上“续行符"，下面哪个是续行符？A

(A)空格+下划线

(B)下划线

(C)空格+减号

(D)减号

14.一行可以写多条语句，在语句之间应该有分隔符，下面哪个是语句分隔符？A

(A)冒号(B)逗号(C)分号(D)圆点

15.关于VisualBasic程序的说法不正确的是D

(A)一行可以写多条语句，语句之间用"："隔开

(B)一条语句可以写在多行，用'‘空格"加作为续行标志

(C)程序中的大小写字母不区分

(D)变量在使用之前必须先定义(一般)

16.在VisualBasic中，窗体文件的扩展名为B

(A)工程.vbp(B)窗体.frm(C)类模块.cis(D)标准模块.bas

17.关于对象的属性不正确的是D

(A)对象的属性一般有属性名和属性值

(B)可以通过属性窗口设置属性的值

(O可通过程序代码设置属性值

(D)对象的所有属性值均可以在设计时设置

18.为了把焦点移到某个控件，所使用的方法是A

(A)SetFocus(B)Visible(C)Refresh(D)GotFocus

19.在设计时为了选中窗体上的某个控件，应执行的操作是B

(A)单击窗体(B)单击该控件(C)双击该控件(D)双击窗体

20.VB中每个语句的结束标志是D

(A)分号(B)句号(C)换行符(D)回车键

答案：11—15ADAAD16—20BDABD

21.VB中的注释语句是B

(A)执行语句(B)非执行语句(C)命令语句(D)结构化语句

22.VB中的语句通常按''一行一句”的规则书写，但也允许多个语句放在同一行中。在这种情况下，用来隔开各语句

的符号是A

(A)冒号(B)分号(C)逗号(D)感叹号

23.-•般，在用VB开发应用程序时，通常的步骤为B

(A)①设置可视界面②编写代码③程序测试、运行

(B)①建立可视界面②设置可视界面特性③编写事件驱动代码

(C)①编写事件驱动代码②程序测试③程序运行和维护

(D)其他步骤都不对

24.在VB中，装入应用程序，实际上就是装入C

(A)程序文件(B)标准模块文件(C)工程文件(D)类模块文件

25.将一个VB程序保存在磁盘上，至少会产生的文件是C

(A).doc、.txt(B).com、.exe(C).vbp>.frm(D).bat、.sys

26.一句语句要在下一行继续写，续行符是(下面字符前都有空格)C

(A)+(B)-(减号)(C)_(下划线)(D)……

27.下列叙述不正确的是：C

(A)注释语句是非执行语句

(B)注释语句可以作为代码中的-行

(C)注释语句不可以放在其它语句的后面

(D)(可以放在执行语句的后面，但必须是最后一个语句)加入注释语句可以提高程序的可读性

28.下面关于VB工具栏的说法不正确的是B

(A)工具栏可以浮动(B)工具栏•定在菜单栏的下方

(C)工具栏可以显示或隐藏(D)VB有多个工具栏

29.VB中的标准模块文件的扩展名是：C

(A).reg(B).frm(C).bas(D).vbp

30.VB中的工程文件的扩展名是：D

(A).reg(B).frm(C).bas(D).vbp

答案：21—25BABCC26—30CCBCD

31.刚建立个新的标准EXE工程后，不在工具箱中出现的控件是：C

(A)单选按钮

(B)图片框

(C)通用对话框

(D)属性窗口

32.在VB中可以改变控件大小的操作是：B

(A)Shift+Ctrl

(B)Shift+方向键

(C)Ctrl+空格健

(D)Ctrl+方向键

33.在VB中移动选定控件的操作是：D

(A)Shift+Ctrl

(B)Shift+方向键

(C)Ctrl+空格健

(D)Ctrl+方向键

34.下列()语句可以把窗体Forml加载到内存但不显示出来。C

(A)Forml.Show

(B)Forml.Hide

(C)LoadForml

(D)UnloadForml

35.程序运行后，在窗体Forml中单击，将触发的事件是：A

(A)FormClick0

(B)FormLoad()

(C)FormlClickO

(D)Forml_Load()

36.程序运行后，单击控件Commandl,将触发的事件是：C

(A)Command_Click()

(B)CommandDblClick()

(C)Commandl_Click()

(D)Commandl_DblClick()

37.新建一个窗体Forml后，立即在该窗体上双击，将出现下列哪个事件过程的代码框架？B

(A)Form_Click()

(B)FormLoad()

(C)Form1_Click

(D)Forml_Load()

38.•个对象可执行的动作被称为：B

(A)事件

(B)方法

(C)属性

(D)过程

39.由VB预先设置好的、能被对象识别的动作称为：B

(A)方法

(B)事件

(C)属性

(D)过程

40.为了同时改变•个活动控件的高度和宽度，正确的操作是：A

(A)拖动控件4个角上的某个小方块

(B)只能拖动位于控件右下角的小方块

(C)只能拖动位于控件左下角的小方块

(D)不能同时改变控件的高度和宽度

答案：31—35CBDCA36—40CBBBA

41.为了把窗体上的某个控件变为活动的，应执行的操作是：C

(A)单击窗体的边框

(B)双击该控件

(C)单击该控件

(D)双击窗体

42.在设计阶段，当双击窗体上的某个控件时，所打开的是：C

(A)工程资源管理器窗口

(B)工具箱窗口

(C)代码窗口

(D)属性窗口

43.下列不能打开属性窗口的操作是：D

(A)执行"视图"菜单中的"属性窗口''命令

(B)按F4键

(C)单击工具栏上的“属性窗口"按钮

(D)按Ctrl+T键

44.下列可以打开立即窗口的操作是：D

(A)Ctrl+D

(B)Ctrl+E

(C)Ctrl+F

(D)Ctrl+G

45.VB的特点不包括下面的：A

(A)不需编程

(B)面向对象的程序设计

(C)可视化程序设计

(D)事件驱动的程序设计

46.关于VB的启动窗体，下列说法正确的是：A

(A)可以改变

(B)不可以改变

(C)只能改变一次

(D)由系统资源情况决定

47.关于VB程序的说法不正确的是：B

(A)一行可以写多条语句，语句之间用"：”隔开

(B)一条语句可以写在多行上，用"空格"加"；"作为续行标志

(C)程序中的大小字母不区分

(D)变量在使用之前可以不定义类型

48.VB的条语句可以写在多行上，但要用续行符，续行符为：A

(A)一个空格加一个下划线(_)

(B)一个空格加一个单引号(’)

(C)直接回车

(D)一个空格加一个连字符(-)

49.VB一行可以写多条语句，语句之间用()隔开D

(A)逗号

(B)分号

(C)顿号

(D)冒号

50.窗体从加载到显示出来，下列哪个事件最先发生？A

(A)Load

(B)Resize

(C)Activate

(D)Paint

答案：41—45CCDDA46—50ABADA

51.下列哪个是结束程序的语句A

(A)End

(B)Stop

(C)Exit

(D)Pause

52.与Textl=""VB"等价的语句是：A

(A)"Textl.Text="VB"""

(B)"Textl.Name=""VB""

(C)“Textl.Caption=""VB"""

(D)"Textl.Value=""VB""

53.与Label1="姓名""等价的语句是：C

(A)“Labell.Text=""姓名"""

(B)"Labell.Name=""姓名""

(C)"Label1.Caption=""姓名""

(D)“Labell.Name=""姓名""

54.VB集成环境的主窗口中不包括：C

(A)标题栏

(B)菜单栏

(C)状态栏

(D)工具栏

55.VB6.0的三种版本不包括：D

(A)学习版

(B)企业版

(C)专业版

(D)个人版

56.下列说法错误的是：B

(A)有些语句可以在立即窗口执行

(B)所有语句都可以在立即窗口执行

(C)按Ctrl+G可以打开立即窗口

(D)Debug.Print将结果在立即窗口输出

57.”假定窗体的名称(Name属性)为Forml,则把窗体的标题设置为"Test"的语句为：B

(A)"Forml=""Test"""

(B)Caption=Test

(C)rorml.iext=Lest

(D)"Forml,Name=""Test"""

58.VB的注释语句是以()开始的？A

(A)Rem或'

(B)Rem或；

(C)Note或*

(D)Note或！

59.VB的注释语句可以用()作开始标记？A

(A)Rem

(B)Note

(C)&

(D)$

60.VB的注释语句可以用()作开始标记？C

(A);

(B):

(C)'

(D)

答案：51—55AACCD56—60BBAAC

61.下列不能打开代码窗口的操作是：

(A)双击窗体上的某个控件

(B)双击窗体

(C)按F7键

(D)单击窗体

62.VB应用程序通常由三类模块组成，不包括下列哪一个？

(A)窗体模块

(B)标准模块

(C)类模块

(D)控制模块

63.阅读下面程序，当单击鼠标右键，输出结果为：

PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfButton=2Then

PrintString(Button,

Endif

EndSub

(A)AA

(B)a

(C)没有输出

(D)A

64.阅读下面程序，当单击鼠标左键，输出结果为：

PrivateSubFormMouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfButton=2Then

PrintString(Button,"〃A")

Endif

EndSub

(A)AA

(B)a

(C)没有输出

(D)A

65.以下叙述错误的是：

(A)在KeyUp和KeyDown事件过程中，从键盘上按下A或a被视作相同的字母

(B)在KeyUp和KeyDown事件过程中，将键盘上的〃1〃和数字键盘上的〃1〃视作不同的数字

(C)KeyPress事件中不能识别键盘上的某个键的按下与释放

(D)KeyPress事件中能识别键盘上的某个键的按下与释放

66.阅读下面程序，当按下鼠标右键不放，输出结果为：

PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfButton=2Then

PrintString(Button,

Endif

EndSub

(A)AA

(B)a

(C)没有输出

(D)A

67.阅读下面程序，当单击鼠标右键放开，输出结果为：

PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfButton=2Then

PrintString(Button,〃"A"〃)

Endif

EndSub

(A)AA

(B)a

(C)没有输出

(D)A

68.阅读下面程序，当按下鼠标左键不放，输出结果为：

PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfButton=2Then

PrintString(Button,Z///AZ///)

Endif

EndSub

(A)AA

(B)a

(C)没有输出

(D)A

69.阅读下面程序，当单击鼠标左键放开，输出结果为：

PrivateSubFormMouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfButton=2Then

PrintString(Button,""A"")

Endif

EndSub

(A)AA

(B)a

(C)没有输出

(D)A

70.当鼠标单击左键时，在窗体上画一个圆，下面填空处应该是哪个内容？

PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

If______Then

Circle(x,y)

Endif

EndSub〃

(A)Button=0

(B)Button=l

(C)Button=2

(D)Button=4

答案：61—65DDACD66—70CACCB

71.当鼠标单击右键时，在窗体上画一个圆，下面填空处应该是哪个内容？

PrivateSubFormMouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfThen

Circle(x,y)

Endif

EndSub

(A)Button=0

(B)Button=l

(C)Button=2

(D)Button=4

72.当鼠标单击中间键时，在窗体上画一个圆，下面填空处应该是哪个内容？

PrivateSubFormMouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

If______Then

Circle(x,y)

Endif

EndSub

(A)1Button=O

(B)1Button=l

(C)1Button=2

(D)1Button=4

73.文本框中只允许输入数字，填空处应该是什么内容？

PrivateSubTextl_KeyPress(KeyAsciiAsInteger)

IfNot(KeyAscii>47AndKeyAscii<58)Then

EndIf

EndSub

(A)1KeyAscii0

(B)1KeyAscii1

(C)1KeyAscii2

1

(D)KeyAscii二3

74.文本框中只不允许输入数字，填空处应该是什么内容？

PrivateSubTextl_KeyPress(KeyAsciiAsInteger)

IfKeyAscii>47AndKeyAscii<58Then

EndIf

EndSub

(A)।KeyAscii=0

(B)1KeyAscii=50

(C)KeyAscii60

(D)KeyAscii=70

75.当鼠标按下Ctrl键并且单击左键时,在窗体上画一个圆，下面填空处应该是哪个内容？

PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

If__Then

Circle(x,y)

Endif

EndSub

(A)1Button」andshift=l

(B)1Button=landshift=2

(C)1Button=2andshift=l

(D)1Button=2andshift=2

76.当鼠标按下Ctrl键并且单击右键时,在窗体上画一个圆，下面填空处应该是哪个内容？

PrivateSubFormMouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfThen

Circle(x,y)

Endif

EndSub

(A)1Button=landshift=l

(B)1Button=landshift=2

(C)1Button=2andshift=l

(D)।Button=2andshift=2

77.当鼠标按下shift键并且单击左键时，在窗体上画一个圆，下面填空处应该是哪个内容？

PrivateSubFormMouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

IfThen

Circle(x,y)

Endif

EndSub

(A)Button=landshift=l

(B)Button=landshift=2

(C)Button=2andshift=l

(D)Button=2andshift=2

78.当鼠标按下shift键并且单击右键时，在窗体上画一个圆，下面填空处应该是哪个内容？

PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

If______Then

Circle(x,y)

Endif

EndSub

(A)Button=landshift=l

CTRL左键

(B)Button=landshift=2

SHITFT左键

(C)Button=2andshift=l

SHIFT右键

(D)Button=2andshift=2

CTRL右键

79.文本框中只允许输入数字，填空处应该是什么内容？

PrivateSubTextl_KeyPress(KeyAsciiAsInteger)

IfNot(KeyAscii>47AndKeyAscii<58)Then

EndIf

EndSub

(A)KeyAscii=0

(B)KeyAscii=48

(C)KeyAscii=49

(D)KeyAscii=50

80.在键盘的KeyPress事件中针对参数KeyAscii的描述下面哪个是正确的？

(A)返回键盘上输入的内容的Ascii值

(B)返回键盘上按下的键位值

(C)大键盘1和小键盘1返回不同的内容

(D)可以返回F1-F12的键位值

答案：71—75CDAAB76—80DACAA

81.在键盘的KeyDoro事件中针对参数KeyCode的描述下面哪个是错误的？

(A)返回键盘上输入的内容的Ascii值，大键盘1和小键盘1返回相同的值

(B)返回键盘上按下的键位值

(O大键盘1和小键盘1返回不同的内容

(D)可以返回F1-F12的键位值

82.在键盘的KeyUp事件中针对参数KeyCode的描述下面哪个是错误的？

(A)返回键盘上输入的内容的Ascii值，大键盘1和小键盘1返回相同的值

(B)返回键盘上按下的键位值

(C)大键盘1和小键盘1返回不同的内容

(D)可以返回F1-F12的键位值

83.在键盘的KeyUp事件中针对参数shift的描述下面哪个是正确的？

(A)表示键盘上的Shift键和Alt键和Ctrl键是否被同时按下

(B)表示键盘上的Shift键是否被同时按下

(C)表示键盘上的Shift键和Alt键和Ctrl键是否刚才被按下

(D)表示键盘上的Shift键是否刚才被按下

84.在键盘的KeyUp事件中，参数shift的值为1表示：

(A)shift被按下

(B)Ctrl被按下

(C)alt被按下

(D)alt+shift被按下

85.在键盘的KeyUp事件中，参数shift的值为2表示：

(A)shift被按下

(B)Ctrl被按下

(C)alt被按下

(D)alt+shift被按下

86.在键盘的KeyUp事件中，参数shift的值为4表示：

(A)shift被按下

(B)Ctrl被按下

(C)alt被按下

(D)alt+shift被按下

87.在键盘的KeyUp事件中，参数shift的值为7表示：

(A)shift+alt被按下

(B)ctrl+alt被按下

(C)shift+ctrl被按下

(D)alt+shift+ctrl被按下

88.在键盘的KeyUp事件中，参数shift的值为3表示：

(A)shift+alt被按下

(B)ctrl+alt被按下

(C)shift+ctrl被按下

(D)alt+shift+ctrl被按下

89.在键盘的KeyUp事件中，参数shift的值为5表示：

(A)shift+alt被按下

(B)ctrl+alt被按下

(C)shift+ctrl被按下

(D)alt+shift+ctrl被按下

90.在键盘的KeyUp事件中，参数shift的值为6表示：

(A)shift+alt被按下

(B)ctrl+alt被按下

(C)shift+ctrl被按下

(D)alt+shift+ctrl被按下

答案：81—85AAAAB86—90CDCAB

91.下面的赋值语句哪个是错误的？

(A)a=5*n

(B)val(a)=5*n

(C)a=val(Textl.Text)

(D)a=str(5*n)

92.整型数据的取值范围是下面哪个？

(A)0到32767

(B)0到32768

(C)-32768到32767

(D)0到65535

93.#2000-05-06#是什么类型的数据？

(A)整型

(B)字符串

(O日期型

(D)变体形

94.&H1234是什么类型的常量数据？

(A)不是常量

(B)16进制整型常量

(C)日期型常量

(D)小时常量

95.35!是什么类型的常量数据？

(A)不是常量

(B)整型常量

(C)长整型常量

(D)单精度浮点数常量

96.2.5D5是什么类型的常量数据？

(A)双精度浮点数常量

(B)整型常量

(C)长整型常量

(D)单精度浮点数常量

97.下面哪个内容不是常量？

(A)1

(B)True

(C)aaa

(D)year

98.下面的语句作用是什么？

ConstPassComputer=48

(A)给变量PassComputer赋值48。

(B)〃声明变量PassComputer,并且给它赋初值48。〃

(C)〃声明符号常量PassComputer,PassComputer代表48。〃

(D)〃声明符号常量PassComputer,48代表PassComputer常量占用的内存空间。

99.下面选项哪个不是常量？

(A)35

(B)〃〃〃35〃〃〃

(C)35%

(D)weekday

100.声明符号常量使用下面哪个关键字？

(A)Const

(B)Dim

(C)Private

(D)Static

答案：91—95BCCBD96—100ADCDA

101.针对下面的赋值语句，哪个叙述是正确的？

HA123=&HA456

(A)"=”左右两边的都是变量

(B)“=”左边的是变量，右边是常量

(O"=”左边的是常量，右边是变量

(D)”=”左右两边的都是常量

102.下面语句声明变量al的数据类型是什么？

Dimal,blAsInteger

(A)整型

(B)长整型

(C)短整型

(D)变体类型

103.下面语句声明变量al的数据类型是什么？

DimalAsBoolean

(A)整型

(B)布尔型

(C)字符型

(D)变体类型

104.下面语句声明变量al的数据类型是什么？

DimalAsVariant

(A)整型

(B)布尔型

(C)字符型

(D)变体类型

105.下面语句声明变量al的数据类型是什么？

Dimal@

(A)整型

(B)货币型

(C)字符型

(D)变体类型

106.下面语句声明变量al的数据类型是什么？

Dimal&

(A)长整型

(B)货币型

(C)字符型

(D)日期型

107.在按钮的单击事件中有下面一句命令，4次单击按钮后输出的值是下面哪一个种？

PrivateSubCommand1Click()

Dimm

m=m+2

Printm;

EndSub

(A)0246

(B)0000

(02222

(D)2468

108.在按钮的单击事件中有下面一句命令，4次单击按钮后输出的值是下面哪•个种？

PrivateSubCommand1Click()

Staticm

m=m+3

Printm;

EndSub

(A)0369

(B)0000

(03333

(D)36912

109.在按钮的单击事件中有下面一句命令，4次单击按钮后输出的值是下面哪•个种？

Dimm

PrivateSubCommandl_Click()

m=m+4

Printm;

EndSub

(A)04812

(B)0000

(04444

(D)481216

110.在按钮的单击事件中有下面•句命令，4次单击按钮后输出的值是下面哪一个种？

Privatem

PrivateSubCommandl_Click()

m=m+l

Printm;

EndSub

(A)0123

(B)0000

(C)1111

(D)1234

答案：101—105CDBDB106—110ACDDD

111.在按钮的单击事件中有下面一句命令，4次单击按钮后输出的值是下面哪一个种？

Dimm

PrivateSubCommand1_C1ick()

Dimm

m=m+l

Printm;

EndSub

(A)0123

(B)0000

(C)1111

(D)1234

112.下面哪个命令能够打印今天星期几？

(A)PrintWeekDay(Date)

(B)PrintWeekday(Now)

(C)PrintWeekday(Now)-l

(D)PrintWeekday(Now)+1

113.下面哪个命令能够打印现在几点几分几秒？

(A)Printtime

(B)Printtime(Now)

(C)Printdate(Now)

(D)Printhour(Now)

114.下面哪个表达式的结果是一个40到50之间的随机整数？

(A)Int(Rnd*40)

(B)Int(Rnd*50)

(C)Int(Rnd*10)+40

(D)Int(Rnd*40)+10

115.下面哪个表达式的结果是一个-40到40之间的随机整数？

(A)INT(Rnd*40)*(-l)

(B)Int(Rnd*40)

(C)Int(Rnd*80)-40

(D)Int(Rnd*80)

116.下面哪个表达式的结果是一个0到0.5之间的随机数？

(A)Rnd*0.5

(B)Rnd+0.5

(C)Rnd-1

(D)(Rnd+5)/10

117.变量al中存放的是实领工资金额数值，在标签框中输出工资，选项中哪句是正确的？

DimalAsSingle

al=1256.85

(A)/zLabel1.Caption””实发工资为""+al+""元""

(B)，zLabel1.Caption“”实发工资为“+Str(al)+“"元""

(C)/zLabel1.Caption"”实发工资为+left(al,4)+""元"""

(D)，zLabel1.Caption””实发工资为+Mid(al,4)+"元"""

118.变量al中存放的是学号(字符型)，在标签框中输出年级，选项中哪句是正确的？

DimalAsString

al="2001331001”

(A)"Label1.Caption="此学生为+str(al,4)+”"级学生。"""

(B)z，Labe11.Caption=""此学生为""+left(al,4)+”"级学生。

(C)"Labe11.Caption=""此学生为""+mid(al,4)+”"级学生。””

(D)"Labe11.Caption=""此学生为""+right(al,4)+”"级学生。””

119.测试用户输入在文本框的数据中有没有"Pass'"(不区分大小写)，如果有，给变量a赋值"Pass”所在位置,

否则，变量a赋值0。下面哪个语句正确？

(A)z，a=InStr(Textl.Text,“"Pass"",0)"

(B)"a=InStr(Textl.Text,""Pass"",1)"

(C)"Iffind(Textl.Text,“"Pass"")=Truethen

Else

a=0

EndIf”

(D)“Iffind(Textl.Text,“"Pass"")=Falsethen

a=n

Else

a=0

EndIf"

120.当变量运行了下面赋值语句，想打印出“2001级法学院学生”，应该选择选项的哪句命令运行？

a=""2001"b=""法学院""

(A)"PrintTrim(a)+”"级"+Trim(b)”

(B)"Printa+""级""+b"

(C)"PrintLtrim(a)+""级""+Ltrim(b)”

(D)"PrintRtrim(a)+""级""+Rtrim(b)”

答案：111—115CCACC116—120ABBBA

121.设a=""VisualBasic程序设计""，下面能使b的值为"Basic""的选项是哪个?

(A)〃b=left(a,8,5)〃

(B)〃b=Mid(a,8,5)〃

(C)“b=right(a,5,5)“

(。“b=instr(a,8,5)“

122.下面语句的执行完毕后，变量al的值是多少?

Al=103Mod50

(A)2

(B)3

(C)153

(D)53

123.下面语句的执行完毕后，变量al的值是多少?

Al=103\50

(A)2

(B)3

(C)153

(D)53

124.运行下面两条命令后，x的结果为：

x=#12/23/2001#

x=x+3

(A)不能加

(B)#12/23/2004#

(C)#12/26/2001#

(D)#03/26/2001#

125.运行下面两条命令后，x的结果为：

y=100

x=y\3

(A)33.33333

(B)33

(C)1

(D)0

126.运行下面两条命令后，x的结果为：

y=100

x=y>100

(A)真

(B)假

(C)100

(D)1

127.下列()是日期型常量。

(A)"""Iamastudent"""

(B)'山西太原’

(C)#02/25/2000#

(D)123#

128.下列()是字符型常量。

(A)"""Iamastudent"""

(B)‘山西太原’

(C)#02/25/2000#

(D)123#

129.下面符号常量的声明中不合法的是

(A)Consta=1.1

(B)Consta=12

(C)Consta=5*year(now)

(D)"Consta=""ok""

130.以下()是合法的VB变量名。

(A)_5a

(B)mab

(C)5name

(D)use&dasf

答案：121—125BBACB126—130BCACB

131.设a=3,b=5则以下表达式值为True的是

(A)a>=bAndb>10

(B)(a>b)Or(b>0)

(C)(a<0)Eqv(b>0)

(D)(-3+5>a)And(b>0)

132.下列程序的执行结果是

a=abed

b二〃〃123〃〃

Printa>b

(A)True

(B)1

(C)0

(D)Flash

133.在窗体上画一个命令按钮，其名称为Commands编写如下事件过程:

PrivateSubCommand1Click()

StaticaAsInteger

DimbAsInteger

a=a+1

b=b+1

Printa;b;

EndSub

程序运行时，单击命令按钮两次后，在窗体上显示的信息是：

(A)1121

(B)1111

(01122

(D)1212

134.命令按钮CommandL事件过程如下：

PrivateSubCommandl_Click()

DimxAsInteger

DimyAsInteger

x=4

y=5

Printx\y;xMody

EndSub

程序运行后，单击命令按钮Commands窗体显示结果是：

(A)04

(B)0.84

(C)01

(D)0.81

135.下列语句能声明全局变量的是：

(A)Private

(B)Dim

(C)Public

(D)Static

136.只删除字符串尾部空白的函数是：

(A)Trim

(B)Ltrim

(C)Rtrim

(D)Mid

137.在窗体上画一个命令按钮，其名称为Commands编写如下事件过程：

PrivateSubCommand1Click()

StaticxAsInteger

DimyAsInteger

x=x+100

y=y-200

Textl.Text=Str(x+y)

EndSub

程序运行时，单击命令按钮三次后，在文本框显示的信息是：

(A)-300

(B)300

(C)-100

(D)100

138.赋值语句的作用是

(A)赋值语句用于将表达式的值赋给变量

(B)赋值语句用于将表达式的值赋给属性

(O赋值语句用于将表达式的值赋给变量或属性

(D)赋值语句用于将变量或属性的值赋给一个表达式

139.长度为0的字符串称为

(A)零字符串

(B)特殊字符串

(C)空字符串

(D)无意义

140.〃〃abcl23〃〃&"123456〃〃的运算结果是

(A)123456

(B)abcl23123456

(C)〃〃〃abcl23123456〃〃〃

(D)〃〃〃123456abcl23〃〃〃

答案：131—135BAAAC136—140CDCCC

141.如果需要产生随机整数，可以通过把随机数乘以一个整数再加1求得，一般格式为

(A)Rnd*整数

(B)Rnd*整数+1

(C)Int(Rnd+整数)

(D)Int(Rnd*整数)+1

142.VB中赋值语句兼有的双重功能是

(A)计算与等于

(B)计算与比较

(C)计算与赋值

(D)比较与赋值

143.下面关于赋值语句的说明正确的是

(A)赋值语句中的关键字Let不能省略

(B)在赋值语句中，“=”与数学上的等号意义一样

(C)在赋值语句中，“目标操作符”和“源操作符”的数据类型不能相同

(D)用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象

144.下面属于字符型数据的是

(A)〃〃〃heHo〃〃〃

(B)hello'

(C)hello

(D)tfhello

145.字节类型是一种数值类型，其取值范围为

(A)0〜63

(B)0-127

(C)0-255

(D)1-256

146.下面正确的整型常量是

(A)&624

(B)0347

(C)&0127

(D)&0128

147.下列变量名正确的是

(A)Print

(B)Print_Num

(C)25

(D)2A

148.表达式int(105.678*100+0.5)/100的运算结果为

(A)105.678

(B)105.7

(C)105.68

(D)105

149.已知a=""abcdefghijk〃〃,则执行语句PrintMid$(a$,3,4)后的结果是

(A)abed

(B)bede

(C)bed

(D)cdef

150.把小写字母转换为大写字母的函数是

(A)Lcase$

(B)Ucase$

(C)Instr

(D)Len

答案：141—145DCDAC146—150CBCDB

151.“x是小于100的非负数”，用VB表达式表示正确的是

(A)OWxVIOO

(B)0<=x<100

(C)0<=xAndx<100

(D)OWxOrx<100

152.函数Int(Rnd(10)*10)产生的整数范围是

(A)(0,1)

(B)(1,10)

(C)(0,10)

(D)(1,9)

153.如果x是正实数，对x的第3位小数四舍五入的表达式是

(A)0.01*Int(x+0.005)

(B)0.01*Int(100*(x+0.005))

(C)0.01*Int(100*x+0.005)

(D)0.01*Int(x+0.05)

154.求25度的Sin值的VB表达式是

(A)Sin25

(B)Sin(25)

(C)Sin(25/180)

(D)Sin(25*3.14/180)

155.在窗体上画一个命令按钮，然后编写如下的事件过程：

PrivateSubCommandl_Click()

DimaasString,basstring

a=InputBox("""")

b=InputBox("""")

Printb+a

EndSub程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123,则输出结果是

(A)579

(B)123

(C)456

(D)123456

156.在窗体上画一个命令按钮，然后编写如下的事件过程：

PrivateSubCommand1Click()

DimaasString,basInteger

a=InputBox("""")

b=InputBox

Printb+a

EndSub程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123,则输出结果是

(A)579

(B)123

(C)456

(D)123456

157.设a=6,则执行x=iif(a〉5,-1,0)后,x的值为

(A)5

(B)6

(C)0

(D)-1

158.”12345""+""jsg"的结果是

(A)12345

(B)jsg

(C)12345jsg

(D)jsgl2345

159.PrintLen("BASIC程序设计”")的结果是

(A)13

(B)11

(C)5

(D)9

160.在窗体上画一个命令按钮，然后编写事件过程，运行程序，三次单击命令按钮后，最后一次的输出是

PrivateSubCommandl_Click()

DimbasInteger

b二b+1

printb

EndSub

(A)0

(B)1

(C)2

(D)3

答案：151—155CDBDD156—160ADCDB

161.下面合法的变量名为

(A)x_yz

(B)123abc

(C)integer

(D)x-y

162.下列合法的单精度型变量是

(A)num!

(B)sum%

(C)xinte$

(D)mm#

163.〃〃程序设计ABC〃〃为ANSI格式字符串，表达式Lenb(〃〃程序设计ABC〃〃)的值是

(A)7

(B)11

(C)14

(D)5

164.〃〃程序设计•ABC〃〃为UniCode格式字符串，表达式Len(〃〃程序设计ABC〃〃)的值是

(A)5

(B)6

(C)7

(D)11

165.赋值语句：a=123+Mid(〃〃123456〃〃,3,2)执行后，a变量中的值是

(A)〃〃〃1234〃〃〃

(B)123

(C)12334

(D)157

166.赋值语句：a=123&Mid(〃〃123456”〃，3,2)执行后,a变量中的值是

(A)〃〃〃12334〃〃〃

(B)123

(C)12334

(D)157

167.执行下面程序段后，将显示：

Dimx

ifxthenprintxelseprintx+1

(A)1

(B)0

(C)-1

(D)显示出错信息

168.\、/、mod、*这4个算术运算符中，优先级别最低的是()。

(A)\

(B)/

(C)mod

(D)*

169.\、/、mod、*这4个算术运算符中，优先级别最高的是()。

(A)\

(B)/

(C)mod

(D)*

170.Rnd函数的值不可能为()。

(A)9.15E-4

(B)1.0000

(C)0.98

(D)0.0005

答案：161—165AABCD166—170AACAB

Lint(198.555*100+0.5)/100的值为()。

(A)198

(B)199.6

(C)198.56

(D)200

2.已知A="12345678””,则表达式Vai(left(A,4)+mid(A,4,2))的值为()。

(A)123456

(B)123445

(C)8

(D)6

3.表达式Len("123程序设计ABC")的值为()。

(A)10

(B)14

(C)20

(D)17

4.表达式LenB("123程序设计ABC")的值为()。

(A)10

(B)14

(C)20

(D)17

5.求25度的正弦值的VB表达式为()。

(A)sin25

(B)sin(25)

(C)sin(25*3,14)

(D)SIN(25*3.14/180)

6.如果X是一个正实数，对X的第3位四舍五入的表达式是()。

(A)0.01*int(X+0.005)

(B)0.01*int(100*(X+0.005))

(C)0.01*int(100*X+0.005)

(D)0.01*int(x+0.005)

7.函数int(rnd*100)产生的整数范围是()。

(A)"(0,1)“

(B)〃(0,100)〃

(C)〃(1,100)〃

(D)〃(l,90)〃

8.函数Sgn(10)的结果为()o

(A)0

(B)-1

(C)1

(D)任意值

9函数Sgn(-1。的结果为()o

(A)0

(B)-1

(C)1

(D)任意值

0.函数Sgn(0)的结果为