2012年3月计算机二级vb试题及答案

2012年3月全国计算机等级考试二级笔试试卷 VisualBasic语言程序设计 （考试时间90分钟，满分100分） 一、选择题（每小题2分，共70分） 下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂在答题卡相应位置上，答在试卷上不得分。 （1）下列叙述正确的是（）。 A)循环队列是队列的一种链式存储结构 B循环队列是队列的一种顺序存储结构 C循环队列是非线性结构 D循环队列是一种逻辑结构 （2）下列叙述正确的是（）。 A)栈是一种先进先出的线性表 B队列是一种后进后出的线性表 C栈和队列都是非线性结构 D以上三种说法都不对 （3）一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为（）。 A16 B10 C6 D4 （4）在下列模式中，能够给出数据库物理存储结构与物理存取方法的是（）。 A外模式 B内模式 C概念模式 D逻辑模式 （5）在满足实体完整性约束的条件下（）。 A一个关系中应该有一个或多个候选关键字 B一个关系中只能有一个候选关键字 C一个关系中不许有多个候选关键字 D一个关系中可以没有候选关键字 （6）有三个关系R、S和T如下：（）。 则由关系R和S得到关系T的操作时 A自然连接 B并 C交 D差 （7）软件生命周期中的活动不包括（）。 A市场调研 B需求分析 C软件测试 D软件维护 （8）下面不属于需求分析阶段任务的是（）。 A确定软件系统的功能需求 B确定软件系统的性能需求 C需求规格说明书评审 D制定软件集成测试计划 （9）在测试方法中，设计测试用例的主要根据是（）。 A程序内部逻辑 B程序外部功能 C程序数据结构 D程序流程图 （10）在软件设计中不使用的工具是（）。 A系统结构图 BPAD图 C数据流图（DFD图） D程序流程图 （11）以下合法的VB变量名是（）。 AcaseBname10Ct-nameDx*y （12）设x是小于10的非负数。对此陈述，以下正确的VB表达式是（）。 A0x10 B0=x=0andx=0orx=10 （13）以下关于窗体的叙述中错误的是（）。 A窗体的Name属性用于标识一个窗体 B运行程序时，改变窗体大小，能够触发窗体的Resize事件 C窗体的Enabled属性为False时，不能响应单击窗体的事件 D程序运行期间，可以改变Name属性值 （14）下面定义窗体级变量a的语句中错误的是（）。 ADima% Bprivatea% CPrivateaAsInteger DStatica% （15）表达式Int(Rnd(0)*50)所产生的随机数范围是（）。 A（0，50） B（1，50） C（0，49） D（1，49） （16）设x=5，执行语句Printx=x+10，窗体上显示的是（）。 A15B5CTrueDFalse （17）设有如下数组声明语句： Dimarr（-2to2,0to3）ASInteger 该数组所包含的数组元素个数是（）。 A20B16C15D12 （18）现有由多个单选按钮构成的控件数组，用于区别该控件数组中各控件的属性是（）。 AName BIndex CCaption DValue （19）设有分段函数： ASelect Case xCase Is0Y=5Case Is 0 Y=2*x Case elseEnd selectBIf x0 Theny=5Elseif x=5 theny=2*xElsey=x*x+1End ifCy=iifx0.5，iif(x=5.2*x，x*x+1) DIf x0 Then y=5If x=0 then y=2*xIf x5 then y=x*x+1（20）设程序中有如下语句： X=inputbox(“输入”,“数据”,100) PrintX 运行程序，执行上述语句，输入5并单击输入对话框上的“取消“按钮，则窗体上输出（）。 A0B5C100D空白 （21）现有如下一段程序： OptionBase1 PrivateSubCommand1_Click() Dima a=Array(3,5,7,9) x=1 Fori=4to1Step-1 S=s+a(i)*x x=x*10 Next Prints EndSub 执行程序，单击Command1命令按钮，执行上述事件过程，输出结果是（）。 A9753B3579C35D79 （22）设有一个命令按钮Commsand1的事件过程以及一个函数过程。程序如下： PrivateSubCommand1_Click(0 StaticxAsInteger x=f(x+5) Cls Printx EndSub PrivateFuntionf(xAsinteger)AsInteger F=x+x EndFuntion 连续单击命令按钮3次，第3次单击命令按钮后，窗体上显示的计算结果是（）。 A10B30C60D70 （23）以下关于菜单设计的叙述中错误的是（）。 A各菜单项可以构成控件数组 B每个菜单项可以看成是一个控件 C设计菜单是，菜单项的“有效”表选，即有效(E),表示该菜单项不显示 D菜单项只响应单击事件 （24）以下关于多窗体的叙述中，正确的是（）。 A任何时刻，只有一个当前窗体 B向一个工程添加多个窗体，存盘后生成一个窗体文件 C打开一个窗体时，其他窗体自动关闭 D只有第一个建立的窗体才是启动窗体 （25）窗体上有一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，并有如下事件过程： PrivateSubCommand1_Click() CommandDialog1.DefaultExt=”doc” CommandDialog1.FileName=”VB.txt” CommandDialog1.FileName=”All(*.*)|*.*|Word|*.Doc|” CommandDialog1.FileName=1 CommandDialog1.ShowSave EndSub 运行上述程序，如下叙述正确的是（）。 A打开的对话框中文件“保存类型”框中显示“All(*.*)” B实现保存文件的操作，文件名是VB.txt CDefaultExt属性与FileName属性所指明的文件类型不一致，程序出错 D对话框的Filter属性没有指出txt类型，程序运行出错 （26）设程序中有如下数组定义和过程调用语句： Dima(10)AsInteger Callp(a) 如下过程定义中，正确的是（）。 APrivateSubp(aAsInteger) BPrivateSubp(a()AsInteger) CPrivateSubp(a(10)AsInteger) DPrivateSubp(a(n)AsInteger) （27）若要获得组合框中输入的数据，可使用的属性是（）。 AListindex BCaption CText DList （28）在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”， 如图所示。 现有如下事件过程：PrivateSubText1_Change() Text2.Text=Mid(Text1,1,1) EndSub 运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（）。 ADataA BDataB CaData DaBase （29）有如下程序： OptionBase! PrivateSubCommand1_Click() Dimarr(10) arr=Array(10,35,28,90,54,68,72,90) ForEachaInarr Ifa50Then Sum=Sun+a EndIf Nexta EndSub 运行上述程序时出现错误，错误之处是（）。 A数组定义语句不对，应改为Dimarr B没有指明For循环的终值 C应在For语句之前增加Sum=0 DNexta应改为Next （30）要求产生10个随机整数，存放在数组arr中，从键盘输入要删除的数组元素的下标，将该元素中的数组删除，后面元素中的数据依次前移，并显示删除后剩余的数据，现有如下程序： OptionBase1 PrivateSubCommand1_Click() Dimarr(10)ASInteger Fori=1to10 arr(i)=int(Rnd*100) Printarr(i); Next x=inputbox(“输入1到10的一个整数：”) Fori=x+1to10循环2 arr(i-1)=arr(i) Next Fori=1to10循环3 Printarr(i); Next EndSub 程序运行后发现显示的结果不正确，应该进行的修改是（）。 A产生随机数时不使用Int函数 B循环2的初始值应为i=x C数组定义改为Dima(11)asinteger D循环3是循环终值应改为9 （31）使用驱动器列表框Drive1、目录列表框Fiel1时，需要设置控件的同步，以下能够正确设置两个同步的命令是（）。 ADir1.path=Drive.pate BFile1.path=Dir1.pate CFile1.path=Drive1.pate DDrive1.Drive=Dir1.pate （32）以下关于弹出式菜单的叙述中，错误的是（）。 A一个窗体只能有一个弹出式菜单 B弹出式菜单在菜单编辑器中建立 C弹出式菜单的菜单名（主菜单项）的“可见”属性通常设置为False D弹出式菜单通过窗体的PopupMenu方法显示 （33）有如下程序： PrivateTypestu XAsString YAsInteger EndType PrivateSubCommand1_Click() DimaAsstu a.x=”ABCD” a.y=12345 Printa EndSub 程序运行时出现错误，错误的原因是（）。 AType定义语句没有放在标准模块中 B变量声明语句有错 C赋值语句不对 D输出语句Print不对 （34）在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Lable1的标签。窗体外观如图a所示。要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能如下： PivateSubText1_Change() CallShowText(Text1) EndSub PrivateSubText2Change() CallShowText(Text2) EndSub privateSubshowText(TAsTextBox) Label1.Caption=”文本框中的内容是：”&T.Text EnbSub 关于上述程序，以下叙述中错误的是（）。 AShowText过程的参数类型可以是Control BShowText过程的参数类型可以是Variant C两个过程调用语句有错，应分别改为CallShowText（Text1.Text）、CallShowText（Text2.Text） DShowText过程中的T是控件变量 （35）设有打开文件的语句如下： Open“test.dat”ForRandomAs#1 要求把变量a中的数据保存到该文件中，应该使用的语句是（）。 AInpur#1，a BWrite#1.a CPut#1，.a DGet#1.a二、填空题（每空2分，共30分）请将每空的正确答案写在答题卡【1】【15】序号的横线上，答在试卷上不得分。（1） 在长度为n的顺序存储的线性表中删除一个元素，最坏情况下需要移动表中的元素个数为 （）。（2）设循环队列的存储空间为Q（1：30），初始状态为Front=rear=30.现经过一系列入队与退队运算后，front=16，rear=15，则循环队列中有（）个元素。（3）数据库管理系统提供的数据语言中，负责数据的增、删、改和查询的是（）。（4）在将E-R图转换到关系模式时，实体和联系都可以表示成（）。（5）常见的软件工程方法有结构化方法和面向对象方法，类、继承以及多态性等概念属于（）。（6）下面的事件过程执行时，可以把Text1文本框中的内容写到文件“file1.txt“中去。请填空。Pivate Sub Command1_Click()Open “file1.txt”For（6） As#1print （7） Text1.TextClose #1End Sub（7）设窗体上有一个名称为Lable1的标签。程序运行时，单击鼠标左键，再移动鼠标，鼠标的位置坐标会实时地显示在Lable1标签中：单击鼠标右键则停止实时显示，并将标签中内容清除。下面的程序可实现这一功能，请填空。Dim Down As BooleanPrivate Sub Form _MouseDown(Button As Integer，Shift As Integer，x As Single，Y As Single)Select Case （8） Case 1Down=TrueCase 2Down=FalseEnd SelectEnd SubPrivate Sub Form _MouseMove(Button As Integer，Shift As Integer，X As Single，Y As Single)If （9） （10） =”X=”& X &” Y=”& YElseLabel1.Caption=”End ifSub（8）窗体上有List1、List2两个列表框，程序运行时，在两个列表框中分别选中1个项目，如图a所示，单击名称为Command1的“交换”按钮，则把选中的项目互换，互换后的位置不限，如图b所示。下面的程序可实现这一功能，请填空。Private Sub Command1_Click()If List1