VB选择题设计题.docx

VB选择题设计题.docx

《VB选择题设计题.docx》由会员分享，可在线阅读，更多相关《VB选择题设计题.docx（19页珍藏版）》请在冰豆网上搜索。

VB选择题设计题

1、选择题（20题，共50分）

2、设计题（3题，满分30分）

3、编程题（2题，满分20分）

一、选择题（选择题知识点共20个，满分50分）

1．VB基本概念、功能、特点，控件类

[1-1]在以下叙述中错误的是（）。

A）窗体文件包含该窗体及其控件的属性

B）一个工程中可以含有多个标准模块文件

C）以.bas为扩展名的文件是标准模块文件

D）工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件

[1-2]在以下叙述中错误的是（）。

A）VB是可视化程序设计语言

B）VB是面向过程的程序设计语言

C）VB采用事件驱动编程机制

D）VB应用程序可以以编译方式执行

[1-3]下列关于事件的叙述，错误的是（）。

A）事件是系统预先为对象定义的能被对象识别的动作

B）事件可分为用户事件与系统事件两类

C）VB为每个对象设置好各种事件，并定义好事件过程的过程名

D）VB中每个对象的默认事件均为Click

2．常用数据类型、常量、变量

[2-1]VB中占用存储空间最小的数据类型（）。

A）ByteB）DateC）IntegerD）Boolean

[2-2]假定变量Logic类型是Boolean，下面（）赋值语句是正确的。

A）Logic='True'B）Logic=.True

C）Logic=TrueD）Logic=3-43以下合法的变量名是（）。

A）X（-1）B）A%CC）SIND）CO1

3．运算符、表达式运算

[3-1]下列表达式的值为真的是（）。

A）"1"+2="12"B）"1"&2="12"

C）"1"+"2"="3"D）"1"&"2"="3"

[3-2]下列运算结果中，值最小的是（）。

A）3\7B）3/7C）7mod3D）3mod7

[3-3]判断整型变量X是奇数的表达式是（）。

A）XMod2=1B）XMod2=0

C）Xmod2<>0D）XMod2<>1

4．常用内部函数

[4-1]表达式Len（Str（Val（"123.4"）））的值为（）。

A）4B）5C）6D）11

[4-2]假设A="HelloTom"，B="I'mKitty!

"，则下列表达式结果为"HelloKitty!

"的是（）。

A）Left（A,5）+Right（B,6）B）Mid（A+B,1,11）

C）Left（A,10）+Right（B,6）D）Mid（A,1,6）+Mid（B,5,6）

[4-3]执行以下程序段后，变量c$的值为（）。

a$="VisualBasicPrograming"

b$="Quick"

c$=b$&UCase（Mid$（a$,7,6））&Right$（a$,11）

A）"VisualBASICPrograming"B）"QuickBasicPrograming"

C）"QUICKBasicPrograming"D）"QuickBASICPrograming"

5．代码编写规则，Print方法、打印格式、Cls方法

[5-1]已知intA%=7，执行PrintintA=4+4,intA+1后在窗体上显示（）。

A）78B）89

C）False8D）报错，不打印结果

[5-2]已知a=Sqr（9），执行PrintFormat（a,"$$####.###"）后在窗体上显示（）。

A）$3.B）$$3.C）$3.000D）$$0009.000

[5-3]已知Picture1和Label1分别是图片框和标签的名称，下列语句不正确的是（）。

A）Print25B）Debug.print25

C）Label1.Print25D）Picture1.print25

6．输入框（InputBox）、消息对话框（MsgBox）

[6-1]下列语句正确的是（）。

A）MsgBoxVbOkOnly,"Error"B）MsgBox"Error",vbOKOnly

C）MsgBox（VbOkOnly,"Error"）D）MsgBox（"Error",vbOKOnly）

[6-2]执行X=Inputbox（"请输入半径","0","计算面积"）,在键盘上输入10后按回车,下列描述中正确的是（）。

A）0是缺省值B）变量X的值是0

C）变量X的值是"10“D）对话框标题是"计算面积"

[6-3]设文本框的内容为123。

下列语句组：

　Num1=Text1.Text

Num2=InputBox（"EntertheNumeric"）

Printnum1+num2

执行后在输入框中输入123，则输出结果是（）。

A）123B）246C）123123D）出错

7．窗体的常用属性、事件和方法

[7-1]在以下叙述中错误的是（）。

A）窗体的Load事件在加载窗体时发生

B）窗体的Height、Width属性用于设置窗体的大小

C）执行UnloadForm1语句后，窗体Form1消失，但仍在内存中

D）当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止

[7-2]窗体在整个存活期中会发生许多事件，这些事件发生的顺序（）。

A）Load,GotFocus,Initialize

B）Initialize,GotFocus,Load

C）GotFocus,Initialize,Load

D）Initialize,Load,GotFocus

[7-3]由用户触发的事件是（）。

A）InitializeB）LostFocus

C）DragDropD）MouseUp

8．文本控件的常用属性、事件和方法

[8-1]要使文本框能够使用滚动条卷动显示多行文字，则应进行如下

设置（）。

A）MultiLine属性设为True

B）ScrollBars属性设为2-Vertical

C）在文本框边框上添加一个VScrollBar控件

D）设置MultiLine为True且ScrollBars为2-Vertical

[8-2]要使文本框获得输入焦点，则应采用文本框控件的（）方法。

A）GotFocusB）GetFocusC）SetFocusD）TakeFocus

[8-3]修改文本框内容时触发的事件是（）。

A）ModifyB）ChangeC）AutoSizeD）Validate

9．图形控件的常用属性、事件和方法

[9-1]在以下的属性和方法中，可更改坐标系统单位的是（）。

A）StyleB）ScaleC）ScaleModeD）Scaletype

[9-2]当窗体的AutoRedraw属性采用默认值时，若窗体装入时要使用绘图方法绘制图形，则应将程序放在（）。

A）Paint事件B）Load事件

C）Initialize事件D）Click事件

[9-3]语句：

Circle（600,300）,200,,,2绘制的是（）。

A）圆形B）椭圆C）扇形D）圆弧

10．选择控件的常用属性、事件和方法

[10-1]正确设置复选框为选中状态的语句是（）。

A）Check1.Value=0B）Check1.Value=1

C）Check1.Value=2D）Check1.Value=True

[10-2]在窗体上画三个单选按钮，组成一个名称为chkOption的控件数组。

用于标识各个控件数组元素的参数是（）。

A）TagB）NameC）IndexD）Caption

[10-3]下面不具有DblClick事件的控件有（）。

A）框架B）文本框C）复选框D）单选按扭

11．命令按钮的常用属性、事件和方法

[11-1]为了在按下ESC键时执行某个命令按钮的单击事件过程，需要设置其（）属性为True。

A）EnterB）CancelC）DefaultD）Enabled

[11-2]若要将命令按钮的快捷键设为Alt+x,则其Caption属性值应包含（）。

A）&xB）x&C）#xD）x#

[11-3]命令按钮能响应的事件是（）。

A）LoadB）ScrollC）DragDropD）Dbclick

12．列表框及组合框的常用属性、事件和方法

[12-1]清除列表框中的所有内容应使用的方法是（）。

A）ClsB）ClearC）RemoveD）RemoveItem

[12-2]下列属性中表示列表框当前被选中的列表项内容的是（）。

A）TextB）ListC）IndexD）ListIndex

[12-3]组合框Combo1中有6个项目，以下能删除第一项的语句是（）。

A）Combo1.RemoveItem0

B）Combo1.RemoveItem"1"

C）Combo1.RemoveItem1

D）Combo1.RemoveItemCombo1.Listcount

13．框架、滚动条和计时器的常用属性、事件和方法

[13-1]可以用作其它控件容器的控件有（）。

A）窗体、列表框、图像框B）窗体、文本框，框架

C）窗体、框架、图片框D）窗体、标签、图片框

[13-2]在窗体上有一个文本框控件TxtTime；一个计时器控件Timer1，要求每秒钟在文本框中显示一次当前时间。

程序为：

PrivateSubTimer1______（）

TxtTime.text=Time

EndSub

在下划线上应填入的内容是（）。

A）VisibleB）TimerC）EnabledD）Interval

[13-3]在以下叙述中错误的是（）。

A）计数器的Interval属性以秒为单位

B）触发计数器Timer事件的时间间隔可人为设定

C）计数器的Enabled属性为False，会暂停计数器的操作

D）运行时计数器不可见，所以它放在窗体什么位置都可以

14.焦点和Tab键顺序，鼠标器和键盘的常用属性、事件和方法

[14-1]在以下叙述中正确的是（）。

A）不同控件的TabIndex属性可以相同

B）窗体、命令按钮、标签和文本框控件都有TabIndex

C）窗体上控件的TabIndex属性值必须小于其控件个数

D）同一个窗体不同控件的TabIndex属性值可以任意设置

[14-2]在以下叙述中错误的是（）。

A）只有获得焦点的对象才能够接受键盘事件

B）KeyPress事件中可以识别键盘上某个键的按下与释放

C）在KeyDown事件中，键盘上输入的A或a被视作相同的字母

D）在KeyUp事件中，键盘上的“1”和右侧小键盘上的“1”视作不同的数字

[14-3]在以下关于键盘事件的叙述中错误的是（）

A）将KeyPress事件的KeyAscii参数设置成0，可以取消本次击键

B）当KeyPreview属性为True时，窗体将先于其上的控件获得键盘事件

C）Shift参数传递了当前键盘上Ctrl、Alt和Shift三个控制键的按键状态

D）按下键盘上的任何一个键，都将依次触发KeyDown、KeyPress和KeyUp事件

[14-4]对窗体编写如下代码：

OptionBase1

PrivateSubForm_KeyPress（KeyAsciiASInteger）

a=Array（237,126,87,48,498）

m1=a

（1）:

m2=1

IfKeyAscii=13Then

Fori=2To5

Ifa（i）>m1Then

m1=a（i）:

m2=i

EndIf

Nexti

EndIf

Printm1:

Printm2

EndSub

程序运行后，按回车键，输出结果为（）。

A）48B）273C）498D）498

4154

[14-5]如下事件过程

PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）

IfShift=3AndButton=2Then

Print"VisualBasic"

EndIf

EndSub

运行时，如果要输出“VisualBasic”，应进行的操作是（）。

A）同时按下Shift键和鼠标左键

B）同时按下Shift键和鼠标右键

C）同时按下Ctrl、Alt键和鼠标左键

D）同时按下Shift、Ctrl键和鼠标右键

15．顺序/分支结构（程序阅读、选择填空）

[15-1]执行下列程序段。

s=Val（InputBox（"s=",,"6"））

SelectCases

CaseIs<6

f=s+1

CaseIs<5

f=s+2

CaseIs<4

f=s+3

CaseElse

f=s+4

EndSelect

Prints;f

运行后，直接按回车，窗体显示的结果是（）。

A）67B）68

C）69D）610

[15-2]下列程序段:

a=Val（InputBox（"请输入分数:

","计算你的等级",-1））

Ifa<0Ora>100Then

Print"输入错误"

ElseIfa<60Then

Print"不合格"

ElseIfa<80Then

Print"合格"

Else

Print"优秀"

EndIf

运行后，直接按回车，窗体显示的结果是（）。

A）优秀B）合格C）不合格D）输入错误

[15-3]下列程序段的执行结果是（）。

a=10:

b=30:

c=50

IfacThenb=c:

c=a

Ifb=cOra

Printa;b;c

A）503050B）103050

C）105050D）505010

16．循环结构程序（程序阅读、选择填空）

[16-1]下列程序段:

DimxAsInteger,nAsInteger

x=1

n=0

Do

x=x^2

x=x+1

n=n+1

LoopWhilex<10

Text1.Text=Str（x）

Text2.Text=Str（n）

运行后，在两个文本框中分别显示（）。

A）9和3B）26和3C）16和4D）27和4

[16-2]执行下列程序段后，窗体显示的内容（）。

x=0

Fori=1To3

Forj=1Toi

x=x+j

Nextj

Nexti

Printx

A）3B）6C）10D）18

[16-3]执行下列程序段后，窗体显示的内容为（）。

DimnAsInteger,mAsSingle

Forn=0To20Step2

IfnMod5=0Thenm=m+n

Nextn

Printm

A）21B）22C）30D）50

[16-4]执行下列程序段后，窗体显示的内容为（）。

DimaAsInteger,sAsInteger

a=8

s=1

Do

　s=s+a

　a=a－1

LoopWhilea<=0

Prints;a

A）370B）18C）97D）死循环

17．数组、控件数组

[17-1]执行下列程序段后，窗体显示的内容为（）。

Dima

Dims%,i%

a=Array（1,2,3,4,5）

Fori=1To3

s=s+a（i）^2

Nexti

Prints

A）6B）14C）29D）55

[17-2]执行下列程序段后，窗体显示的内容为（）。

Dimm（10）

Fori=0To10

m（i）=2*i

Nexti

Printm（m（5））

A）10B）20C）m（m（5））D）出错

[17-3]执行下列程序段后，窗体显示的内容为（）。

Dima

DimiAsInteger

a=Array（1,2,3,4,5,6,7,8,9）

Fori=0To5Step2

Printa（5-i）;

Next

A）531B）642C）54321D）654321

18．过程、自定义函数、变量的作用域、参数传递（程序阅读、选择填空）

[18-1]假定有如下的过程：

SubS（ByValxAsSingle,yAsSingle）

t=x

x=t/y

y=tMody

EndSub

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

PrivateSubCommand1_Click（）

DimmAsSingle

DimnAsSingle

m=3

n=2

Sm,n

Printm,n

EndSub

程序运行后，单击命令按钮，输出结果为（）。

A）1.51B）31

C）1.52D）32

[18-2]如下程序：

FunctionF（ByValxAsInteger）

Staticz

z=z+1:

F=x+z

EndFunction

PrivateSubForm_Click（）

Dima%,i%

a=2

Fori=1To3

PrintF（a）;

Nexti

Print

EndSub

运行后，单击窗体，输出结果为（）。

A）333B）345C）F

（2）F

（2）F

（2）D）空白

[18-3]如下程序：

PrivateSubForm_Click（）

DimaAsInteger,bAsInteger

a=8

b=3

CallTest（a,b）

Print"主程序:

";a,b

EndSub

SubTest（ByValxAsInteger,yAsInteger）

x=2

y=4

Print"子程序:

";x,y

EndSub

运行后，单击窗体，输出结果为（）。

A）子程序:

24

主程序：

83

B）主程序：

83

子程序：

2

C）子程序：

24

主程序：

84

D）主程序：

24

子程序：

24

19．菜单设计、工具栏设计、对话框设计、多重窗体设计、多文档界面设计

[19-1]在以下叙述中错误的是（）。

A）程序运行时，通用对话框控件是不可见的

B）调用通用对话框控件的ShowColor方法，可以打开颜色对话框

C）调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的文件

D）在同一个程序中，用不同的方法（如ShowOpen或ShowSave等）打开的通用对话框具有不同的作用

[19-2]在下列关于菜单叙述中,错误的是（）。

A）在程序运行过程中可以增加或减少菜单项

B）如果把一个菜单项的Enabled属性设置为False,则可删除该菜单项

C）弹出式菜单在菜单编辑器中设计

D）菜单项与其它控件一样有自己的属性和事件

[19-3]在以下叙述中错误的是（）。

A）一个工程只能以窗体作为启动对象

B）窗体模块间可利用Public型的模块级变量来相互传递数据

C）在一个窗体中要显示另外一个窗体，只要调用它的Show方法

D）模式窗体只有被关闭后才可以把焦点移到应用程序的其它部分继续操作

[19-4]在窗体上画一个通用对话框，若要求打开该对话框时，"文件类型"栏只显示扩展名为DOC的文件，则通用对话框的Filter属性应设置为（）。

A）"（*.doc）*.doc"B）"（*.doc）|（.doc）"

C）"（*.doc）||*.doc"D）"（*.doc）|*.doc“

[19-5]假定有一个菜单项，名为MenuItem，为了在运行时使该菜单失效（非激活）应使用的语句为（）。

A）MenuItem.Enabled=False

B）MenuItem.Enabled=True

C）MenuItem.Visible=True

D）MenuItem.Visible=False

20．文件的基本概念、分类，顺序文件、ASCII文件、随机文件的打开、关闭、读、写，文件系统控件（驱动器列表框、目录列表框、文件列表框）的常用属性和事件，文件系统对象模型FSO

[20-1]从随机文件中读出数据应该执行（）。

A）Write#文件号,表达式列表

B）Put#文件号,变量名

C）Input#文件号,表达式列表

D）Get#文件号,变量名

[20-2]以下叙述中错误的是（）。

A）随机文件每条记录的长度是固定的

B）Open语句的功能是打开一个已经存在的文件

C）执行Open"c:

\File.dat"ForOutputAs#1文件指针指向文件头

D）以下语句的条件表示当到达文件尾时结束循环

DoWhileNotEOF

（1）

<循环语句>

Loop

[20-3]目录列表框的Path属性的作用是（）。

A）显示当前驱动器或指定驱动器上的路径

B）显示当前驱动器或指定驱动器上的某目录下的文件名

C）显示根目录下的文件名

D）只显示当前路径下的文件

[20-4]为了使文件系统控件（DriveListBox,DirListBox和FileListBox）三者协调同步，可分别在驱动器列表框和目录列表框的（）事件中更新目录列表框和文件列表框的Path属性。

A）ClickB）Ch