搜索
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的结点数为A）16B）10C）6D）4（4）在下列模式中，能够给出数据库物理存储结构与物理存取方法的是A）外模式B）内模式C）概念模式D）逻辑模式（5）在满足实体完整性约束的条件下A）一个关系中应该有一个或多个候选关键字B）一个关系中只能有一个候选关键字C）一个关系中必须有多个候选关键字D）一个关系中可以没有候选关键字（6）有三个关系R、S和T如下：RSTABCABCABCa12a12b21b21d21c31c31则由关系R和S得到关系T的操作是A）自然连接B）并C）交D）差（7）软件生命周期中的活动不包括A）市场调研B）需求分析C）软件测试D）软件维护（8）下面不属于需求分析阶段任务的是A）确定软件系统的功能需求B）确定软件系统的性能需求C）需求规格说明书评审D）制定软件集成测试计划（9）在黑盒测试方法中，设计测试用例的主要根据是A）程序内部逻辑B）程序外部功能C）程序数据结构D）程序流程图（10）在软件设计中不使用的工具是A）系统结构图B）PAD图C）数据流图（DFD图）D）程序流程图（11）以下合法的VB变量名是A）caseB）name10C）t-nameD）x*y（12）设x是小于10的非负数。对此叙述，以下正确的VB表达式是A）0≤x＜10B）0=x10C）x≥0Andx10D）x=0Orx=10（13以下关于窗体的叙述中，错误的是A）窗体的Name属性用于标识一个窗体B）运行程序时，改变窗体大小，能够触发窗体的Resize事件C）窗体的Enabled属性为False时，不能响应单击窗体的事件D）程序运行期间，可以改变Name属性值（14）下面定义窗体级变量a的语句中错误的是A）Dima%B）Privatea%C）PrivateaAsIntegerD）Statica%（15）表达式Int(Rnd(0)*50)所产生的随机数范围是A）(0,50)B）(1,50)C）(0,49)D）(1,49)（16）设x=5，执行语句Printx=x+10，窗体上显示的是A）15B）5C）TrueD）False（17）设有如下数组声明语句：Dimarr(-2To2,0To3)AsInteger该数组所包含的数组元素个数是A）20B）16C）15D）12（18）现有由多个单选按钮构成的控件数组，用于区别该控件数组中各控件的属性是A）NameB）IndexC）CaptionD）Value（19）设有分段函数：5x0y=x*20≤x≤5x*x+1x5以下表示上述分段函数的语句序列中错误的是A）SelectCasexB）Ifx0ThenCaseIs0y=5y=5ElseIfx=5ThenCaseIs=5,Is0y=2*xy=2*xElseCaseElsey=x*x+1y=x*x+1EndIfEndSelectC）y=IIf(x0,5,IIf(x=5,2*x,x*x+1))D）Ifx0Theny=5Ifx=5Andx=0Theny=2*xIfx5Theny=x*x+1（20）设程序中有如下语句：x=InputBox(输入,数据,100)Printx运行程序，执行上述语句，输入5并单击输入对话框上的“取消”按钮，则窗体上输出A）0B）5C）100D）空白（21）现有如下一段程序：OptionBase1PrivateSubCommand1_Click()Dimaa=Array(3,5,7,9)x=1Fori=4To1Step-1s=s+a(i)*xx=x*10NextPrintsEndSub执行程序，单击Command1命令按钮，执行上述事件过程，输出结果是A）9753B）3579C）35D）79（22）设有一个命令按钮Command1的事件过程以及一个函数过程，程序如下：OptionBase1PrivateSubCommand1_Click()StaticxAsIntegerx=f(x+5)ClsPrintxEndSubPrivateFunctionf(xAsInteger)AsIntegerf=x+xEndFunction连续单击命令按钮3次，第3次单击命令按钮后，窗体上显示的计算结果是A）10B）30C）60D）70（23）以下关于菜单设计的叙述中错误的是A）各菜单项可以构成控件数组B）每个菜单项可以看成是一个控件C）设计菜单时，菜单项的“有效”未选，即，表示该菜单项不显示D）菜单项只响应单击事件（24）以下关于多窗体的叙述中，正确的是A）任何时刻，只有一个当前窗体B）向一个工程添加多个窗体，存盘后生成一个窗体文件C）打开一个窗体时，其他窗体自动关闭D）只有第一个建立的窗体才是启动窗体（25）窗体上有一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，并有如下事件过程：PrivateSubCommand1_Click()CommonDialog1.DefaultExt=docCommonDialog1.FileName=VB.txtCommonDialog1.Filter=All(*.*)|*.*|Word|*.Doc|CommonDialog1.FilterIndex=1CommonDialog1.ShowSaveEndSub运行上述程序，如下叙述中正确的是A）打开的对话框中文件“保存类型”框中显示“All(*.*)”B）实现保存文件的操作，文件名是VB.txtC）DefaultExt属性FileName属性所指明的文件类型不一致，程序出错D）对话框的Filter属性没有指出txt类型，程序运行出错（26）设程序中有如下数组定义和过程调用语句：Dima(10)AsInteger......Callp(a)如下过程定义中，正确的是A）PrivateSubp(aAsInteger)B）PrivateSubp(a()AsInteger)C）PrivateSubp(a(10)AsInteger)D）PrivateSubp(a(n)AsInteger（27）若要获得组合框中输入的数据，可使用的属性是A）ListIndexB）CaptionC）TextD）List（28）在窗体上画两个名称分别为Text1、Text2的文本框，Text1的属性为“DataBase”，如图所示。现有如下事件过程：PrivateSubText1_Change()Text2.Text=Mid(Text1,1,5)EndSub运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是A）DataAB）DataBC）aDataD）aBase（29）有如下程序：OptionBase1PrivateSubCommand1_Click()Dimarr(10)arr=Array(10,35,28,90,54,68,72,90)ForEachaInarrIfa50ThenSum=Sum+aEndIfNextaEndSub运行上述程序时出现错误，错误之处是A）数组定义语句不对，应改为DimarrB）没有指明For循环的终值C）应在For语句之前增加Sum=0D）Nexta应改为Next（30）要求产生10个随机整数，存放在数组arr中。从键盘输入要删除的数组元素的下标，将该元素中的数据删除，后面元素中的数据依次前移，并显示删除后剩余的数据。现有如下程序：OptionBase1PrivateSubCommand1_Click()Dimarr(10)AsIntegerFori=1To10'循环1arr(i)=Int(Rnd*100)Printarr(i);NextPrintX=InputBox(输入1-10的一个整数：)Fori=X+1To10'循环2arr(i-1)=arr(i)NextFori=1To10'循环3Printarr(i);NextEndSub程序运行后发现显示的结果不正确。应该进行的修改是A）产生随机数时不使用Int函数B）循环2的初值应为i=xC）数组定义改为Dima(11)AsIntegerD）循环3的循环终值应改为9（31）使用驱动器列表框Drive1、目录列表框Dir1、文件列表框File1时，需要设置控件的同步，以下能够正确设置两个控件同步的命令是A）Dir1.Path=Drive1.PathB）File1.Path=Dir1.PathC）File1.Path=Drive1.PathD）Drive1.Drive=Dir1.Path（32）以下关于弹出式菜单的叙述中，错误的是A）一个窗体只能有一个弹出式菜单B）弹出式菜单在菜单编辑器中建立C）弹出式菜单的菜单名（主菜单项）的“可见”属性通常设置为FalseD）弹出式菜单通过窗体的PopupMenu方法显示（33）有如下程序：PrivateTypestuXAsStringYAsIntegerEndTypePrivateSubCommand1_Click()DimaAsstua.X=ABCDa.Y=12345PrintaEndSub程序运行时出现错误。错误的原因是A）Type定义语句没有放在标准模块中B）变量声明语句有错C）赋值语句不对D）输出语句Print不对（34）在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：图a图bPrivateSubText1_Change()CallShowText(Text1)EndSubPrivateSubText2_Change()CallShowText(Text2)EndSubPrivateSubShowText(TAsTextBox)Label1.Caption=文本框中的内容是：&T.TextEndSub关于上述程序，以下叙述中错误的是A）ShowText过程的参数类型可以是ControlB）ShowText过程的参数类型可以是VariantC）两个过程调用语句有错，应分别改为CallShowText(Text1.Text)、CallShowText(Text2.Text)D）ShowText过程中的T是控件变量（35）设有打开文件的语句如下：Opentext.datForRandomAs#1要求把变量a中的数据保存到该文件中，应该使用的语句是A）Input#1,aB）Write#1,aC）Put#1,,aD）Get#1,,a二、填空题(每空2分，共30分)请将每空的正确答案写在答题卡【l】至【15】序号的横线上，答在试卷上不得分。（1）在长度为n的顺序存储的线性表中删除一个元素，最坏情况下需要移动表中的元素个数为【1】。【解析】线性表采用顺序存储结构时，如果删除运行在线性表的末尾进行，即删除第n个元素，则不需要移动表中的元素（这是最好的情况）；如果要删除线性表中的第1个元素，则从第2个元素开始直到最后一个元素（第n个元素），一共n-1个元素，必须依次向前移动一个位置（这是最坏的情况）；一般情况下，要删除第i（1≤i≤n）个元素时，则要从第i+1个元素开始，直到第n个元素之间共n-i个元素依次向前移动一个位置；在平均情况下，要在线性表中删除一个元素，需要移动表中一半的元素。答案：n-1（2）设循环队列的存储空间为Q(1:30)，初