计算机二级《VB》基础练习题及答案1课件.docx
《计算机二级《VB》基础练习题及答案1课件.docx》由会员分享，可在线阅读，更多相关《计算机二级《VB》基础练习题及答案1课件.docx（8页珍藏版）》请在冰豆网上搜索。
计算机二级《VB》基础练习题及答案1课件
2016年计算机二级《VB》基础练习题及答案
（1）
1[单选题]编写如下程序：
程序运行后，单击命令按钮Commandl，输出结果为
A.1100B.0011C.0101D.1010
参考答案：
A
参考解析：
subl函数对全局数组arr元素赋初值，subl函数参数传递均为默认的引用传递。
因此执行完后n值被修改。
Commandl_Click（）事件中的For循环对air数组元素进行倒序输出。
选A.。
2[单选题]数据库设计中反映用户对数据要求的模式是（ ）。
A.内模式B.概念模式C.外模式D.设计模式
参考答案：
C
参考解析：
数据库系统的三级模式是餐念摸式、外模式和内模式。
概念模式是数据库系统中全局数据逻辑结构的描述，是全体用户公共数据视图。
外模式也称子模式或用户模式，它是用户的数据视图，给出了每个用户的局部囊据描述，所以选择C。
内模式又称物理模式，它给出了数据库暂理存储结构与物理存取方法。
3[单选题]有如下数据定义语句：
DimX，YAsInteger以上语句表明（ ）。
A.x、Y均是整型变量
B.x是整型变量，Y是变体类型变量
C.X是变体类型变量，Y是整型变量
D.x是整型变量，Y是字符型变量
参考答案：
C
参考解析：
用Dim可同时定义多个变量，但变量要l分别声明其数据类型，如果不声明数据类型，默认是Variant变I体型变量。
l本题中，变量x定义时没声明数据类型，所以为Variant型I变量，变量Y是整型变量。
故c选项正确。
4[单选题]现有如下语句：
X=IIf（a>50，Int（a\3），aMod2）当a=52时，X的值是（ ）。
A.0B.1C.17D.18
参考答案：
C
参考解析：
首先计算Int（a、3）即Int（52、3）=IInt（17）=17，52MOD2结果为0。
I再计算IIf（52>50，17，0），52>50结果为True，所以IIFl函数返回l7，则x值为l7，故选C。
5[单选题]在窗体上画一个水平滚动条，其属性值满足Min
A.增加一个SmallChange量
B.减少一个SmallChange量
C.增加一个LargeChange量
D.减少一个LargeChange量
参考答案：
A
参考解析：
当水平滚动条的属性值kiln本题单击的是滚动条右端的箭头，故Vlaue属性值应该是增加一个SmaUChange量。
故选A。
6[单选题]以下不能触发滚动条Change事件的操作是（ ）。
A.拖动滚动框
B.单击两端的滚动箭头
C.单击滚动框
D.单击滚动箭头与滚动框之间的滚动条
参考答案：
C
参考解析：
改变滚动框的位置后会簟发a—gei件，拖动滚动框、单击滚动箭头、单击滚动箭头与滚毳幄之间I滚动条都会改变滚动框的位置。
7[单选题]为了读取数据，需打开顺序文件”D：
\data5.txt”，以下正确的命令是
参考答案：
B
参考解析：
打开顺序文件的基本格式为：
Open“文件名称”ForModeAs#3c件号。
“文件名称”表示要打开的文件的路径。
Mode为打开模式：
OutPut用于输出;Append用于追加写入;Input用于读取。
文件号为打开文件时指定的句柄（即文件号）。
8[单选题]设有如下的程序段：
执行上面的程序段后，n的值为（ ）。
A.3B.21C.9D.14
参考答案：
D
参考解析：
程序是三层的For循环，内层的循环次数由外一层的循环变量的值决定。
因此程序执行过程如下：
i=1时，第二层循环执行1次，第三层循环执行3次，n=3
i=2时，第二层循环执行2次，第三层循环执行3次+2f次，n=3+3+2=8
i=3时，第二层循环执行3次，第三层循环执行3次+2次+1次，n=8+3+2+1=14
因此答案为D。
9[单选题]以下关于文件的叙述中，错误的是
A.顺序文件有多种打开文件的方式
B.读取顺序文件的记录时。
只能从头至尾逐记录进行
C.顺序文件中各记录的长度是固定的
D.随机文件一般占用空间比较小
参考答案：
C
参考解析：
顺序文件中各记录的长度不固定。
10[单选题]假定有以下程序段：
Fori=1T03
Forj=5T01Step一1
Printi*J
Nextj
Nexti
则语句Printi*J的执行次数是（ ）。
A.15B.16C.17D.18
参考答案：
A
参考解析：
外层For循环从1到3是3次，内层循环从5到1，是5次。
因此循环体执行的次数是3。
5=15次。
11[简答题]在考生文件夹下有一个工程文件sit3.vbp，窗体上已经有一个标签Labell，请添加一个单选按钮数组，名称为Op1，含三个单选按钮，它们的Index属性分别为0、1、2，标题依次为“飞机”、“火车”、“汽车”，再添加一个名称为Textl的文本框。
窗体文件中已经给出了Opl的Click事件过程，但不完整，要求去掉程序中的注释符，把程序中的?
改为正确的内容，使得在程序运行时单击“飞机”或“火车”单选按钮时，在Textl中显示“我坐飞机去”或“我坐火车去”，单击“汽车”单选按钮时，在Textl中显示“我开汽车去”，如图所示。
注意：
不能修改程序中的其他部分。
最后将修改后的文件按原文件名存盘。
参考解析：
【考点分析】本题考点有：
单选按钮数组的Name、Caption和Index属性，文本框的Name属性，SelectCase选择语句，“+”字符连接。
【解题思路】通过Name属性设置对象名称;通过Caption属性设置对象的标题;设置两个字符型变量a、b，a：
"我坐"，b="我开"，用于SelectCase选择语句的字符串连接;通过对单选按钮数组Index属性的查询，实现单击单选按钮完成字符串连接和文本框显示操作的功能。
【操作步骤】
步骤1：
打开本题工程文件，按照题目要求建立单选按钮数组，如图3.9所示。
步骤2：
按照题目要求建立其他控件并设置其属性，见表3.4。
步骤3：
打开代码编辑窗口，去掉程序中的注释符“´”，将问号改为正确的内容。
参考答案（横线部分是需考生填入的内容）
PrivateSubOp1_click（IndexAsInteger）
DimaAsString，bAsString，CAsString
a="我坐"
b="我开"
SelectCase____Index______
´通过Index值决定响应哪一个控件数组
CaSe O
Text1.Text=a+Me.Op1（O）.Caption+"去"
CaSe 1
Text1.Text=____a______+Me.Opl
（1）.Caption+"去"
´当Index值为1时，选择"我坐"
CaSe 2
Text1.Text=b+Me.Op1
（2）.Caption+"去"
EndSelect
EndSub
步骤4：
调试并运行程序，关闭程序后按题目要求存盘。
【易错提示】在窗体上复制一个控件时，如果需要创建控件数组，则在提示框中单击“是”即可，如果不需要，则直接单击“否”。
12[单选题]下面不是键盘事件的是（ ）。
A.KeyDownB.KeyUpC.KeyPressD.KeyCode
参考答案：
D
参考解析：
KeyCede是KeyD0Ⅷ、K叮t’髓事件f参数，不是键盘事件，它返回的是按键相应的^盥卫字符代碉故选项D错误。
13[单选题]假定有如下情况语句：
SelectCaseX
能表示fxf>5的Case子句是
A.CaseNot（-5To5）B.Case5To-5C.CaseIs<-5，Is>5D.CaseAbs（X）>5
参考答案：
C
参考解析：
在Select判断语句中，如果是判断区间变量值，可以用”表达式T0表达式”的形式;如果不是判断区间变量值，则关系运算表达式前面要加上Is。
|x|>5的VB表达式为X<-5OrX>5，故本题答案为选项C.。
14[单选题]三角形的构成条件是：
任意2边之和大于第3边。
设变量a.b、c是3条直线的长度，要求判断这3条直线能否构成一个三角形。
下面有3个程序段可以正确判断，另一个不能正确判断的是
参考答案：
B
参考解析：
三角形构成的条件必须满足任意2边之和大于第3边，即a，b，c任意两个的和必须大于第三个。
A.满足。
B.中的0r是或，条件不满足。
C.和D.可以通过判断，均能进行正确判断。
选B.。
15[单选题]在窗体上画一个文本框（名称为Textl）和一个标签（名称为IJabdl），程序运行后，在文本框中每输入一个字符.都会立即在标签中显示文本框中字符的个数。
以下可以实现上述操作的事件过程是（ ）。
A.PrivateSubTextl_Change（ ）
Labell.Caption=Str（Len（Textl.Text））EndSllb
B.PrivateSubTextl—Click（ ）
Labell.Caption=Str（Len（Textl.Text））EndSub
C.PrivateSubTextl_Change（ ）Labell.Caption=Textl.TextEndSub
D.PrivateSubI_abell_Change（ ）
Labell.Caption=Str（Len（Textl.Text））EndSub
参考答案：
A
参考解析：
根据题意可知，在文本框中输入字符这个动作使标签上显示的内容发生变化，说明是文本框触发了某事件，排除D选项;文本框中每输入一个字符，标签中立即就会发生变化，故是Change事件，排除B选项;标签中显示的是文本框中字符的个数，不是输入的内容，排除C选项。
故A选项正确。
16[单选题]下列循环中，可以正常结束的是
参考答案：
B
参考解析：
选项A中先执行一次循环体，i的值变成1，测试循环结束条件，i<1不成立，循环继续，i值总是增加，达不到循环结束条件，不能正常结束。
选项8先执行循环体，i值加1变成2，再测试循环结束条件i=10，继续循环，i值再加1，直到i变为10，循环结束。
选项C中i初值为10，先执行一次循环体，使i加1，然后判断继续循环的条件i>1是否成立，此后i值不会小于等于1，循环会一直继续下去，不会正常结束。
选项D中i初值为10，每次循环i值减2，因此它总是偶数，而循环结束的条件是i=1，不可能达到，循环会一直继续下去。
17[单选题]在设计阶段，假定在图片框Picturel中装入了一个图形，为了删除该图片框控件，应采用的正确操作是
参考答案：
A
参考解析：
删除图片框控件，先选择图片框，然后按Del键。
18[单选题]通用对话框Filter属性的作用是
A.设置对话框的标题
B.指定对话框所选择的文件名
C.指定对话框的打开方式
D.指定对话框中显示的文件类型
参考答案：
D
参考解析：
通用对话框（CommonDialog）提供诸如打开文件、保存文件、设置打印选项、选择颜色和字体、显示帮助等操作的一组标准对话框，该控件运行时不可见。
通用对话框的DialogTifle属性用于返回或设置该对话框标题栏上所显示的文本;Action属性用于设置被打开对话框的类型;当通用对话框显示为“打开”或“另存为”类型时，其FileName属性用于返回或设置所选文件的路径和文件名，Fiber（过滤器）属性用于指定在对话框的文件列表中显示文件的类型。
19[单选题]设在工程文件中有一个标准模块，其中定义了如下记录类型：
在窗体上画一个名为Commandl的命令按钮，要求当执行事件过程Commandl—Click时，在顺序文件Person.txt中写入一条记录。
下列能够完成该操作的事件过程是（ ）。
A.
B.
C.
D.
参考答案：
A
参考解析：
数据文件的写操作分为3步，即打开文件、写入文件和关闭文件。
首先，在顺序文件中打开文件写入数据的打开方式为：
Open文件名ForOutputAs#文件号。
因此8、c选项排除，只}看A、D选项。
写入顺序文件Prlm#语句格式为：
Print#文件号，变量名，’变量名…，Write语句的的格式与Print语句一样：
Write#文件号，变量名，变量名。
而记录类型变量不能整体引用，需要指明}记录变量中的成员名，格式为;记录变量名.成员名，Books类型变量B成员Name和TelNum赋值和引用应该是8.Name、B.TelNum，因此A选项正确。
20[简答题]在考生文件夹下有一个工程文件sjt3.vbp，含有两个窗体，名称分别为Forml、Form2。
其中FormlE有两个控件（图像框和计时器）和一个菜单项“操作”，含有三个子菜单（如图l所示）。
Form2匕有一个名称为Commandl、标题为“返回”的命令按钮（如图2所示）。
要求当单击“窗体2”菜单命令时，Forml隐藏，Form2导委。
.单考‘动画”菜单命令时，使小汽车开始移动，一旦移到窗口的右边界时自动跳到窗体的左边界重新开始移动。
单击“退出”菜单命令时，结束程序运行。
请去掉程序中的注释符，把程序中的?
改为正确的内容。
注意：
考生不得修改窗体文件中已经存在的程序。
最后程序按原文件名存盘。
参考解析：
在计时器的Timer事件过程中，通过设置标签的Left属性值在原有基础上加l00来实现自左向右移动的功能。
在“动画”菜单项的单击事件过程中应启动计时器，使小汽车开始移动，通过图像框的Left、Width属性和窗体的Width属性判断，小汽车是否移到窗口的右边界，如果是，则设置Pieturel的Left属性为0，自动跳到窗体的左边界重新移动。
在“窗体2”菜单项的单击事件过程中，通过窗体的Hide、Show方法，隐藏Forml，显示Form2。
在“退出”菜单项的单击事件过程中，通过End语句退出程序。
【操作步骤】
步骤l：
打开本题工程文件。
步骤2：
分析并编写程序代码。
程序提供代码
窗体l‘的代码
PrivateSubmnuOper_Cliek（IndexAsInteger）'SelectCase?
Casel
Form2.ShowForml.HideCase2
Timerl.Enabled=?
Case3EndEndSelectEndSub
PrivateSubTimerl_Timer（）
Pieturel.Left=Pieturel.Left+100
IfPicturel.Left+Pieturel.Width>=’Then
Pieturel.Left=?
EndIfEndSub
窗体2的代码
PrivateSubCommandl—Click（）Forml.Show
Fomn2.HideEndSub
程序结束参考答案第1个?
处填入：
Index
第2个?
处填入：
True第3个?
处填入：
Forml.Width
第4个?
处填人：
0
步骤3：
调试并运行程序，关闭程序后按题目要求存盘。
升级会员 