全国计算机等级考试二级Visual Basic考前模拟一.doc

易博教育 全国计算机等级考试二级Visual Basic考前模拟（一）（90分钟100分）一、选择题在下列各题的A）、B）、C）、D）四个选项中，只有一个选项是正确的，请将正确的选项涂写在答题卡相应位置上，答在试卷上不得分。（1）程序流程图中带有箭头的线段表示的是 A)图元关系 B)数据流 C)控制流 D)调用关系 （2）结构化程序设计的基本原则不包括 A)多态性 B)自顶向下 C)模块化 D)逐步求精 （3）软件设计中模块划分应遵循的准则是 A)低内聚低耦合B)高内聚低耦合 C)低内聚高耦合D)高内聚高耦合 （4）在软件开发中,需求分析阶段产生的主要文档是 A)可行性分析报告B)软件需求规格说明书 C)概要设计说明书D)集成测试计划 （5）算法的有穷性是指 A)算法程序的运行时间是有限的 B)算法程序所处理的数据量是有限的 C)算法程序的长度是有限的 D)算法只能被有限的用户使用 （6）对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是 A)快速排序B)冒泡排序C)直接插入排序D)堆排序（7）下列关于栈的叙述正确的是 A)栈按先进先出组织数据 B)栈按先进后出组织数据 C)只能在栈底插入数据 D)不能删除数据（8）在数据库设计中,将ER图转换成关系数据模型的过程属于 A) 需求分析阶段 B) 概念设计阶段 C) 逻辑设计阶段 D) 物理设计阶段（9）有三个关系R、S和T如下: 由关系R和S通过运算得到关系T,则所使用的运算为 A) 并 B) 自然连接 C)笛卡尔积 D)交 （10）设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为 A)课号,成绩 B)学号,成绩 C)学号,课号 D)学号,姓名,成绩 （11）以下叙述中错误的是 A)标准模块文件的扩展名是.bas B)标准模块文件是纯代码文件 C)在标准模块中声明的全局变量可以在整个工程中使用 D)在标准模块中不能定义过程 （12）在Visual Basic中,表达式3*2 5Mod3A) 1B) 0 C) 3D) 出现错误提示 （13）以下选项中,不合法的Visual Basic的变量名是 A)a5b B)_xyzC)a_B D)andif（14）以下数组定义语句中,错误的是 A)Static a10)As IntegerB)Dim c(3,1 To 4) C)Dim d(-10)D)Dim b(0 To 5,1 To 3)As Integer （15）现有语句:y=IIf(x0,x Mod 3,0) 设x=10,则y的值是 A) 0 B) 1 C) 3D) 语句有错 （16）为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为 A) 0 B) 1 C) 2 D) 3 （17）文本框 Text1 的 KeyDown 事件过程如下: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) End Sub 其中参数KeyCode的值表示的是发生此事件时 A) 是否按下了Alt键或Ctrl键 B) 按下的是哪个数字键 C) 所按的键盘键的键码D) 按下的是哪个鼠标键 （18）窗体上有一个名称为HScroll1 的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是 A) Private Sub HScroll1_Change() Print HScroll1.Value End SubB) Private Sub HScroll1_Change() Print HScroll1.SmallChange End Sub C) Private Sub HScroll1_Scroll() Print HScroll1.Value End Sub D) Private Sub HScroll1_Scroll() Print HScroll1.SmallChange End Sub（19） 若已把一个命令按钮的 Default 属性设置为 True,则下面可导致按钮的Click事件过程被调用的操作是 A) 用鼠标右键单击此按钮 B) 按键盘上的Esc键 C) 按键盘上的回车键 D) 用鼠标右键双击此按钮（20）要使两个单选按钮属于同一个框架,正确的操作是 A) 先画一个框架,再在框架中画两个单选按钮 B) 先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中 C) 先画两个单选按钮,再画框架将单选按钮框起来 D) 以上三种方法都正确 （21）能够存放组合框的所有项目内容的属性是 A) Caption B) Text C) List D) Selected （22）设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是 A) Private Sub Timer1_Timer() Label1.Caption=True End Sub B) Private Sub Timer1_Timer() Label1.Caption=Timer$ End Sub C) Private Sub Timer1_Timer() Label1.Interval=1 End SubD)Private Sub Timer1_IntervalFor k=1 To Timer1.IntervalLabel1.Caption=TimerNext kEnd Sub（23）设有如图所示窗体和以下程序: Private Sub Command1_Click Text1.Text=Visual Basic End Sub Private Sub Text1_LostFocus() If Text1.TextBASICThen Text1.Text= Text1.SetFocus End If End Sub 程序运行时,在Text1文本框中输入Basic(如图所示),然后单击Command1 按钮,则产生的结果是 A) 文本框中无内容,焦点在文本框中 B) 文本框中为Basic,焦点在文本框中 C) 文本框中为Basic,焦点在按钮上 D) 文本框中为Visual Basic,焦点在按钮上 （24）窗体上有一个名称为Command1的命令按钮,其事件过程如下: Private Sub Command1_Click x=VisualBasicProgramming a=Right(x,11) b=Mid(x,7,5) c=MsgBox(a,b) End Sub 运行程序后单击命令按钮。以下叙述中错误的是 A) 信息框的标题是Basic B) 信息框中的提示信息是Programming C) c的值是函数的返回值 D) MsgBox的使用格式有错 （25）设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1 的命令按钮。 Form1 的代码如下: Public x As Integer Private Sub Form_Load x=1 y=5 End Sub Private Sub Command1_Click() Form2.Show End Sub Form2 的代码如下: Private Sub Command1_Click() Print Form1.x,y End Sub Module1 的代码如下: Public y As Integer 运行以上程序,单击Form1 的命令按钮Command1,则显示Form2;再单击Form2上的命令按钮Command1,则窗体上显示的是 A) 1 5 B) 0 5 C) 0 0 D) 程序有错 （26）窗体上有一个名称为Text1 的文本框,一个名称为Command1 的命令按钮。窗体文件的程序如下: Private Type x a As Integer b As Integer End Type Private Sub Command1_Click Dim y As x ya=lnputBox() If y.a2=y.a/2 Then y.b=y.a*y.a Else y.b=Fix(y.a/2) End If Text1.Text=y.b End Sub 对以上程序,下列叙述中错误的是 A) x是用户定义的类型 B) InputBox函数弹出的对话框中没有提示信息 C) 若输入的是偶数,y.b的值为该偶数的平方 D) Fix(y.a/2)把y.a/2的小数部分四舍五入,转换为整数返回 （27）窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1,其下标从左到右分别为0、1、2、3,窗体外观如图所示。 命令按钮的事件过程如下: Private Sub Command 1_click(Index As Integer) Select Case Index Case 0 CD1.Action=1 Case 1 CD1.ShowSave Case 2 CD1.Action=5 Case 3 End End Select End Sub 对上述程序,下列叙述中错误的是 A)单击打开按钮,显示打开文件的对话框 B)单击保存按钮,显示保存文件的对话框 C)单击打印按钮,能够设置打印选项,并执行打印操作 D)单击退出按钮,结束程序的运行（28）窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为计算的命令按钮Command1，并编写了以下程序：Private Sub Command1Click()Call calc(HV.Value，HT.Value)End SubPublic Sub calc(x As Integer,y As Integer)Text1.Text=x*yEnd Sub运行程序，单击计算按钮，可根据速度与时间计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是A)过程调用语句不对，应为calc(HV,HT)B)过程定义语句的形式参数不对，应为Sub calc(x As Control，y As Contro1)C)计算结果在文本框中显示出来D)程序不能正确运行（29）现有如下程序: Private Sub Command1_Click() s=0 For i=1 To 5 s=s+f(5+i) Next Print s End Sub Public Function f(x As Integer) If x=10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序,则窗体上显示的是 A)38 B)49 C)61 D)70 （30）窗体上有一个用菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。 以下叙述中错误的是 A)在设计粘贴菜单项时,在菜单编辑器窗口中设置了有效属性(有) B)菜单中的横线是在该菜单项的标题输入框中输入了一个-(减号)字符 C)在设计选中菜单项时,在菜单编辑器窗口中设置了复选属性(有) D)在设计该弹出菜单的主菜单项时,在菜单编辑器窗口中去掉了可见前面的 （31）窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件。如图所示。 现有如下程序: Public Sub display(x As Control) If TypeOf x Is Label Then x.Caption=计算机等级考试 Else x.Picture=LoadPicture(pic.jpg) End If End Sub Private Sub Label1 Click() Call display(Label1) End Sub Private Sub Picture1 Click() Call display(Picture1) End Sub 对以上程序,下列叙述中错误的是 A)程序运行时会出错 B)单击图片框,在图片框中显示一幅图片 C)过程中的x是控件变量 D)单击标签,在标签中显示一串文字 （32）窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1 KeyUp(KeyCode As Integer,Shift As Integer) Dim c As String c=UCase(Chr(KeyCode) Text2.Text=Chr(Asc(c)+2) End Sub 当向文本框Text1中输入小写字母a时,文本框Text2中显示的是 A)A B)a C)C D)c （33）设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程: Private Sub Command1_Click() Dim s As String,ch As String s= For k=1 To Len(Text1) ch=Mid(Text1,k,1) s=ch+s Next k Text1.Text=s End Sub 程序执行时,在文本框中输入Basic,然后单击命令按钮,则Text1中显示的是 A)Basic B)cisaB C)BASIC D)CISAB （34）某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command1_Click() Dim a(10)As Integer,max As Integer For k=1 To 10 a(k)=InputBox(输入一个整数) Next k max=0 For k=1 To 10 If a(k)max Then max=a(k) End If Next k Print max End Sub 运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是 A)把If a(k)max Then改为If a(k)max Then B)把max=a(k)改为a(k)=max C)把第2个循环语句For k=1 To 10改为For k=2 To 10 D)把max=0改为max=a(10) （35）已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下: Option Base 1 Private Sub Command1_Click() Dim sum As Integer sum=0 For i=1 To 4 For j=1 To 3 sum=sum+score(i,j) Next j Print 第&i&个学生的总分是:;sum Next i End Sub 运行此程序时发现,除第1个人的总分计算正确外,其他人的总分都是错误的,程序需要修改。以下修改方案中正确的是 A)把外层循环语句For i=1 To 4改为For i=1 To 3 内层循环语句For j=1 To 3改为For j=1 To 4 B)把sum=0移到For i=1 To 4和 Forj=1 To 3之间 C)把sum=sum+score(i,j)改为sum=sum+score(j,i) D)把sum=sum+ score(i,j)改为sum=score(i,j) 二、填空题请将每一个空的正确答案写在答题卡序号的横线上，答在试卷上不给分。（1）测试用例包括输入值集和 【1】 值集。（2）深度为5的满二叉树有 【2】 个叶子结点。（3）设某循环队列的容量为50,头指针front=5(指向队头元素的前一位置),尾指针rear=29(指向队尾元素),则该循环队列中共有 【3】 个元素。 （4）在关系数据库中,用来表示实体之间联系的是 【4】 。 （5）在数据库管理系统提供的数据定义语言、数据操纵语言和数据控制语言中, 【5】 负责数据的模式定义与数据的物理存取构建。（6）设有以下的循环: x=1 Do x=x+2 Print x Loop Until 【6】 要求程序运行时执行3次循环体,请填空。 （7）窗体上命令按钮Command 1的事件过程如下: Private Sub Command1_Click() Dim total As Integer total=s(1)+s(2) Print total End Sub Private Function s(m AS Integer)As Integer Static x As Integer For i=1 To m x=x+l Next i s=x End Function 运行程序,第3次单击命令按钮Command1时,输出结果为 【7】 。 （8）在窗体上画一个名称为Command 1的命令按钮。然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer For i=1 To 10 a(i)=i Next Call swap( 【8】 ) For i=1 To 10 Print a(i); Next End Sub Sub swap(b() As Integer) n=Ubound(b) For i=1 To n/2 t=b(i) b(i)=b(n) b(n)=t 【9】 Next End Sub 上述程序的功能是,通过调用过程swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,。请填空。 （9）在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click() CommonDialog1.Filter=All Files(*)|*|Text Files & (*txt)|*txt I Batch Files(*bat) |*bat CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后,单击命令按钮,将显示一个打开对话框,此时在文件类型框中显示的是 【10】 ;如果在对话框中选择d盘temp目录下的tel.txt文件,然后单击确定按钮,则在MsgBox信息框中显示的提示信息是 【11】 。 （10）以下程序的功能是:把顺序文件smtext1.txt的内容全部读入内存,并在文本框Text1中显示出来。请填空。 Private Sub Command1_Click() Dim inData As String Text1.Text= Opensmtext1.txt 【12】 As #2 Do While 【l3】 Input #2,inData Text1.Text=Text1.Text&inData Loop Close #2 End Sub （11）在用Open语句打开文件时,如果省略For方式,则打开的文件的存在方式是 【14】 。（12）在菜单中,唯一能够识别的事件是 【15】 。参考答案以及分析一、选择题(1)C解析: 程序流程是人们对解决问题的方法、思路或算法的一种描述。其中，图框表示各种操作的类型，图框中的文字和符号表示操作的内容，流程线表示操作的先后次序。带箭头的线段在数据流程图中表示数据流。带箭头的线段在程序流程图中的线段表示控制流。带箭头的线段在程序流程图中表示数据流。题中给出的选项中，在图元之间用带有表示调用关系。在模块之间用带有箭头的线段表示调用关系。构成程序流程图的基本图符及含义：或表示控制流；表示加工步骤；表示逻辑条件。(2)A解析: 结构化程序设计的原则包括：自顶而下，逐步求精的设计思想，独立功能，单出、入口的模块化设计等。多态性是面向对象程语言的特征。(3)B解析: 模块划分应遵循的准则包括模块之间的耦合和内聚。一般来说，要求模块之间的耦合尽可能地低，即模块尽可能独立；要求模块的内聚程度尽可能地高，即高内聚、低耦合的原则(4)B解析: 需求分析阶段的工作主要包括需求获取、需求分析、编写需求规格说明和需求评审四方面。产生的主要文档为软件需求规格说明书，可以为用户、分析人员和设计人员之间的交流提供方便，可以直接支持目标软件系统的确认，又可以作为控制软件开发进程的依据。(5)A解析:算法具有6个特性：有穷性：一个算法必须总是（对任何合法的输入值）在执行有穷步之后结束，且每一步都可有限时间内完成，即运行时间是有限的。确定性：算法中每一条指令必须有确切的含义，读者理解时不会产生二义性。可行性：一个算法是可行的，即算法中描述的操作都是可以通过已经实现的基本运算执行有限次来实现。输入：一个算法有零个或多个输入，这些输入取自于某个物定的对象的集合。输出：一个算法有一个或多个输出。(6)D解析:在最坏的情况下，快速排序、冒泡排序和直接插入排序需要的比较次数都是n（n-1）/2，堆排序需要比较的次数为Nlog2n。(7)B解析: 在栈中，允许插入与删除的一端称为栈顶，而不允许插入与删除的一端称为栈底。栈顶元素总是最后被插入的元素，从而也是最先被删除的元；栈底元素总是最先被插入的元素，从而也是最后才能被删除的元素。即栈是按照先进后出或后进先出的原则组织数据的。(8)C解析:数据库的逻辑设计为：将概念模型转换成一般的数据模型。将一般的数据模型转换为特定的数据库管理系统所支持的数据模型。把概念模型转换成关系数据模型就是把E-R图转换成一组关系模式。(9)D解析: 在关系运算中，交的定义如下：设R1和R2为参加运算的两个关系，它们具有相同的度n，且相应的属性值取自同一个域，则R1R2为交运算，结果仍为度等于n的关系，其中，交运算的结果既属于R1又属于R2。(10)C解析: 选课SC表是学生S表和课程C表的映射表，主键是两个主键的组合。(11)D解析: 标准模块(文件扩展名为 .BAS)是应用程序内其他模块访问的过程和声明的容器。它们可以包含变量、常数、类型、外部过程和全局过程的全局(在整个应用程序范围内有效的)声明或模块级声明。写入标准模块的代码不必绑在特定的应用程序上。如果用名称引用窗体和控件,则在许多不同的应用程序中可以重用标准模块。(12)A解析: 3*25mod3=65mod3=1mod3=1。(13)B解析: 变量的命名规则: 必须以字母开头,由字母、汉字、数字或下划线组成。 不能在变量名中出现句点.、空格或者嵌入字符:!、#、$、%、&。 长度不得超过255个字符。 (14)C解析: 一维数组的形式:Dim 数组名(to)As 或Dim 数组名(to)。和不能使用变量,必须是常量,常量可以是直接常量、符号常量,一般是整型常量。二维数组的声明:Dim 数组名( to , to ) As 。其中的参数与一维数组完全相同(圆括号内为必要参数)。 (15)B解析: 语法:IIf(Expression, Truepart, Falsepart) 格式:变量=IIf(条件,true部分,False部分)。IIf 函数的语法含有下面这些命名参数:Expression 必要参数。用来判断真伪的表达式。Truepart 必要参数。如果 Expression 为 True,则返回这部分的值或表达式。Falsepart 必要参数。如果 Expression 为 False,则返回这部分的值或表达式。 (16)D解析: MultiLine属性:设置是否允许存放多行文本。若该属性设置为True,则文本框具有自动换行功能,可输入或显示多行文本。否则,文本框只能输入或显示单行正文,不能自动换行。系统默认值为False,只允许存放一行文本。 ScrollBars属性:设置文本框内是否有滚动条。其中: 0无滚动条(默认值); 1只有水平滚动条; 2只有垂直滚动条; 3有水平和垂直滚动条。 (17)C解析: KeyDown事件:按下键盘上任意键时触发该事件。参数KeyCode是按键实际的ASCII码。该码以键为准,而不是以字符为准。也就是说,大写字母与小写字母使用同一个键,它们的KeyCode值相同。 (18)A解析: 滚动条内的值发生改变时触发产生Change事件。Scroll事件在滚动条内拖动滚动框时,触发产生Scroll事件。Value属性表示当前滚动条所代表的值,范围在Max与Min之间。SmallChange属性表示当用户单击滚动条两端的箭头时,Value属性值的增加或减小的量,默认值为1。 (19)C解析: Default属性指定命令按钮为窗体内的默认按钮。其默认值为False。当Default属性为True时,即使焦点不在命令按钮上,按回车键也可触发其Click事件。 (20)A解析: 框架(Frame)控件同窗体一样,可用作其他控件的容器。在容器中的控件不仅可以随着载体同时移动,而且控件的位置属性也是相对容器的位置设置的。 (21)C解析: List 属性:设置或返回组合框中的项目内容,字符串数组。 (22)B解析: 在Timer事件过程中编写需要定时进行处理的代码,可以周期性地激活Timer事件。在程序代码中,计时器Interval=1000,设置间隔为1秒。每隔一秒钟自动地调用一次Timer事件过程。利用Time函数获取系统日期。显示在label控件上。 (23)A解析: 当对象得到或失去焦点时,触发GotFocus事件或LostFocus事件。当点击Command1按钮时,触发Text1控件的LostFocus时间,程序调用Text_LostFocus过程一，使得Text控件清空和获得焦点。(24)D解析: Msgbox函数:语法为变量% = MsgBox(提示,按钮+图标+缺省按钮+模式,标题)。 Right(string, length)函数:string,必要参数。字符串表达式,从中最右边的字符将被返回。如果 string 包含 Null,将返回 Null。Length,必要参数。为 Variant(Long),为数值表达式,指出想返回多少字符。如果为 0,返回零长度字符串()。如果大于或等于 string的字符数,则返回整个字符串。 Mid(string, start, length)函数:string,必要参数。字符串表达式,从中返回字符。如果 string 包含 Null,将返回 Null。Start,必要参数。string 中被取出部分的字符位置。如果 start 超过 string 的字符数,Mid 返回零长度字符串()。Length,可选参数;为 Variant(Long)。要返回的字符数。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到尾端的所有字符。 (25)A解析: x和y都是全局变量,y定义在model1模块中。Form1的Load的事件将x和y都赋值了,这时x=1,y=5,Form2可以直接访问这两个变量。(26)D解析: Fix 函数删除参数的小数部份而返回剩下的整数。(27)C解析: CommonDialog.Action属性表示意义: CommonDialog.Action = 5 打印机属性 CommonDialog.Action = 1 打开文件 CommonDialog.Action = 2 保存文件 CommonDialog.Action = 3 颜色设置 CommonDialog.Action = 4 字体设置 C选项中,执行打印操作错误。 (28)D解析: Value属性表示当前滚动条所代表的值,范围在Max与Min之间。 (29)B解析: Public|PrivateStaticFunction 函数名()As 函数名=返回值 Exit Function 函数名=返回值 End Function 代码中通过Command1的Click事件,调用过程函数f(x),得出结果为B。 (30)A解析: 与下拉菜单不同,弹出式菜单不需要在窗口顶部下拉打开,而是通过单击鼠标右键在窗体的任意位置打开,因而使用方便,具有较大的灵活性。在设置不可用的菜单项时,应在菜单编辑器窗口中去掉了有效设置前面的 。 (31)A解析: Control参数为控件变量。(32)C解析: chr把keycode转换成为字母,UCase把字母转换成大写,Asc将大写的字母转换成Ascii码,把Ascii码加2后再通过chr转换成字母C。 (33)B解析: Mid(string, start, length) start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数,Mid 返回零长度字符串()。 length 可选参数;为 Variant(Long)。要返回的字符数。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到尾端的所有字符。 (34)D解析: 以上程序仅适合数组中所有值为正整数或0的情况,如果数组中有负数,则必须更改。 (35)B解析: i循环用来遍历所有的学生,j循环用来计算每个学生的成绩,应将sum=0移至i循环和j循环之间,这样在计算每个学生的成绩时,可用把sum清零,从而统计出正确的成绩。而原代码最后算出的是所有学生的总成绩。二、填空题(1)【1】输出解析: 软件测试用例是为了有效发现软件缺陷而编写的包含测试目的、测试步骤、期望测试结果的特定集合。正确认识和设计软件测试用例