05年9月等级考试二级VB考前密卷2(四)

　　(26)Microsoft Visual Basic 6．0包括三种版本，其中不包括_______。
　　A)通用版　　B)企业版　　C)学习版　　D)专业版
　　答案：A
　　评析：Microsoft Visual Basic 6．0包括三种版本，分别是：学习版、专业版、企业版。
　　
　　(27)Visual Basic窗体设计器的主要功能是：_______。
　　A)建立用户界面　　　 B)编写源程序代码
　　C)画图　　　　　　　 D)显示文字
　　答案：A
　　评析：窗体设计器窗口简称窗体(Form)，是应用程序最终面向用户的窗口，它对应于应用程序的运行结果。
　　
　　(28)Visual Basic中窗体文件的扩展名是_______。
　　A)VBP　　B)FRM　　C)VBW　　 D)PDM
　　答案：B
　　评析：VB中窗体文件的扩展名为FRM，即Form。
　　
　　(29)唯一能区别一个控件的属性是_______。
　　A)Caption　　B)Text　　C)Name　　D)Index
　　答案：C
　　评析：在程序中每个控件都有个名字，控件的名字也是它们互相区别的唯一标志。
　　
　　(30)窗体在屏幕上显示后有________种方法可以清除它。
　　A)1种　　B)2种　　 C)3种　　　D)4种
　　答案：C
　　评析：清除窗体的方法可以用Unload将其从内存中彻底卸载，也可以设置其Visible属性为False，仅仅使其从屏幕上消失；还可以用．Hide属性，使窗体隐藏起来。
　　
　　(31)对用MsgBox显示的消息框，下面_________是错的。
　　A)可以有一个按钮
　　C)可以有三个按钮
　　B)可以有两个按钮
　　D)可以有四个按钮
　　答案：D
　　评析：MsgBox函数的按钮组合中最多只能有三个按钮。
　　
　　(32)下列哪条语句是错的_______。
　　A)exit sub　　B)exit function　　C)exit while　　D)exit do
　　答案：C
　　评析：exit sub用来跳出本过程；
　　exit function用来跳出本函数并返回到调用处继续执行；
　　exit o用来退出do循环；
　　没有exit while这个用法。
　　
　　(33)设有如下变量声明
　　Dim TestDate As Date
　　为变量TestDate正确赋值的表达方式是_______。
　　A)TestDate=#1／1／2002#　　　　　 B)TestDate=#"1／1／2002"#
　　C)TestDate=date("1／1／2002")　　D)TestDate=Format("m／d／yy","11112002")
　　答案：A
　　评析：日期型数据用来表示日期信息，其格式为mm／dd／yyyy或mm-dd-yyyy，取值范围为1／1／100到12/13／9999；
　　日期文字须以符号"拌"括起来，例如，#January 1，2002#；
　　Format函数设置日期的格式应当为：Format(MyDate，"dd，mm，yy")。
　　
　　(34)以下能够触发文本框Change事件的操作是_________。
　　A)文本框失去焦点　　　 B)文本框获得焦点
　　C)设置文本框的焦点　　 D)改变文本框的内容
　　答案：D
　　评析：当用户向文本框中输入新信息，或当程序把Text属性设置为新值从而改变文本框的Text属性时，将触发Change事件。程序运行后，在文本框中每键入一个字符，就会引发一次Change事件。
　　
　　(35)下列叙述中正确的是________。
　　A)在窗体的Form-Load事件过程中定义的变量是全局变量
　　B)局部变量的作用域可以超出所定义的过程
　　C)在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，　　但其作用域只限于该过程
　　D)在调用过程中，所有局部变量被系统初始化为0或空字符串
　　答案：C
　　评析：1．模块变量包括窗体变量和标准模块变量，窗体变量可以作用于该窗体的所有过程。全局变量只能在标准模块中声明，不能在过程或窗体模块中声明。
　　2．在过程(事件过程或通用过程)内定义的变量叫做局部变量，其作用域是它所在的过程。某一过程的执行只对该过程内的变量产生作用，对其他过程中相同名字的局部变量没有任何影响。因此，在不同的过程中可以定义相同名字的变量，它们之间没有任何关系。如果需要，则可以通过"过程名．变量名"的形式分别引用不同过程中相同名字的变量。
　　3．在过程中的局部变量，如果过程定义使用了Stmic，则过程中的局部变量就是"Static"型的，即在每次调用过程时，局部变量的值保持不变；如果省略"Static"，则局部变量就默认为"自动"的，即在每次调用过程时，局部变量被初始化为O或空字符串。
　　
　　二、填空题(每空2分，共30分)．
　　
　　请将每空的正确答案写在答题卡【l】～【15】序号的横线上，答在试卷上不得分。
　　
　　(1)设一棵完全二叉树共有500个结点，则在该二叉树中有　【1】　个叶子结点。
　　答案：【l】250
　　评析：所谓完全二叉树是指除最后一层外，每一层上的结点数均达到最大值；在最后一层上只缺少右边的若干结点。
　　具有n个结点的完全二叉树，其父结点数为int(n/2)，而叶子结点数等于总结点数减去父结点数。本题n=500，故父结点数等于int(500／2)=250，叶子结点数等于500-250=250。
　　
　　(2)在最坏情况下，冒泡排序的时间复杂度为　【2】　。
　　答案：【2】n(n-1)／2或O(n(n-1)／2)
　　评析：冒泡排序法是一种最简单的交换类排序方法，它是通过相邻数据元素的交换逐步将线性表变成有序。假设线性表的长度为n，则在最坏的情况下，冒泡排序需要经过n／2遍的从前往后的扫描和n／2遍的从后往前的扫描，需要的比较次数为n(n-1)／2。
　　
　　(3)面向对象的程序设计方法中涉及的对象是系统中用来描述客观事物的一个　【3】　。
　　答案：【3】实体
　　评析：面向对象的程序设计方法中涉及的对象是系统中用来描述客观事物的一个实体，是构成系统的一个基本单位，它由一组表示其静态特征的属性和它可执行的一组操作组成。
　　
　　(4)软件的需求分析阶段的工作，可以概括为四个方面：　【4】　、需求分析、编写需求规格说明书和需求评审。
　　答案：【4】需求获取
　　评析：软件的需求分析阶段的工作，可以概括为四个方面：需求获取、需求分析、编写需求规格说明书和需求评审。
　　
　　(5) 【5】　是数据库应用的核心。
　　答案：【5】数据库设计
　　评析：数据库设计是数据库应用的核心。在数据库应用系统中的一个核心问题就是设计一个能满足用户要求，性能良好的数据库，这就是数据库设计。
　　
　　(6) Visual BASIC应用程序通常由3类模块组成，即窗体模块、　【6】　和类模块。
　　答案：【6】标准模块
　　评析：模块是相对独立的程序单元。在Visual Basic中主要有3种模块，即窗体模块、标准模块和类模块。类模块主要用来定义类和建立ActiveX组件。
　　
　　(7)以下程序段执行后y的值是　【7】　。
　　x=8．6
　　y=int(x+0.5)
　　print y
　　答案：【7】9
　　评析：返回参数的整数部分，其类型和参数相同。
　　语法
　　Int(number)
　　必要的number参数是Double或任何有效的数值表达式。如果number包含Null，则返回Null。
　　
　　(8)以下程序的功能是：从键盘上输入若干个数字，当输入负数时结束输入，统计出若干　　数字的平均值，输出结果。请填空。
　　Private Sub Form_click()
　　Dim x，y As Single
　　Dim zAsInteger
　　X=InputBox("Enter a score")
　　Do while　【8】
　　Y=y+x
　　Z=z+1
　　x=InputBox("Enter a score")
　　Loop
　　Ifz=0 Then
　　z=l
　　End If
　　y=　【9】
　　Print y
　　End Sub
　　答案：【8】x>=O
　　【9】y／z
　　评析：根据表达式的值有条件地执行一组语句。
　　语法
　　If condition Then[Statements］［Else elsestatements］
　　或者，可以使用块形式的语法：
　　If condition Then
　　[statements]
　　[Elself condition-n Then
　　[elseifstatements］…
　　[Else
　　［elsestatements］］
　　End If
　　当条件为True时，或直到条件变为True时，重复执行一个语句块中的命令。
　　语法
　　Do[{While︱Until)condition］
　　［statements］
　　［Exit Do］
　　［statements］
　　Loop
　　或者可以使用下面这种语法：
　　Do
　　[statements］
　　[Exit Do]
　　[smtemems]
　　Loop[{While︱Until}condition]
　　本题的循环首先判断输入是否大于O，如果是则处理这个输入，否则结束循环。循环体内的第二个判断语句判断的是当前输入是否比当前的最小值小，如果是则改写当前最小值为输入值，否则结束判断语句。
　　
　　(9)在窗体上画一个命令按钮，然后编写如下程序：
　　Function fun(By Val num As Long)As Long
　　Dim k As Long
　　k=l
　　num=Abs(num)
　　Do While num
　　k=k*(num Mod 10)
　　num=num＼10
　　Loop
　　tun=k
　　End Function
　　Private Sub Command1_Click()
　　Dim n As Long
　　Dim r As Long
　　n=InputBox("请输入一个数")
　　n=CLng(n)
　　r=fun(n)
　　Print r
　　End Sub
　　程序运行后，单击命令按钮，在输入对话框中输入"345"，输出结果为　【10】　。
　　答案：【10】60
　　评析：程序首先要求用户输入一个数，然后将这个数转化为长整型传递入函数fun。本题中传入的数字是345。函数fun中首先将传入的参数取绝对值，然后进入循环：
　　第一次循环结束的时候：
　　k=5
　　num=34
　　第二次循环结束的时候：
　　k=20
　　hum=3
　　第三次循环结束的时候：
　　k--60
　　num=O
　　
　　(10)菜单编辑器可分为3个部分，即数据区、　【11】　和菜单项显示区。
　　答案：【ll】编辑区
　　评析：菜单编辑器的界面分为数据区、编辑区和菜单(项)显示区三个部分。数据区用来确定菜单的名称、索引和标题等信息。编辑区用来对当前的菜单项进行插入、删除等操作。显示区用来显示当前对菜单操作的结果，以便用户和自己的创建目标做比照。
　　
　　(11)文件根据数据性质，可分为　【12】　文件和　【13】　文件。
　　答案：【12】程序
　　【13】数据
　　评析：如果一个文件内存放的是程序数据，则该文件是程序文件。否则该文件内存放的就是供其他程序使用的数据，也就是数据文件。
　　
　　(12)在窗体上画一个命令按钮，然后编写如下事件过程：
　　Private Sub Command1_Click()
　　For I=l TO 4
　　x=4
　　For j=1 To 3
　　x=3
　　For k=1 T0 2
　　x=x+6
　　Next k
　　Next j
　　Next i
　　Prim x
　　End Sub
　　程序运行后，单击命令按钮，输出结果是　【14】　。
　　答案：【14】15
　　评析：观察程序，由于每次执行第二层循环时x都被重新赋值，因此只要看当x=3时，执行第三层循环所得到的结果就可以。
　　k=l,x=x+6=3+6=9
　　k=2,x=x+6=9+6=1 5
　　最终的输出结果是：15。
　　
　　(13)在窗体上画一个命令按钮然后编写如下事件过程：
　　Option Base 1
　　Private Sub Command1_Click()
　　Dim a
　　A=Array(1，2，3，4)
　　j=1
　　For i=4 TO l Step-1
　　S=s+a(i)*j
　　j=j*10
　　Next i
　　Print s
　　End Sub
　　运行一面的程序，单击命令按钮，其输出结果是　【15】　。
　　答案：【15】1234
　　评析：跟踪程序：
　　由a=Array(1，2，3，4)可知：
　　a(1)=1
　　a(2)=2
　　a(3)=3
　　a(4)=4
　　执行循环体：
　　s=s+a(i)*j=a(4)*1=4j=j*10=10
　　s=s+a(i)*j=4+a(3)*10=34J=j*10=100
　　s=s+a(i)*j=34+a(2)*100=234J=j*10=1000
　　s=s+a(i)*j=234+a(1)*1000=1234J=j*10=10000
　　最终的输出结果是：1234。