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

　　(26)在窗体上面画一个名称为TxtA的文本框，然后编写如下的事件过程：
　　Private Sub TxtA_KeyPress(Keyascii as integer)
　　……
　　End Sub
　　若焦点位于文本框中，则能够触发KeyPress事件的操作是_________。
　　A)单击鼠标　　　　　　B)双击文本框
　　C)鼠标滑过文本框　　　D)按下键盘上的某个键
　　答案：D
　　评析：KeyPress事件用来识别按键的ASCII码。从而识别键盘上某个键的按下与释放。
　　
　　(27)要获得当前驱动器应使用驱动器列表框的哪个属性_______。
　　A)Path　　B)Drive　　C)Dir　　D)Pattern
　　答案：B
　　评析：驱动器列表框的Drive属性，用来设置或返回程序运行时所选择的驱动器名。格式为：
　　驱动器列表框名称．Drive[=驱动器名]
　　"驱动器名"是指定的驱动器，如果省略，则Drive属性是当前驱动器。
　　
　　(28)下列程序段的执行结果为_______。
　　K=0
　　For I=l TO 3
　　A=I^I^K
　　Print A;
　　Next I
　　A)1　l　1　　 B)l　4　9　　 C)0　0　0　　 D)1　2　3
　　答案：A
　　评析：分析程序，由于在整个程序段中，K的值始终为0，A=I^I^K=(I^I)^K，我们知道，任何数的0次方都得1，所以只要知道循环体执行几次就可以知道打印出的结果是什么了。
　　
　　(29)下列程序段的执行结果为_________。
　　A="abcd"
　　B="bcde"
　　E=Right(A，3)
　　F=Mid(B，2，3)
　　If E<F Then Print E + F Else Print F + E
　　A)cdebcd　　B)cdd　　C)cdcd　　D)bcdcde
　　答案：D
　　评析：Right(字符串，n)：返回字符串的最后n个字符。
　　Mid(字符串，p，n)：从第p个字符开始，向后截取n个字符。p和n都是算术表达式。
　　"+"字符串连接运算符，将两个字符串按顺序连接起来。
　　字符串比较：将两个字符串从左到右逐个比较其ASCII码值，直到比较出第一个不相等的为止。
　　Right("abcd",3)="bcd"
　　Mid("bcde",2,3)="cde"
　　"bc0I<1tcde"，所以打印出的结果为"bcdcde"。
　　
　　(30)下列程序段的执行结果为_________。
　　X=2
　　Y=l
　　If X*Y<l Then Y=Y-1 Else Y=-1
　　Print Y-X>O
　　A)True　　　B)False　　　C)-1　　　　D)1
　　答案：B
　　评析：格式：表达式1比较运算符表达式2
　　关系表达式的比较规则是：
　　如果两个表达式都是数值，则进行数值比较。
　　如果两个表达式都是字符串，则进行字符串比较。
　　如果一个表达式是数值而另一个是字符串，则数值表达式小于字符串表达式。
　　该题中，x*Y=2*1=2，所以X*Y<I为假，执行Else分支，Y=-l；此时y-X=-1-2=-3，所以Y-X>O为假。
　　在Visual Basic中，关系表达式的值用True表示真；用False表示假。
　　
　　(31)下列程序段的执行结果为_________。
　　For x=5 TO l Step-1
　　For Y=l TO 6-x
　　Prim Tab(Y+5)；"*"；
　　Next Y
　　Print
　　Next x
　　A)*****　　　　 B)*****　　　　 C)　 *　　　　　　D)　　*
　　****　　　　　　****　　　　　　　**　　　　　　　　 ***
　　***　　　　　　 ***　　　　　　　 ***　　　　　　　 *****
　　**　　　　　　　**　　　　　　　 ****　　　　　　　*******
　　*　　　　　　　 *　　　　　　　 *****　　　　　　 *********
　　答案：C
　　评析：格式：Tab[(n)]，设定显示或打印下一个表达式之间的间隔
　　本段程序的作用是：通过外循环的循环体，打印出5行星号，内循环随外循环变量x的变化共执行5次，每次执行，就在第x行上，从空5个字符的位置起打印x个星号。
　　
　　(32)下列程序段的执行结果为
　　Dim A(10)，B(5)
　　For i=1 TO 10
　　A(i)=i
　　Next i
　　For j=1 To 5
　　B(j)=j*20
　　Next j
　　A(5)=B(2)
　　Print"A(5)="；A(5)
　　A)A(5)=5　　B)A(5)=10　　C)A(5)=20　　D)Af51=40
　　答案：D
　　评析：观察程序段，可知程序段最终的输出结果是字符串"A(5)="和数组元素A(5)的值。-由程序段可知：A(5)=B*(2)，根据程序段中以J为循环变量的循环可得：B(2)=2*20=40，则A(5)=40。
　　
　　(33)可以在窗体模块的通用声明段中声明_________。
　　A)全局变量　　B)全局常量
　　C)全局数组　　D)全局用户自定义类型
　　答案：A
　　评析：全局变量可以在窗体模块、标准模块和类模块中进行声明；全局常量、全局数组、全局用户自定义类型只能在标准模块中进行声明；
　　
　　(34)单击命令按钮时，下列程序代码的执行结果为_________。
　　Public Sub Procl(n As Integer，By Val m As Integer)
　　n=n Mod 10
　　m=m／10
　　End Sub
　　Private Sub Command1_Click()
　　Dim x As Integer，y As Integer
　　x=12：y=34
　　Call Proc1(x，y)
　　Print x；y
　　End Sub
　　A)12　34　　B)2　34　　C)2　3　　D)12　3
　　答案：B
　　评析：过程中传递参数的方式有两种：
　　一种是按地址传递参数，这种形式使过程用变量的内存地址去访问实际变量的内容，如果在过程中改变了该变量的值，则是真正改变了这一变量的值，这种形式是传递参数的缺省方式。
　　另一种是按值传递参数，这种形式只是传递变量的副本，如果在过程中改变该变量副本的值，并不能真正改变该变量本身的值。
　　解题思路：观察程序段，过程Procl的第一个参数n是按地址传递参数，第二个参数m是按值传递参数，
　　所以调用过程Procl后，变量x的值改变，而变量y的值不变。
　　由程序段可知，x=12 Mod 10=2,y=34
　　最终的输出结果是：2　34。
　　
　　(35)设在工程中有一个标准模块，其中定义了如下记录类型
　　Type B00ks
　　Name As String*10
　　TelNum As String。20
　　End Type
　　在窗体上画一个名为Conlinand1的命令按钮，要求当执行事件过程Command1_Click　　时，在顺序文件Person．txt中写入一条记录。下列能够完成该操作的事件过程是________．
　　A)Private Sub Command1_Click()
　　Dim B As Books
　　Open"c：＼Person．txt"For Output As#1
　　B．Name：InputBox("输入姓名")
　　B．TelNum；InputBox("输入电话号码")
　　Write#1，B．Name．B．TelNum
　　Close # 1
　　End Sub
　　B)Private Sub Command1_Click()
　　Dim B As Books
　　Open"c：＼Person．txt"For Input As#l
　　B．Name=InputBoX("输入姓名")
　　B．TelNum=InputBox("输入电话号码")
　　Print#1，B．Name，B．TelNum
　　Close # l
　　End Sub
　　C)Private Sub Command l Click()
　　Dim B As Books
　　Open"c：＼Person．txt"For Output As#1
　　B.Name=InputBox("输入姓名")
　　B．TelNuln=InputBox("输入电话号码")
　　Write # 1,B
　　Close # l
　　End Sub
　　D)Private Sub Command1_Click()
　　Dim B As Books
　　Open"c：＼Person．Txt"For Input As#1
　　Name=InputBox("输入姓名")
　　TelNum=InputBox("输入电话号码")
　　Print#1．Name．TelNum
　　Close # 1
　　End Sub
　　答案：A
　　评析：A选项正确；
　　B选项向文件中输出内容，打开方式应当为For output;
　　C选项记录变量不可以对元素整体输入输出；
　　D选项记录变量的输入和输出都必须指明到记录元素。格式为：记录变量．元素名。
　　
　　二、填空题(每空2分，共30分)
　　
　　请将每空的正确答案写在答题卡【l】～【15】序号的横线上，答在试卷上不得分。
　　
　　(1) 栈的基本运算有三种：入栈、退栈和　【1】　。
　　答案：【1】读栈顶元素
　　评析：栈的基本运算有三种：入栈、退栈和读栈顶元素。
　　入栈运算是指在栈项位置插入一个新元素。这个运算有两个基本操作：首先将栈项指针进一(即mp加1)，然后将新元素插入到栈顶指针指向的位置。
　　退栈运算是指取出栈顶元素并赋给一个指定的变量。这个运算有两个基本操作：首先将栈顶元素(栈顶指针指向的元素)赋给一个指定的变量，然后将栈顶指针退一(即top减1)。
　　读栈顶元素是指将栈顶元素赋给一个指定的变量。这个运算不删除栈顶元素，只是将它的值赋给一个变量。
　　
　　(2) 在面向对象方法中，信息隐蔽是通过对象的　【2】　性来实现的。
　　答案：【2】封装
　　评析：软件工程的基本原则包括抽象、信息隐蔽、模块化、局部化、确定性、一致性、完备性和可验证性。
　　信息隐蔽是指采用封装技术，将程序模块的实现细节隐藏起来，使模块接口尽量简单。
　　
　　(3) 数据流的类型有　【3】　和事务型。
　　答案：【3】变换型
　　评析：典型的数据流类型有两种：变换型和事务型：
　　变换型：是指信息沿输入通路进入系统，同时由外部形式变换为内部形式，进入系统的信息通过变换中心，经加工处理以后再沿输出通路变换成外部形式离开软件系统。
　　事务型：在很多软件应用中，存在某种作业数据流，它可以引发一个或多个处理，这些处理能够完成该作业要求的功能，这种数据流就叫做事务。
　　
　　(4) 数据库系统中实现各种数据管理功能的核心软件称为　【4】　。
　　答案：【4】数据库管理系统或DBMS
　　评析：数据库管理系统是数据库的机构，它是一种系统软件，负责数据库中的数据组织、数据操纵、数据维护、控制及保护和数据服务等。数据库管理系统是数据库系统的核心。
　　
　　(5) 关系模型的数据操纵即是建立在关系上的数据操纵，一般有　【5】　、增加、删除和修改四种操作。
　　答案：【5】查询
　　评析：关系模型的数据操纵即是建立在关系上的数据操纵，一般有查询、增加、删除和修改四种操作。
　　数据查询：用户可以查询关系数据库中的数据，它包括一个关系内的查询以及多个关系间的查询。
　　数据删除的基本单位是一个关系内的元组，它的功能是将指定关系内的指定元组删除。
　　数据插入仅对一个关系而言，在指定关系中插入一个或多个元组。
　　数据修改是在一个关系中修改指定的元组和属性。
　　
　　(6) 记时器控件能有规律的以一定时间间隔触发　【6】　事件，并执行该事件过程中的程　　序代码。
　　答案：【6】Timer
　　评析：Timer事件在一个Timer控件的预定的时间间隔过去之后发生。该间隔的频率储存于该控件的Interval属性中，它以千分之一秒为单位指定时间的长度。
　　
　　(7) 为了使标签能自动调整大小以显示全部文本内容，应把标签的　【7】　属性设置为True。
　　答案：【7】AutoSize
　　评析：如果希望Label显示可变长度的行或变化的行数，就要设置AutoSize。
　　
　　(8) 在KeyDown和KeyUp事件过程中，当参数Shift的值为十进制数1，2，4时，分别代表Shift、　【8】　、　【9】　键。
　　答案：【8】Ctrl
　　【9】Alt
　　评析：Shift是在Keydown或Keyup事件发生时响应SHIFT，CTRL和ALT键的状态的一个整数。Shift参数是一个位域，它用最少的位响应SHIF键(位0)、CTRL键(位1)和ALT键(位2)。这些位分别对应于值1、2和4。可通过对一些、所有或无位的设置来指明有一些、所有或零个键被按下。例如，如果CTRL和ALT这两个键都被按下，则Shift的值为6。
　　
　　(9) 在3种不同类型的组合框中，只能选择而不能输入数据的组合框是　【10】　。
　　答案：【10】下拉式列表框
　　评析：下拉式列表框：这种样式仅允许从下拉式列表中选择。
　　(缺省值)下拉式组合框。包括一个下拉式列表和一个文本框。可以从列表选择或在文本框中输入。简单组合框。包括一个文本框和一个不能下拉的列表。可以从列表中选择或在文本框中输入。简单组合框的大小包括编辑和列表部分。按缺省规定，简单组合框的大小调整在没有任何列表显示的状态。增加Height属性值可显示列表的更多部分。
　　
　　(10)把窗体的KeyPreview属性设置为True，并编写如下两个事件过程：
　　Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
　　Print KeyCode；
　　End Sub
　　Private Sub Form_KeyPress(KeyAscii As Iuteger)
　　Print KeyAscii
　　End Sub
　　程序运行后，如果按下A键，则在窗体上输出的数值为　【11】　和　【12】　。
　　答案：【11】65
　　【12】97
　　评析：按下和松开一个ANSI键时发生KeyPress事件，其语法为：
　　Private Sub object_KeyPress([index As Integer,]keyascii As Integer)
　　KeyPreview属性，返回或设置一个值，以决定是否在控件的键盘事件之前激活窗体的键盘事件。键盘事件为：KeyDown、KeyUp和KeyPress。当KeyPreview的值为True时窗体先接收键盘事件，然后是活动控件接收事件；为False时(缺省值)活动控件接收键盘事件，而窗体不接收。KeyPress将每个字符的大、小写形式作为不同的键代码解释，即作为两种不同的字符。而KeyDown和KeyUp用两种参数解释每个字符的大写形式和小写形式：KeyCode-显示物理的键(将A和a作为同一个键返回)和Shift．指Shift+Key键的状态而且返回A或a其中之一。
　　本题中，由于Form的KeyPreview属性为True，窗体能够接受到键盘事件。当A键按下时，KeyDown事件产生，此时KeyCode=65。A键松开后，KeyPress事件产生，此时KeyAscii=97。
　　
　　(11)为了显示一个窗体，所使用的方法为　【13】　；为了隐藏一个窗体，所使用的方法为　【14】　。
　　答案：【13】Show
　　【14】Hide
　　评析：Show方法用来显示窗体对象或MDI窗体对象，如果该窗体从未加载则会自动加载。
　　Hide方法用来隐藏窗体对象或MDI窗体对象，但是不能将其从内存中卸载(从内存中卸载窗体要用Unload)。
　　
　　(12)执行以下程序段，并输入1.23，则程序的输出结果应是　【15】　。
　　N=Str(InputBox("请输入一个实数："))
　　p=InStr(N，"．")
　　Print Mid(N，p)
　　答案：【15】23
　　评析：InStr函数、Mid函数
　　InStr([首字符位置]字符串1，字符串2[，n])用来在"字符串l"中查找"字符串2"，如果找到，则返回"字符串2"的第一个字符在"字符串1"中的位置。
　　如果带有参数"首字符位置"，则从该位置开始查找，否则从"字符串l"的起始位置查找。可选参数"n"
　　用来指定字符串比较方式，可以取0、1或2。如为0则进行在比较时区分大小写；如为l则在比较时忽略大小写；如为2则基于数据库中包含的信息进行比较。
　　Mid(字符串，p,n)函数用来在"字符串"中从第p个字符开始，向后截取n个字符。如果省略参数n，则从第p个字符开始，向后截取到字符串的末尾。
　　跟踪程序：
　　n="1．23"
　　p=InStr(n,"．")=InStr("1．23"， "．")
　　p=2
　　所以，Mid("1．23",2)所截取的字符是："．23"。
　　最终的输出结果是：．23。