1、2006 年 9月国家二级（ VisualBasic）笔试真题试卷及答案与解析 1 下列选项中不符合良好程序设计风格的是 _。 （ A）源程序要文档化 （ B）数据说明的次序要规范化 （ C）避免滥用 goto语句 （ D）模块设计要保证高耦合、高内聚 2 从工程管理角度，软件设计一般分为两步完成，它们是 _。 （ A）概要设计与详细设计 （ B）过程控制 （ C）软件结构设计与数据设计 （ D）程序设计与数据设计 3 下列选项中不属于软件生命周期开发阶段任务的是 _。 （ A） 软件测试 （ B）概要设计 （ C）软件维护 （ D）详细设计 4 在数据库系统中，用户所见数据模式为 _。 （
2、A）概念模式 （ B）外模式 （ C）内模式 （ D）物理模式 5 数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和 _。 （ A）编码设计 （ B）测试阶段 （ C）运行阶段 （ D）物理设计 6 设有如下三个关系表 下列操作中正确的是 _。 （ A） T=RS （ B） R S （ C） T=RS （ D） T=R/S 7 下列叙述中正确的 _。 （ A）一个算法的空间复杂度大，则其时间复杂度也必定大 （ B）一个算法的空间复杂度大，则其时间复杂度必定小 （ C）一个算法的时间复杂度大，则其空间复杂度必定小 （ D）上述三种说法都不对 8 在长度为 64的有序线性表中进行顺序查找，最
3、坏情况下需要比较的次数为_。 （ A） 63 （ B） 64 （ C） 6 （ D） 7 9 数据库技术的根本目标是解决数据的 _。 （ A）存储问题 （ B）共享问题 （ C）安全问题， （ D）保护问题 10 对下列二叉树 进行中序遍历的结果 是_。 （ A） ACBDFEG （ B） ACBDFGE （ C） ABDCGEF （ D） FCADBEG 11 以下叙述中正确的是 _。 （ A）窗体的 Name属性指定窗体的名称，用来标识一个窗体 （ B）窗体的 Name属性值是显示在窗体标题栏中的文本 （ C）可以在运行期间改变窗体的 Name属性的值 （ D）窗体的 Name属性值可以为
4、空 12 以下叙述中错误的是 _。 （ A）打开一个工程文件时，系统自动装入与该工程有关的窗体文件 （ B）保存 Visual Basic程序时 ，应分别保存窗体文件及工程文件 （ C） Visual Basic应用程序只能以解释方式执行 （ D）窗体文件包含该窗体及其控件的属性 13 设 a=2， b=3， c=4，下列表达式的值是 _。 Nota =c Or 4*c=b2 And b a+C （ A） -1 （ B） 1 （ C） True （ D） False 14 设有如下的用户定义类型： Type Student number As String name As string age
5、 As Integer End Type 则以下正确引用该类型成员的代码是 _。 （ A） Student name=“李明 ” （ B） Dim s As Student s.name “李明 “ （ C） Dim s As Type Student s.name=“李明 “ （ D） Dim s As Type s.name=“李明 “ 15 设 a=5， b=6， c=7， d=8，执行下列语句后， x的值为 _。 x=IIf(ab)And(c d)， 10,20) （ A） 10 （ B） 20 （ C） True （ D） False 16 执行以下程序段后，变量 c$的值为 _。
6、a$ “Visual Basic Programming“ b$ “Quick“ c$ b$ & UCase(Mid$(a$， 7， 6) & Right$(d$,12) （ A） Visual BASIC Programming （ B） Quick Basic Programming （ C） QUICK Basic Programming （ D） Quick BASIC Programming 17 在窗体上画一个文本框 (其名称为 Text1)和一个标签 (其名称为 Labell)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程
7、是 _。 （ A） Private Sub Text1 Click() Labell.Caption=Text1.Text End Sub （ B） Private Sub Text1_Change() Labell.Caption=Text1.Text End Sub （ C） Private Sub Labell_Change() Labell.Caption=Text1.Text End Sub （ D） Private Sub Labell_Click() Labell.Caption=Text1.Text End Sub 18 在窗体上画一个命令按钮和一个标签，其名称分别为 Comm
8、and1和 Labell，然后编写如下事件过程： Private Sub Command1_Click() Counter 0 For i=1 To 4 For j 6 To 1 Step -2 Counter=Counter+1 Next j Next i Labell.Captidn=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是 _。 （ A） 11 （ B） 12 （ C） 16 （ D） 20 19 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1
9、 Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n n+1 If i 10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是_。 （ A） 5 （ B） 4 （ C） 3 （ D） 2 20 在窗体上画一 个命令按钮和两个标签，其名称分别为 Command1、 Label1和Label2，然后编写如下事件过程； Private Sub Command1_Click() a=0 For i=1 To 10 a=a+1 b=0 For j 1
10、 To 10 a=a+1 b=b+2 Next j Next i Label1.Caption=Str(A) Label2.Caption=Str(B)End Sub 程序运行后，单击命令按钮，在标签 Label1和 Label2中显示的内容分别是 _。 （ A） 10和 20 （ B） 20和 110 （ C） 200和 110 （ D） 110和 20 21 在窗体上画一个名称为 List1的列表框，一个名称为 Label1的标签，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名从列表框中消失，并在标签中显示出来。下列能正确实现上述操作的程序是 _。 （ A） Priva
11、te Sub List1_Click() Label1.Caption=List1.ListIndex List1.RemoveItem List1.Text End Sub （ B） Private Sub List1_Click() Label1.Name=List1.ListIndex List1.RemoveItem List1.Text End Sub （ C） Private Sub List1_Click() Label1.Cavtion=List1.Text List1.RemoveItem List1.ListIndex End Sub （ D） Private Sub Li
12、st1_Click() Label1.Name=List1.Text List1.RemoveItem List1.ListIndex End Sub 22 在窗体上画一个名称为 Command1的命令按钮，然后编写如下程序： Private Sub Command1 Click() Dim i As Integer,j As Integer Dim a(10,10)As Integer For i=1 To 3 For j 1 To 3 a(i,j) (i-1)*3+j Print a(i,j)； Next j Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的
13、是 _。 （ A） 1 2 3 2 4 6 3 6 9 （ B） 2 3 4 3 4 5 4 5 6 （ C） 1 4 7 2 5 8 3 6 9 （ D） 1 2 3 4 5 6 7 8 9 23 在窗体上画一个命令按钮，名称为 Command1，然后编写如下代码： Option Base() Private Sub Command1 Click() Dim A(4)As Integer,B(4)As Integer For k=0 To 2 A(k+1) InputBox(“请输入一个整数 ”) B(3-k) A(k+1) Next k Print B(k) End sub 程序运行后，单
14、击命令按钮，在输入对话框中分别输入2、 4、 6，输出结果为 _。 （ A） 0 （ B） 2 （ C） 3 （ D） 4 24 有以下程序： Option Base 1 Dim arr()As Integer Private Sub Form Click() Dim i As Integer,j As Integer ReDim arr(3， 2) For i 1 To 3 For j 1 To 2 arr(i,j) i*2+j Next j Next i ReDim Preserve arr(3,4) For j 3 To 4 arr(3,j) j+9 Next j Print arr(3
15、， 2)； arr(3， 4) End Sub 程序运行后，单击窗体，输出结果为 _。 （ A） 813 （ B） 013 （ C） 712 （ D） 00 25 以下叙述中正确的是 _。 （ A）一个 Sub过程至少要有一个 Exit Sub语句 （ B）一个 Sub过程必须有一个 End Sub语句 （ C）可以在 Sub过程中定义一个 Function过程，但不能定义 Sub过程 （ D）调用一个 Function过程可以获得多个返回值 26 有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i) 2*i Next i End Sub Priva
16、te Sub Command1_Click() Dim a(1 To 4)As Integer a(i) 5 a(2) 6 a(3) 7 a(4) 8 subP a() For i 1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为 _。 （ A） 2 4 6 8 （ B） 5 6 7 8 （ C） 10 12 14 6 （ D）出错 27 设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr=“ str
17、L=Len(xStr) i=1 Do While istrL/2 tStr tStr & Mid(xStr,i,1) & Mid(xStr,strL-i+1， 1) i i+1 Loop Fun=tStr End Function 在窗体上画一个名称为 Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程： Private Sub Command1_Click() Dim S1 As String S1=“abcdef“ Text1.Text=UCase(Fun(S1) End Sub 程序运行后，单击命令按钮，则 Text1中显示的是 _。 （ A） ABCDEF
18、 （ B） abcdef （ C） AFBECD （ D） DEFABC 28 在窗体上画一个名称为 TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(KeyAscii As Integer) End Sub 假定焦点已经位于文本框中，则能够触发 KeyPress事件的操作是 _。 （ A）单击鼠标 （ B）双击文本框 （ C）鼠标滑过文本框 （ D）按下键盘上的某个键 29 在窗体上画一个命令按钮和两个文本框，其名称分别为 Command1、 Text1和Text2，然后编写如下程序： Dim S1 As String,S2 As String
19、Private Sub Form_Load() Text1.Text “ Text2.Text “ End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2 & Chr(Keycode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1 “ S2 “ End S
20、ub 程序运行后，在 Text1中输入“abc”，然后单击命令按钮，在文本框 Text1和 Text2中显示的内容分别为 _。 （ A） abc和 ABC （ B） abc和 abe （ C） ABC和 abc （ D） ABC和 ABC 30 以下说法中正确的是 _。 （ A）任何时候都可以通过执行 “工具 ”菜单中的 “菜单编辑器 ”命令打开菜单编辑器 （ B）只有当某个窗体为当前活动窗体时，才能打开菜单编辑器 （ C）任何时候都可以通过单击标准工具栏上的 “菜单编辑器 ”按钮打开菜单编辑器 （ D）只有当代码窗口为当前活动窗口时，才能打开菜单编 辑器 31 在窗体上画一个通用对话框，其名
21、称为 CommonDialog1，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialog1.Filter=“All Files(*.*)|*.*|Text Files“&_ “(*.txt)|*.txt|Executable Files(*.exe)|*.exe“ CommonDialog1.FilterIndex=3 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个 “打开 ”对话框，此时在 “文件类型 ”框中显示
22、的是 _。 （ A） AllFiles(*.*) （ B） Text Files(*.txt) （ C） Executable Files(*.exe) （ D）不确定 32 以下叙述中错误的是 _。 （ A）一个工程中可以包含多个窗体文件 （ B）在一个窗体文件中用 Public定义的通用过程不 能被其他窗体调用 （ C）窗体和标准模块需要分别保存为不同类型的磁盘文件 （ D）用 Dim定义的窗体层变量只能在该窗体中使用 33 以下叙述中错误的是 _。 （ A）语句 “Dim a,b As Integer“声明了两个整型变量 （ B）不能在标准模块中定义 Static型变量 （ C）窗体层变
23、量必须先声明，后使用 （ D）在事件过程或通用过程内定义的变量是局部变量 34 设有语句： Open “d:Test.txt“ For Output As #1，以下叙述中错误的是 _。 （ A）若 d盘根目录下无 Test.txt文件，则该语句创建此文件 （ B）用该语句建立的文件的文件号为 1 （ C）该语句打开 d盘根目录下一个已存在的文件 Test.txt，之后就可以从文件中读取信息 （ D）执行该语句后，就可以通过 Print#语句向文件 Test.txt中写入信息 35 以下叙述中错误的是 _。 （ A）顺序文件中的数据只能按顺序读写 （ B）对同一个文件，可以用不同的方式和不同的
24、文件号打开 （ C）执行 Close语句，可将文件缓冲区中的数据写到文件中 （ D）随机文件中各记录的长度是随 机的 36 下列软件系统结构图的宽度为【 】。 37 【 】的任务是诊断和改正程序中的错误。 38 一个关系表的行称为【 】。 39 按 “先进后出 ”原则组织数据的数据结构是【 】。 40 数据结构分为线性结构和非线性结构，带链的队列属于【 】。 41 描述 “X是小于 100的非负整数 ”的 Visual Basic表达式是【 】。 42 在窗体上有一个名称为 Command1的命令按钮和一个名称为 Text1的文本框。程序运行后， Command1为禁用 (灰色 )，此时如果在
25、文本框中输入字符，则命令按钮 Command1变为可用。请填空。 Private Sub Form_Load() Command1.Enabled=False End sub Private Sub Text1_【 】 () Command1.Enabled=Tree End Sub 43 在窗体上画一个名称为 “Command1”的命令按钮。然后编写如下事件过程 Private Sub Command1 Click() Dim a As String a “123456789“ For i=1 To 5 Print Space(6-i)； Mid$(a，【 】， 2*i-1) Next i
26、End Sub 程序运行后，单击命令按钮，窗体上的输出结果是 5 456 34567 2345678 123456789 请填空。 44 在窗体上画一个名称为 Combol的组合框，然后画两个名称分别为 Label1、Label2，标题分别为 “城市名称 ”和空白的标签。程序运行后，在组合框 中输入一个新项目并按回车键，如果输入的项目在组合框的列表中不存在，则自动将其添加到组合框的列表中，并在 Label2中给出提示 “已成功添加新输入项。 ”，如图所示。如果输入的项目已存在，则在 Label2中给出提示 “输入项已在组合框中。 ”。请填空。 Private Sub Combo1_KeyPre
27、ss(KeyAscii As Integer)If KeyAscii=13 ThenFor i 0 To Combo1.ListCount-1If Combo1.Text=【 】ThenLabel2.Caption=“输入项已在组合框中。 “Exit SubEnd IfNext iLabel2.Caption=“已成功添加新输入项。 “Combo1.【 】 Combo1.TextEnd IfEnd Sub 45 在窗体上画一个命令按钮和一个文本框，其名称分别为 Command1和 Text1，然后编写如下事件过程： Private Sub Command1_Click() Dim inData
28、 As String Text1.Text=“ Open“d:myfilE txt“ For【 】 As#1 Do While【 】 Input #1,inData Text1.Text=Text1.Text+inData Loop Close#1 End Sub 程序的功能是，打开 D盘根目录下的文本文件 myfilE txt，读取它的全部内容并显示在文本框中。请填空。 46 以下程序的功能是：将一维数组 A中的 100个元素分别赋给二维数组 B的每个元素并打印出来，要求把 A(i)到 A(10)依次赋给 B(1， 1)到 B(1， 10)，把 A(11)到A(20)依次赋给 B(2， 1)
29、到 B(2， 10)， ，把 A(91)到 A(100)依次赋给 B(10， 1)到 B(10， 10)。请填空。 Option Base 1 Private Sub Form_Click() Dim i As Integer， j As Integer Dim A(1 To 100)As Integer Dim B(1 To 10,1 To 10)As Integer For i=1 To 100 A(i)=Int(Rnd*100) Next i For i=1 To【 】 For j 1 To【 】 B(i,j)【 】 Print B(i,j)； Next j Print Next i E
30、nd Sub 2006 年 9月国家二级（ VisualBasic）笔试真题试卷答案与解析 1 【正确答案】 D 【试题解析】 良好的程序设计风格可以使程序结构清晰合理，使程序代码便于维护，因此，程序设计风格对保证程序的质量很重要。主要应注意和考虑下述一些因素： 1、源程序要文档化： 2、数据说明的次序要规范化； 3、语句的结构应该简单直接，不应该为提高效率而把语句复杂化，避免滥用 goto语句。模块设计要保证低耦合、高内聚。 2 【正确答案】 A 【试题解析】 从工程管理角度看，软 件设计分为两步完成：概要设计与详细设计。概要设计 (又称结构设计 )将软件需求转化为软件体系结构、确定系统级接
31、口、全局数据结构或数据库模式；详细设计确立每个模块的实现算法和局部数据结构，用适当方法表示算法和数据结构的细节。 3 【正确答案】 C 【试题解析】 软件生命周期分为软件定义、软件开发及软件维护。其中软件开发阶段的任务中软件设计阶段可分解成概要设计阶段和详细设计阶段；软件维护不属于软件开发阶段。 4 【正确答案】 B 【试题解析】 数据库管理系统的三级模式结构由外模式、模式和内模式组 成。外模式，或子模式，或用户模式，是指数据库用户所看到的数据结构，是用户看到的数据视图。模式，或逻辑模式，是数据库中对全体数据的逻辑结构和特性的描述，是所有用户所见到的数据视图的总和。外模式是模式的一部分。内模式
32、，或存储模式，或物理模式，是指数据在数据库系统内的存储介质上的表示，即对数据的物理结构和存取方式的描述。 5 【正确答案】 D 【试题解析】 数据库设计方法和步骤：需求分析、概念设计、逻辑设计和物理设计的相关策略 数据库设计分为以下 6个设计阶段：需求分析阶段、概念设计阶段、逻辑设计阶段、物 理设计阶段、实施阶段及数据库运行和维护阶段。 6 【正确答案】 C 【试题解析】 从图中可以看出，关系 T是关系 R和关系 S 的简单扩充，而扩充的符号为 x，所以答案为 T=RS。 7 【正确答案】 D 【试题解析】 算法的复杂度主要包括时间复杂度和空间复杂度：算法在运行过程中需辅助存储空间的大小称为算
33、法的空间复杂度；算法的时间复杂度是指执行算法所需要的计算工作量，即算法执行过程中所需要的基本运算次数，为了能够比较客观地反映出一个算法的效率，在度量一个算法的工作量时，不仅应该与所使用的计算机、程 序设计语言以及程序编制者无关，而且还应该与算法实现过程中的许多细节无关。为此，可以用算法在执行过程中所需基本运算的执行次数来度量算法的工作量。 8 【正确答案】 B 【试题解析】 在进行顺序查找过程中，如果线性表中的第 1个元素就是被查找元素，则只需做一次比较就查找成功，查找效率最高：但如果被查找的元素是线性表中的最后一个元素，或者被查找的元素根本就不在线性表中，则为了查找这个元素需要与线性表中所有
34、的元素进行比较，这是顺序查找的最坏情况。所以对长度为 n的线性表进行顺序查找，在最坏情况下需要比较 n次。 9 【正确答案】 B 【试题解析】 由于数据的集成性使得数据可为多个应用所共享，特别是在网络发达的今天，数据库与网络的结合扩大了数据关系的应用范围。数据的共享本身又可极大地减少数据冗余性，不仅减少了不必要的存储空间，更为重要的是可以避免数据的不一致性。因此，数据库设计的根本目标是要解决数据共享问题。 10 【正确答案】 A 【试题解析】 二叉树的中序遍历指在访问根结点、遍历左子树与遍历右子树这三者中，首先遍历左子树，然后访问根结点，最后遍历右子树；并且遍历左、右子树时，仍然先遍历左子树
35、，然后访问根结点，最后遍历右子树。 11 【正确答案】 A 【试题解析】 Caption 属性：窗体的 Caption 属性值是显示在窗体标题栏中的文本； Name属性：窗体的 Name属性是只读属性，即只可以通过属性窗口改变属性值，在运行时不能改变 Name的属性值， Name的属性值也不能为空。 12 【正确答案】 C 【试题解析】 Visual Basic 应用程序可以以解释方式执行，也可以编译成可执行文件执行。 13 【正确答案】 D 【试题解析】 当有多类运算符时，要先处理算术运算 符，接着处理关系运算符，最后处理逻辑运算符。根据算术运算符的优先级的关系，该表达式应先计算b2，结果为
36、 9。然后计算 4*c，结果为 16。然后计算 a+c，结果为 6。关系运算符都属同级关系，没有先后之分。计算 a c，即 2 4，结果为 True。然后计算4*c=b2，即 16=9，结果为 False。然后计算 b a+c，即 3 6，结果为True。根据逻辑运算符的优先级的关系，该表达式应先计算 Nota c，即 Not True，结果为 False。然后计算 4*c=b2 And b a+c，即 False And True结果为 False。最后计算 False Or False，结果为 False。 14 【正确答案】 B 【试题解析】 题目中所给出的是用户自定义类型，在这里注意新
37、类型的名称是Student，所以选项 CD 均不正确；对于类型成员的引用是：对象，属性 (方法 )，所以选项 A不正确。 15 【正确答案】 B 【试题解析】 函数 IIF(expr,val1,val2)与 IF语句相似，当布尔表达式 expr为True时，则选择 val1的值，否则选择 val2的值。 16 【正确答案】 D 【 试题解析】 首先使用 Mid$函数取出带前导空白的 Basic，并使用 UCase将其转化为大写。然后使用 Right$函数取出带前导空白的 Programming。最后将三个字符串连接起来，结果就是选项 D。 17 【正确答案】 B 【试题解析】 TextBox
38、控件中， Text属性是用来显示文本内容的。 Change事件是在 TextBox控件的 Text内容发生改变时触发。 Click事件是在用户鼠标单击文本时触发。 18 【正确答案】 B 【试题解析】 在 For 循环中， Step 是用于指定计数器的步长， 本题中是 -2，就是每执行一次循环后， j的值减 2。程序共有两层循环，当外层循环执行第一次时， j从 6开始执行循环，当 j 0时，结束循环，此时 Counter 1 1+1 3。而外循环一共要执行 4次，所以 Counter 3 3 3 3 120 19 【正确答案】 C 【试题解析】 当执行第一次循环时 i的值为 i=i+3，所以
39、i的值增加 3：当执行第二次循环时，在 For i=0 To 50语句中 i的值增加 1，而在 i=i+3 语句中 i的值增加3，所以在第二次循环时 i的值增加 4；以后每次循环 i的值都增加 4，当 i 10时循环退出，故循环只能被执行 3次，则 n值为 3。 20 【正确答案】 D 【试题解析】 程序共有两层循环，当外层循环执行第一次时， j从 1开始执行循环，当 j 11时，结束循环，此时 a 11， b=20；当外层循环执行第二次时， b的初始值被赋予 0，而 a的初始值却为 11， j依然从 1开始执行循环，当 i 11时，结束循环，此时 a=22， b=20，依此类推，当外层循环执
40、行第十次时，此时a=110， b=20。 21 【正确答案】 C 【试题解析】 List 控件中 ListIndex属性表示当前选中项目的 索引， Text属性表示当前选中项目的内容， RemoveItern 方法表示删除列表项； Label 控件的 Name属性表示控件的名称， Caption 属性表示 Label 控件显示的内容。 22 【正确答案】 D 【试题解析】 程序共有两层循环，每执行完一次内循环，则打印换行，当外层循环执行第一次时， a(i,j) (i-1)*3+j相当于 a(1,j) j，由此判断选项 A， D可能正确，当外层循环执行第二次时， a(i,j) (i-1)*3+j
41、，相当于 a(2,j) 3+j，由此可判断选项 D为正确答案。 23 【 正确答案】 B 【试题解析】 程序共有一层循环，当循环执行第一次时， B(3-k) A(k+1)，即B(3) A(1) 2；当循环执行第二次时， B(2) A(2) 4；当循环执行第三次时，B(1) A(3) 6。此时结束循环，执行 Print B(k)，即 Print B(3)，故输出结果为2。 24 【正确答案】 A 【试题解析】 ReDim语句的功能是为动态数组变量重新分配存储空间。而Preserve的功能是当改变原有数组最末维的大小时，使用此关键字可以保持数组中原来的数据。从题目可以看出， 第一个 For 循环是
42、为 3行 2列的数组赋值，而第二个 For循环是为第 3行的第 3、 4列赋值。而 arr(3,2) i*2+j 3*2+2 8，arr(3,4) j+9 4+9 13，故输出结果为 8、 13。 25 【正确答案】 B 【试题解析】 Sub过程以 Sub语句开头，结束于 End Sub语句，因此一个 Sub过程必须含有一个 End Sub 语句，但是 Exit Sub 时可选的，而不是必需的，是否需要根据情况而定。在 Sub过程中不可以再定义 Sub过程或 Function 过程。在函数过程中，过程的返回值只有一个。 26 【正确答案】 A 【试题解析】 过程 SubP的参数 b()是按地址
43、传递的 (ByRef,数组的传递方式 )，而subP过程用语句 subP a()调用后，形参 b()的值为 b(1) 2， b(2) 4， b(3) 6， b(4) 8，则实参 a()的值亦为以上值。 27 【正确答案】 C 【试题解析】 Mid(字符串， p， n)；从第 p个字符开始，向后截取 n 个字符。 p和 n 都是算术表达式。 “&”：字符串连接运算符，将两个字符串按顺序连接起来。 UCase(字符串 )：将字符串所有的字母都转换成大写字符。 Len(字符串 )：返回字符串的长度。 分析程序：当 Fun 过程用语句 Fun()调用后， S1 的值 “abcdef”被赋给 xStr，
44、执行第一次循环时 Mid(xStr,i,1)相当于 Mid(xStr,1， 1)， Mid(xStr,strL-i+1， 1)相当于Mid(xStr,6,1)，此时 tStr=AF，由此判断选项 C正确。 28 【正确答案】 D 【试题解析】 KeyPress 事件用来识别按键的 ASCII码，从而识别键盘上某个键的按下与释放。 29 【正确答案】 C 【试题解析】 KeyPress事件是处理用户按键的事件过程，当用户按键时激发该事件。 KeyDown 事件也是在用户按下按键时发生。但是 KeyDown 事件过程的KeyCode参数与 KeyPress 事件的 KeyAscii 参数不同。对于
45、 KeyPress 事件的KeyAscii 参数来说，小写状态下按 A键返回 97，而对于 KeyDown 事件过程的KeyCode参数来说返回 65，由此可判断选项 C为正确答案。 30 【正确答案】 B 【试题解析】 当代码窗口为当前活动窗口时， “工具 ”菜单中的 “菜单编辑器 ”命令和标准工具栏上的 “菜单编辑器 ”按钮都 为禁用 (灰色 )，只有当某个窗体为当前活动窗体时，才能打开菜单编辑器。 31 【正确答案】 C 【试题解析】 从程序可见 FilterIndex 属性已经设为 3，所以缺省过滤器为* exe。 32 【正确答案】 B 【试题解析】 在 个窗体文件中用 Public
46、定义的通用过程称为公有过程，公有过程可以被应用程序中的任一过程调用。 33 【正确答案】 A 【试题解析】 在 VB中不能用一个 AS 定义多个变量，故变量 a不是 Integer型，而是 Variant型。 34 【正确答案】 C 【试题解析】 Open “d:Test.txt“ For Output As #1 打开 D盘根目录中的 Test.txt文件，如果 Test.txt文件不存在，则建立一个新文件，可以将数据写到文件中去；如果 Test.txt 文件已存在，则该语句打开已存在的文件，原来的数据将被覆盖。 35 【正确答案】 D 【试题解析】 随机文件是由一组长度相等的记录组成，因此
47、随机文件的记录是定长的。 36 【正确答案】 3 【试题解析】 软件系统结构图的宽度：整体控制跨度 (最大模块数的层 )的表示。 37 【正确答案】 程序调试 【试题解析】 程序调试的任务是诊断和改正程序中的错误。它与软件测试不同，软件测试是尽可能多地发现软件中的错误。先要发现软件的错误，然后借助于一定的调试工具去找出软件错误的具体位置。软件测试贯穿整个软件生命期，调试土要在开发阶段。 38 【正确答案】 元组 【试题解析】 设计数据库的目的实质上是设计出满足实际应用需求的实际关系模型；关系中的行称为元组，对应存储文件中的记录，关系中的列称为属性，对应存储文件中的字段。 39 【正确答案】 栈 【试题解析】 栈和队列都是一种特殊的操作受限的线性表，只允许在端点处进行插入和删除。二者的区别是，栈只允许在表的一端进行插入或删除操作，是一种“先进后 ”的线性表；而队列只允许在表的一端进行插入操作，在另一端进行删除操作，是一种 “先进先出 ”的线性表。 40 【正确答案】 线性结构 【试题解析】 与栈类似，队列也是线性表，也可以
