2009年9月全国计算机等级二级VB试卷含参考答案

1、2009年9月全国计算机等级二级VB试卷含参考答案一、  选择题（每小题2分，共70分）下面各题A）、B)、C)、D)四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上。答在试卷上不得分。(1)下列数据结构中，属于非线性结构的是A)循环队列B)带链队列C)二叉树D)带链 (2)下列数据结构中，能够按照“先进先出”原则存取数据的是：A)循环队B)C)队列D) 二叉树 (3)对于循环队列，下列叙述中正确的是A)队头指针是固定不变的B)队头指针是一定大于队尾指针C)队头指针一定小于队尾指针D)队头指针可以大于队尾指针，也可以小于队尾

2、指针 (4)算法的空间复杂度是指A)算法在执行过程中所需要的计算机存储空间B)算法所处理的数据量C)算法程序中的语句或指令条数D)队头指针可以大于队尾指针，也可以小于队尾指针 (5)软件设计中划分模块一个准则是A)低内聚低耦合B) 高内聚低耦合C) 低内聚高耦合 D) 高内聚高耦合 (6)下列选项中不属于结构化程序设计原则的是A)可封装B)自顶向下C)模块化D)逐步求精 (7)软件详细设计产生的图如下：该图是：A)N-S图B)PAD图C)程序流程图D)E-R图 (8)数据库管理系统是A)操作系统的一部分B

3、)在操作系统支撑下的系统软件C)一种编译系统D)一种操作系统 (9)在E-R中，用来表示实体联系的图形是A)椭形图B)矩形C)菱形D)三角形 (10)有三个关系R,S和T如下：其中关系T由关系R和S通过某种操作得到，该操作为A)选择B)投影C)交D)并 （11）以下变量名中合法的是：A)x2-1       B)Print      C)Str_n       

4、60;   D)2x（12）把数学表达式(5x+3)/(2y-6)表示为正确的VB表达式应该是：A) (5x+3)/(2y-6)                      B)x*5+3/2*y-6C)(5*X+3)          &#

5、160;                D)(X*5+3)/(y*2-6)(13)下面有关标准模块的叙述中，错误的是：A)标准模块不完全由代码组成，还可以有窗体。B)标准模块中的Private过程中不能被工程中的其他模块调用。C）标准模块中文件扩展名为.basD)标准模块中的全局变量可以被工程中的任何模块引用。 (14)下面控件中，没有Caption 属性的是A)复选框    

6、B）单选按钮     C）组合框    D）框架 (15)用来设置文字字体是否斜体的属性是：A)FonUnderline    B)FontBold   C)Fontslope  D)FontItalic (16)若看到程序中有以下事件过程，则可以肯定的是，当程序运行时Private Sub Form_MouseDown(Button As Integer,

7、 Shift As Integer, X As Single, Y As Single)   Print "VB program"End SubA)     用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程。B)      用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程。C)

8、0;    用鼠标右键单击名称为“MouseDown”的命令按钮时，执行此过程。D)     用鼠标左键或右键单击名称为“Click”的控件时，执行此过程。（17）可以产生30-50(含30和50)之间的随机整数的表达式是A)Int (Rnd*21+30)                  B)Int(Rnd*20+3

9、0)C) Int(Rnd*50-Rnd*30)              D)Int(Rnd*20+50) (18)在程序运行时，下面的叙述中正确的是A)用鼠标右键单击窗体中无控件的部分，会执行窗体的Form_load事件过程。B)用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程。C)只装入而不显示窗体，也会执行窗体的Form_Load事件过程。D）装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件

10、过程。 (19)名称为Command1的命令按钮和名称为Text1的文本框Private Sub Command1_Click()Text1.Text = "程序设计"Text1.Text = "程序设计"Text1.SetFocusEnd Sub Private Sub Text1_GotFocus()Text1.Text = "等级考试"End Sub运行以上程序，单击命令按钮后：A)

11、0;    文本框中显示的是“程序设计”，且焦点在文本框中。B)      文本框中显示的是“等级考试”，且焦点在文本框中。C)     文本框中显示的是“程序设计”，且焦点在命令按钮上。D)     文本框中显示的是“等级考试”，且焦点在命令按钮上。 (20)有名称为Opiton1的单选按钮，且程序中有语句：If Option1.value=True then下面语

12、句中与该语句不等价的是A) Option1.Vulue then       B)If Option1=True thenC)If value=True then        D)If Option then (21)设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是：A)程序运行时，若使滚动块向

13、左移动，滚动条胡value属性值就增加。B)程序运行时，若使滚动块向左移动，滚动条的value属性值就减少。C)由于滚动条的MAX属性值小于Min属性值，程序会出错。D)由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为滚动块无法移动。 (22)有如下过程代码连续3次调用var_dim过程，第3次调用时的输出是：A) 2   1      B)2  3    C) 6  

14、60;1       D)  6   3 (23)在窗体上画1个命令按钮，并编写如下事件过程：运行程序，单击命令按钮，窗体上显示的内容为：A) 5   3   1  1                 

15、0; B)5  4  3  2  1 C)4  3  2  1  1                  D)4  4  3  2  1  1

16、 (24)在窗体上面个命令按钮，并编写如下事件过程：Private Sub Command1_Click()Dim a(3, 3)For m = 1 To 3    For n = 1 To 3    If n = m Or n = 4 - m Then &#

17、160;   a(m, n) = m + n    Else     a(m, n) = 0     End If     Print a(m, n);    Next n    

18、Print  Next mEnd Sub运行程序单击命令按钮，窗体上显示的内容为：A)     2  0  0       B)2  0  4       C)2  3  0    D) 2 

19、; 0  00         4  0         0  4  0         3  4  0       0 

20、; 4  50  0  6         4  0  6         0  0  6       0  5  6 (25)设有以下函数过程：Fu

21、nction fun(a As Integer, b As Integer)     Dim c As Integer  If a < b Then    c = a: a = b: b = c    End If 

22、;   c = 0    Do      c = c + a    Loop Until c Mod b = 0    fun = c End Function若调用函数fun时的实际参数都是自然数，则函数返回的是：A)a、b的最

23、大公约数          B)a、b的最小公约数  C)a除以b的余数             D)  )a除以b 的商的整数部分 (26)窗体上有1个名称为text1文本框，1个名称为Timer1的计时器控件，其Iterval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：P

24、rivate Sub Timer1_Timer()Static flag As Integer      If flag = 0 Then flag = 1      flag = -flag     If flag = 1 Then &#

25、160;  Text1.ForeColor = &HFF&         '&HFF&为红色'  Else  Text1.ForeColor = &HC000&       '&HC000&为绿色'  End I

26、fEnd Sub以下叙述中正确的是A)     每次执行此事件过程时，flag的初始值均为0B)      Flag的值只可能取0或1C)     程序执行后，文本框中的文字每5秒改变一次颜色D)     程序有逻辑错误，Else分支总也不能被执行 (27)为计算1+2+22+23+24+210的值，并把结果显示在文本框text1中，若编写如下事件过程：Private

27、 Sub Command1_Click()Dim a%, s%, k%s = 1a = 2For k = 2 To 10a = a * 2s = s + aNext kText1.Text = sEnd Sub执行此事件过程中发现结果是错误的，为能够得到正确结果，应做的修改是：A) 把s=1 改为 s=0&#

28、160;                 B)把For k=2 to 10 改为 For k=1 to 10C)交换语句 s=s+a和a=a*2的顺序     D)同时进行B)、C)两种修改 (28)标准模块中有如下程序代码：Public x As 

29、Integer, y As IntegerSub var_pub()x = 10: y = 20End Sub在窗体上有1个命令按钮，并有如下事件过程：Private Sub Command 1_Click()Call var_pubx = x + 100y = y + 100Print x, yEnd Sub运行程序后单击命令按钮，窗体上显示的是

30、：A)100  100     B)100 120  C)110  100    D)110  120 (29)设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：   Funciton fun(a as Integer ,b as Integer )While a >

31、60;b      a = a - b       Wend   fun = aEnd Function在调试时发现函数是错误的，为使函数能产生正确的返回值，应做的修改是：A)把a=a-b改为a=b-a            B)把a=a-b改为a=

32、abC)把while a>b改为 while a<b     D) 把while a>b改为 while a>=b(30)下列关于通用对话框CommanDialog1的叙述中，错误的是A)只要在“打开”对话框中选择了文件，并单击“打开”按钮，就可以将选中的文件打开。B)使用CommonDialog1.showcolor方法，可以显示“颜色”对话框。C)Cancelerror属性用于控制用户单击“取消”按钮关闭对话框时，是否显示出错警告。D)在显示“字体

33、”对话框前，必须先设置CommonDialog1.showcolor的Flags属性，否则会出错。(31)在利用菜单编辑器设计菜单时，为了把组合键”Alt+X”设置为退出（X）菜单项的访问键，可以将该菜单项的标题设置为A)退出（X&） B)退出（&X）  C)退出（X#）   D)退出（#X）  (32)在窗体上画个命令按钮和个文本框，其名称分别为command1和text1，再编写如下程序：Dim ss As StringPrivate Sub t

34、ext1_keypress(keyascii As Integer) If Chr(keyascii) <> "" Then ss = ss + Chr(keyascii)End SubPrivate Sub Command1_Click()   Dim m As String, i As Integer  

35、;  For i = Len(ss) To 1 Step -1    m = m + Mid(ss, i, 1)    NextEnd Sub (33)窗体的左右两端各有1条直线，名称分别为Line1、Line2；名称为shape的圆靠在左边的Line1直线上（见图）；另有1个名称为Timer1的计时器控件，其Enabed属性值是True。要求程序

36、运行后，圆每秒向右称动100，当圆遇到Line2时则停此移动。为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：Private Sub Timer1_Timer()For k = Line1.X1 To Line2.X1 Step 100  If Shape1.Left + Shape1.Width < Line2.X1 Then    Shape

37、1.Left = Shape1.Left + 100     End If Next kEnd Sub运行程序时发现圆立即移动了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是：A)     把计时器的Interval属性设置为1B)      把For K=Line1.X1 To Li

38、ne2.X1 Step 100和Next 两行删除C)     把For K=Line1.X1 To Line2.X1 Step 100改为For K=Line2.X1 To Line1.X1 Step 100D)     把 If shape1.left+shape1.width<line2.x1 then  

39、改为if shape1.left<line2.x1 then (34)下列有关文件的叙述中，正确的是：A)以Output方式打开一个不存在的文件时，系统将显示出错信息B) 以Append方式打开的文件，既可以进行读操作，也可以进行写操作C)在随机文件中，每个记录的长度是固定的。D)无论是顺序文件还是随机文件，其打开的语句和打开方式都是完全相同的。  (35)窗体如图1所示，要求程序运行时，在文本框text1中输入一个姓氏，单击“删除“按钮（名称为command1），则可删除列表框中list1中所有该姓氏的项目，若编写以下程序来实

40、现此功能：      Private Sub Command1_Click()Dim n%, k%n = Len(Text1.Text)For k = 0 To List1.ListCount - 1 If Left(List1.List(k), n) = Text1.Text Then List1.RemoveItem k&#

41、160;End If Next kEnd Sub在调试时发现，如输入“陈”，可以正确删除所有姓“陈”的项目，但输入“刘”则只删除了“刘邦”、“刘备”2项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的改方案是把 For k=0 to list1.listcount-1改为A)     For k=list1.listcount-1 to 0 step -1B)   

42、0;  For k=0 to list1.listcountC)     For k=1 to list1.listcount-1D)     For k=1 to list1.listcount 二、          填空题（每空2分，共30分）请将每空的正确答案写在答题卡上

43、，答在试卷上不得分(1)某二叉树有5个度为2的结占以及3个度为1的结点，则该二叉树中共有【1】个结点。(2)程序流程图中的菱形框表示的是【2】(3)软件开发过程主要分为需求分析、设计、编码与测试四个阶段，其中【3】阶段产生软件需求规格说明书。(4)在数据库中，实体集之间的联系可以是一对一或一对多或多对多的，那么“学生”和“可选课程”的联系为【4】(5)人员基本信息一般包括：身份证号、姓名、性别、年龄等。其中可以作为主关键字的是【5】(6)工程中有Form1、Form2两个窗体，Form1窗体外观如图1所示，程序运行时在form1中名称为text1的文本框中输入一个值（圆的半径），然后单击命令按

44、钮“计算并显示”（其名称为command1），则显示form2窗体，且根据输入的圆的半径计算圆的面积，并在Form2的窗体上显示出来，如图2所示，如果单击命令按钮时，则文本框中输入的不是数值，则用信息框显示“请输入数值数据！，请填空：   图图Private Sub Command1_Click()If Text1.Text = "" ThenMsgBox "请输入半径"ElseIf Not IsNumeric(  

45、【6】)    thenMsgBox "请输入数值数据"Elsr = Val(【7】)Form2.Show【8】.Print"圆的面积是"& 3.14*r*rEnd IfEnd Sub (7)设有整型变量s，取值范围为0-100，表示学生的成绩。有如下程序段：If s > 90 Then  Level = "A"  

46、;ElseIf s >= 75 Then  Level = "B"  ElseIf s >= 60 Then  Level = "C"  Else  Level = "D"  End If  下面用Select case

47、0;结构改写上述程序，使两段程序所实现的功能完全相同，请填空：Private Sub Form_Load()   Select Case s    Case 【9】 >= 90      Level = "A"      Case 75 To 89      Level = "B"      Case 60 To 74      Level = "C"    Case 【10】