计算机二级VB真考选择题题库6.docx
《计算机二级VB真考选择题题库6.docx》由会员分享，可在线阅读，更多相关《计算机二级VB真考选择题题库6.docx（18页珍藏版）》请在冰豆网上搜索。
计算机二级VB真考选择题题库6
2013计算机二级VB真考选择题题库（6）
1.下列关于栈叙述正确的是（ A ）。
A）栈顶元素最先能被删除
B）栈顶元素最后才能被删除
C）栈底元素永远不能被删除
D）栈底元素最先被删除
2.下列叙述中正确的是（ C ）。
A）在栈中，栈中元素随栈底指针与栈顶指针的变化而动态变化
B）在栈中，栈顶指针不变，栈中元素随栈底指针的变化而动态变化
C）在栈中，栈底指针不变，栈中元素随栈顶指针的变化而动态变化
D）以上说法都不正确
3.某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为（假设根结点在第1层）（ D ）。
A）3
B）4
C）6
D）7
4.软件按功能可以分为应用软件、系统软件和支撑软件（或工具软件）。
下面属于应用软件的是（ A ）。
A）学生成绩管理系统
B）C语言编译程序
C）UNIX操作系统
D）数据库管理系统
5.结构化程序所要求的基本结构不包括（ B ）。
A）顺序结构
B）GOTO跳转
C）选择（分支）结构
D）重复（循环）结构
6.下面描述中错误的是（ A ）。
A）系统总体结构图支持软件系统的详细设计
B）软件设计是将软件需求转换为软件表示的过程
C）数据结构与数据库设计是软件设计的任务之一
D）PAD图是软件详细设计的表示工具
7.负责数据库中查询操作的数据库语言是（ C）。
A）数据定义语言
B）数据管理语言
C）数据操纵语言
D）数据控制语言
8.一个教师可讲授多门课程，一门课程可由多个教师讲授。
则实体教师和课程间的联系是（ D ）。
A）1∶1联系
B）1∶m联系
C）m∶1联系
D）m∶n联系
9.有三个关系R、S和T如下：
则由关系R和S得到关系T的操作是（ D ）。
A）自然连接
B）并
C）交
D）差
10.定义无符号整数类为UInt，下面可以作为类UInt实例化值的是（ B ）。
A）－369
B）369
C）0.369
D）整数集合{1,2,3,4,5}
11.VB中有这样一类文件：
该文件不属于任何一个窗体，而且仅包含程序代码，这类文件的扩展名是（ B ）。
A）.vbp
B）.bas
C）.vbw
D）.frm
12.能够产生1到50之间（含1和50）随机整数的表达式是（ D ）。
A）Int（Rnd*51）
B）Int（Rnd（50）＋1）
C）Int（Rnd*50）
D）Int（Rnd*50＋1）
13.要求如果x被7除余2，则输出x的值，下列语句中不能实现此功能的语句是（ C ）。
A）Ifxmod7＝2ThenPrintx
B）Ifx－（x\7）*7＝2ThenPrintx
C）Ifx－（x/7）*7＝2ThenPrintx
D）Ifx－Int（x/7）*7＝2ThenPrintx
14.表达式Sgn（0.25）的值是（ C ）。
A）－1
B）0
C）1
D）0.5
15.如下关于变体类型变量的叙述中，错误的是（ A ）。
A）变体类型数组中只能存放同类型数据
B）使用Array初始化的数组变量，必须是Variant类型
C）没有声明而直接使用的变量其默认类型均是Variant
D）在同一程序中，变体类型的变量可以被多次赋以不同类型的数据
16.满足下列条件之一的年份是闰年：
1）年份能被4整除但不能被100整除
2）年份能被400整除
若y代表年份，下面判断闰年的正确表达式是（D ）。
A）yMod4AndyMod100OryMod400
B）yMod4＝0OryMod100<>0AndyMod400＝0
C）yMod100<>0And（yMod4＝0OryMod400＝0）
D）yMod4＝0AndyMod100<>0OryMod400＝0
17.以下关于键盘事件的叙述中，错误的是（ D）。
A）按下键盘按键既能触发KeyPress事件，也能触发KeyDown事件
B）KeyDown、KeyUp事件过程中，大、小写字母被视作相同的字符
C）KeyDown、KeyUp事件能够识别Shift、Alt、Ctrl等键
D）KeyCode是KeyPress事件的参数
18.以下关于窗体的叙述中错误的是（ A ）。
A）窗体的Hide方法将窗体隐藏并卸载
B）窗体的Show方法可以将窗体装入内存并显示该窗体
C）若工程中包含多个窗体，则可指定一个为启动窗体
D）窗体的Load事件在加载窗体时发生
19.如果在窗体模块中所有程序代码的前面有语句：
Dimx，则x是（D ）。
A）全局变量
B）局部变量
C）静态变量
D）窗体级变量
20.计算下面分段函数的正确语句是（ A ）。
A）y＝IIf（x>0，x＋1，IIf（x<0，x－1，0））
B）y＝IIf（x＝0，0，IIf（x>0，x－1，x＋1））
C）y＝IIf（x>0，x＋1，IIf（x<0，0，x－1））
D）y＝IIf（x＝0，0，x－1，x＋1）
21.以下关于事件、事件驱动的叙述中，错误的是（ C ）。
A）事件是可以由窗体或控件识别的操作
B）事件可以由用户的动作触发
C）一个操作动作只能触发一个事件
D）事件可以由系统的某个状态的变化而触发
22.要删除列表框中最后一个列表项，正确的语句是（ D ）。
A）List1.RemoveItemListCount
B）List1.RemoveItemList1.ListCount
C）List1.RemoveItemListCount－1
D）List1.RemoveItemList1.ListCount－1
23.在菜单编辑器中建立如下图所示的菜单，并为了每个菜单项编写了鼠标单击事件过程。
关于此菜单，以下叙述中错误的是（D ）。
A）针对此菜单进行操作，单击"斜体"菜单项时，将执行它的鼠标单击事件过程
B）针对此菜单进行操作，单击"下划线"菜单项时，"√"被去掉
C）针对此菜单进行操作，单击"退出"菜单项时，不能执行对应的单击事件过程
D）针对此菜单进行操作，单击"编辑"菜单项时，打开下拉菜单，但不执行相应的单击事件过程
24.以下关于通用对话框的叙述中，错误的是（ B ）。
A）在程序运行状态下，通用对话框控件是不显示的
B）通用对话框控件是VisualBasic的标准控件
C）设计时，通用对话框控件的大小是固定的，不能改变
D）在同一个程序中，一个通用对话框控件可以作为打开、保存等多种对话框
25.设工程中有Form1、Form2两个窗体，要求单击Form2上的Command1命令按钮，Form2就可以从屏幕上消失，下面的事件过程中不能实现此功能的是（ C）。
A）PrivateSubCommand1_Click（）
Form2.Hide
EndSub
B）PrivateSubCommand1_Click（）
UnloadMe
EndSub
C）PrivateSubCommand1_Click（）
Form2.Unload
EndSub
D）PrivateSubCommand1_Click（）
Me.Hide
EndSub
26.向文本框中输入字符时，下面能够被触发的事件是（ B ）。
A）GotFocus
B）KeyPress
C）Click
D）MouseDown
27.若要把窗体上命令按钮Command1的状态设置为不可用，应该执行的命令是（A ）。
A）Command1.Enabled＝False
B）Command1.Visible＝False
C）Command1.Cancel＝False
D）Command1.Default＝False
28.窗体上有一个名称为VScroll1的滚动条，当用鼠标拖动滚动条中的滚动块时，触发的事件是（ D ）。
A）Click
B）KeyDown
C）DragDrop
D）Scroll
29.关于KeyPress事件，以下叙述中正确的是（ C ）。
A）在控件数组的控件上按键盘键，不能触发KeyPress事件
B）按下键盘上任一个键时，都能触发KeyPress事件
C）按字母键时，拥有焦点的控件的KeyPress事件会被触发
D）窗体没有KeyPress事件
30.窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。
Timer1的事件过程如下：
PrivateSubTimer1_Timer（）
StaticflagAsInteger
Ifflag＝0Thenflag＝1
flag＝－flag
Ifflag＝1Then
Text1.ForeColor＝&HFF& '&HFF&为红色
Else
Text1.ForeColor＝&HC000& '&HC000&为绿色
EndIf
EndSub
以下叙述中正确的是（ C ）。
A）每次执行此事件过程时，flag的初始值均为0
B）flag的值只可能取0或1
C）程序执行后，文本框中的文字每5秒改变一次颜色
D）程序有逻辑错误，Else分支总也不能被执行
31.为计算1＋2＋22＋23＋24＋…＋210的值，并把结果显示在文本框Text1中，若编写如下事件过程：
PrivateSubCommand1Click（）
Dima&，s&，k&
s＝1
a＝2
Fork＝2To10
a＝a*2
s＝s＋a
Nextk
Text1.Text＝s
EndSub
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是（ D ）。
A）把s＝1改为s＝0
B）把Fork＝2To10改为Fork＝1To10
C）交换语句s＝s＋a和a＝a*2的顺序
D）把Fork＝2To10改为Fork＝1To10、交换语句s＝s＋a和a＝a*2的顺序
32.标准模块中有如下程序代码：
PublicxAsInteger，yAsInteger
Subvar_pub（）
x＝10∶y＝20
EndSub
在窗体上有1个命令按钮，并有如下事件过程：
PrivateSubCommand1_Click（）
DimxAsInteger
Callvar_pub
x＝x＋100
y＝y＋100
Printx；y
EndSub
运行程序后单击命令按钮，窗体上显示的是（ B ）。
A）100 100
B）100 120
C）110 100
D）110 120
33.设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：
Functionfun（aAsInteger，bAsInteger）
Whilea>b
a＝a－b
Wend
fun＝a
EndFunction
在调试时发现函数是错误的。
为使函数能产生正确的返回值，应做的修改是（ D ）。
A）把a＝a－b改为a＝b－a
B）把a＝a－b改为a＝a\b
C）把Whilea>b改为WhileaD）把Whilea>b改为Whilea>＝b
34.在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序：
DimssAsString
PrivateSubText1_KeyPress（KeyAsciiAsInteger）
IfChr（KeyAscii）<>""Thenss＝ss＋Chr（KeyAscii）
EndSub
PrivateSubCommand1_Click（）
DimmAsString，iAsInteger
Fori＝Len（ss）To1Step－1
m＝m＋Mid（ss，i,1）
Next
Text1.Text＝UCase（m）
EndSub
程序运行后，在文本框中输入"Number100"，并单击命令按钮，则文本框中显示的是（ D ）。
A）NUMBER100
B）REBMUN
C）REBMUN100
D）001REBMUN
35.窗体的左右两端各有1条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上（见图）；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。
要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。
为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：
PrivateSubTimer1_Timer（）
Fork＝Line1.X1ToLine2.X1Step100
IfShape1.Left＋Shape1.Width Shape1.Left＝Shape1.Left＋100
EndIf
Nextk
EndSub
运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。
为得到与题目要求相符的结果，下面修改方案中正确的是（ B ）。
A）把计时器的Interval属性设置为1
B）把Fork＝Line1.X1ToLine2.X1Step100和Nextk两行删除
C）把Fork＝Line1.X1ToLine2.X1Step100改为Fork＝Line2.X1ToLine1.X1Step100
D）把IfShape1.Left＋Shape1.Width
36.）窗体如图1所示。
要求程序运行时，在文本框Text1中输入一个姓氏，单击"删除"按钮（名称为Command1），则可删除列表框List1中所有该姓氏的项目。
若编写以下程序来实现此功能：
PrivateSubCommand1_Click（）
Dimn%，k%
n＝Len（Text1.Text）
Fork＝0ToListl.ListCount－1
IfLeft（List1.List（k），n）＝Text1.TextThen
List1.RemoveItemk
EndIf
Nextk
EndSub
在调试时发现，如输入"陈"，可以正确删除所有姓"陈"的项目，但输入"刘"，则只删除了"刘邦"、"刘备"2项，结果如图2所示。
这说明程序不能适应所有情况，需要修改。
正确的修改方案是把Fork＝0ToList1.ListCount－1改为（ A ）。
A）Fork＝List1.ListCount－1To0Step－1
B）Fork＝0ToList1.ListCount
C）Fork＝1ToList1.ListCount－1
D）Fork＝1ToList1.ListCount
37.窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序：
PrivateSubcommand1_Click（）
Dimn
IfText1.Text<>"123456"Then
n＝n＋1
Print"口令输入错误"&n&"次"
EndIf
EndSub
希望程序运行时得到左图所示的效果，即：
输入口令，单击"确认口令"命令按钮，若输入
的口令不是"123456"，则在窗体上显示输入错误口令的次数。
但上面的程序实际显示的是右图所示的效果，程序需要修改。
下面修改方案中正确的是（ D ）。
A）在Dimn语句的下面添加一句：
n＝0
B）把Print"口令输入错误"&n&"次"改为Print"口令输入错误"＋n＋"次"
C）把Print"口令输入错误"&n&"次"改为Print"口令输入错误"&Str（n）&"次"
D）把Dimn改为Staticn
38.下面程序计算并输出的是（ A ）。
PrivateSubCommand1_Click（）
a＝10
s＝0
Do
s＝s＋a*a*a
a＝a－1
LoopUntila<＝0
Prints
EndSub
A）13＋23＋33＋…＋103的值
B）10！
＋…＋3！
＋2！
＋1！
的值
C）（1＋2＋3＋…＋10）3的值
D）10个103的和
39.在设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框：
PrivateSubCommand1_Click（）
CD1.DialogTitle＝"打开文件"
CD1.InitDir＝"C：
"
CD1.Filter＝"所有文件|*.*|Word文档|*.doc|文本文件|*.txt"
CD1.FileName＝""
CD1.Action＝1
IfCD1.FileName＝""Then
Print"未打开文件"
Else
Print"要打开文件"&CD1.FileName
EndIf
EndSub
但实际显示的对话框中列出了C：
\下的所有文件和文件夹，"文件类型"一栏中显示的是"所有文件"。
下面的修改方案中正确的是（ C ）。
A）把CD1.Action＝1改为CD1.Action＝2
B）把"CD1.Filter＝"后面字符串中的"所有文件"改为"文本文件"
C）在语句CD1.Action＝1的前面添加：
CD1.FilterIndex＝3
D）把CD1.FileName＝""改为CD1.FileName＝"文本文件"
40.设工程中有2个窗体：
Form1、Form2，Form1为启动窗体。
Form2中有菜单，其结构如表。
要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键（回车键的ASCII码为13）后，隐藏Form1，显示Form2。
若口令为"Teacher"，所有菜单都可见；否则看不到"成绩录入"菜单项。
为此，某人在Form1窗体文件中编写如下程序：
PrivateSubText11_KeyPress（KeyAsciiAsInteger）
IfKeyAscii＝13Then
IfText1.Text＝"Teacher"Then
Form2.input.Visible＝True
Else
Form2.input.Visible＝False
EndIf
EndIf
Form1.Hide
Form2.Show
EndSub
程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。
下面修改方案中正确的是（ B ）。
A）把Form1中Text1文本框及相关程序放到Form2窗体中
B）把Form1.Hide、Form2.Show两行移到2个EndIf之间
C）把IfKeyAscii＝13Then改为IfKeyAscii＝"Teacher"Then
D）把2个Form2.input.Visible中的"Form2."删去
升级会员 