[计算机类试卷]VB笔试模拟试卷33及答案与解析.doc

《[计算机类试卷]VB笔试模拟试卷33及答案与解析.doc》由会员分享，可在线阅读，更多相关《[计算机类试卷]VB笔试模拟试卷33及答案与解析.doc（23页珍藏版）》请在麦多课文档分享上搜索。

1、VB 笔试模拟试卷 33 及答案与解析 1 算法的空间复杂度是指 （ A）算法程序的长度 （ B）算法程序中的指令条数 （ C）算法程序所占的存储空间 （ D）算法执行过程中所需要的存储空间 2 使用链表来表示线性表的优点是 （ A）便于插入和删除操作 （ B）数据元素的物理顺序与逻辑顺序相同 （ C）花费的存储空间较顺序存储少 （ D）便于随机存取 3 设一棵树 T的度为 4，其中度为 1， 2， 3， 4的结点个数分别为 4， 2， 1， 1。则T中的叶子结点为 （ A） 8 （ B） 7 （ C） 6 （ D） 5 4 对长度为 n的线性表进行顺序查找，在最坏的情况下所需要的比较次数为

2、（ A） log2n （ B） n/2 （ C） n （ D） n+1 5 对数据元素序列 (49， 72， 68， 13， 38， 50， 97， 27)进行排序，前 3趟排序结束时的结果依次为，第 1趟： 13， 72， 68， 49， 38， 50， 97， 27：第 2趟： 13， 27，68， 49， 38， 50， 97， 72；第 3趟： 13， 27， 38， 49， 68， 50， 97， 72。该排序采用的方法是 （ A）插入排序法 （ B）选择排序法 （ C）冒泡排序法 （ D）快速排序法 6 源程序的文档化不包括 （ A）符号名的命名要有实际意义 （ B）正确的文档格式

3、 （ C）良好的视觉组织 （ D）正确的程序注释 7 在软件生命周期中，所花费用最多的阶段是 （ A）详细设计 （ B）软件编码 （ C）软件测试 （ D）软件维护 8 软件调试的目的是 （ A）发现错误 （ B）改正错误 （ C）改善软件的性能 （ D）挖掘软件的潜能 9 数据独立性是数据库技术的重要特点之一。所谓数据独立性是指 （ A）数据与程序独立存放 （ B）不同的数据被存放在不同的文件中 （ C）不 同的数据只能被对应的应用程序所使用 （ D）以上三种说法都不对 10 用树形结构来表示实体之间联系的模型称为 （ A）关系模型 （ B）网状模型 （ C）层次模型 （ D）以上三个都是

4、11 与传统的程序设计语言相比， Visual Basic最突出的特点是 （ A）结构化程序设计 （ B）程序开发环境 （ C）程序调试技术 （ D）事件驱动编程机制 12 假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应该执行的操作是 （ A）单击窗体内没有控件的地方 （ B）单击任一个控件 （ C）不执行任何操作 （ D）双击窗体的标题栏 13 下面是窗体的 4个属性，在界面设计时，改变属性值而看不到窗体变化的是 （ A） Top （ B） Width （ C） Left （ D） Enabled 14 Visual Basic中的对话框分为 3种类

5、型，即预定义对话框、自定义对话框和 （ A）列表框 （ B）图片框 （ C）通用对话框 （ D）文本框 15 在窗体上按顺序，分别画出变量按钮 Command1、文本框 Text1和 Text2。为了将 Text2的 Tab顺序设置为第一 ，应将 Text2的 TabIndex属性设置为 （ A） 0 （ B） 1 （ C） 2 （ D） 3 16 语句 Print Sgn(-62)+Abs(62)+Int(-62)的输出结果是 （ A） -36 （ B） 1 （ C） -1 （ D） -72 17 在窗体上画一个名称为 List1的列表框，一个名称为 Labell的标签，在列表框中显示若干项

6、内容。当单击列表框中的某项内容时，该项内容能在标签中显示出来。下列能够正确实现上述功能的程序是 （ A） Private Sub List1_Click() Labell Caption=List1 ListIndex End Sub （ B） Private Sub List1_Click() Labell Name=List1 ListIndex End Sub （ C） PrivateSubListl click() Labell Name=List1 Text End Sub （ D） Private Sub List1_Click() Labell Caption=List1 Tex

7、t End Sub 18 关于多重窗体应用程序，以下描述不正确的是 （ A）对于多重窗体应用程序，可以有多个当前窗体 （ B）多重窗体应用程序的启动窗体可以在设计时设置 （ C）多重窗体应用程序中的每个窗体作为一个磁盘文件保存，所有窗体、标准模块等作为一个工程文件被保存 （ D）多重窗体应用程序可以编译生成一个 EXE文件 19 用菜单编辑器创建菜单时，如果要在一个菜单中添加一条分隔线，正确的操作是 （ A）在标题输入框中输入 “-”(减号 ) （ B）在名称输入框中输 入 “-”(减号 ) （ C）在标题输入框中输入 “_”(下划线 ) （ D）在名称输入框中输入 “_”(下划线 ) 20

8、将窗体的 KeyPreview属性设置为 True，然后编写如下过程： Private Sub Form KeyDown(KeyCode As Integer， Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer， Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后，如果按 “A”键，则输出的结果为 （ A） A A （ B） A B （ C） A C （ D） A D 21 为了使标签中的内容居中显示，应将 Align

9、ment属性设置为 （ A） 0 （ B） 1 （ C） 2 （ D） 3 22 以下语句的输出结果是 Print Format$(587567， “0.00E-00“) （ A） 5874.57 （ B） 5.87456E03 （ C） 5874.567 （ D） 5.87E03 23 在 Visual Basie中，要遍历一个对象集合中的元素，应使用的语句是 （ A） For Next （ B） ForEach Next （ C） With End With （ D） DoLoop 24 要暂时关闭计时器，应将计时器的某个属性设置为 False，这个属性是 （ A） Visible （ B

10、） Timer （ C） Enabled （ D） Interval 25 以下叙述错误的是 （ A）如果过程被定义为 Static类型，则该过程中的局部变量都是 Static类型 （ B） Sub过程中不能嵌套定义 Sub过程 （ C） Sub过程中可以嵌套调用 Sub过程 （ D） Static类型用于定义变量，不能定义过程 26 在窗体上画一个文本框 (Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(U

11、case(char) Print String(4， KeyAscii) End Sub 程序运行后，在文本框 Text1中输入 A，则程序在窗体上的输出结果为 （ A） a （ B） A （ C） aaaa （ D） AAAA 27 在窗体上画一个名称为 Commandl的命令按钮。有下列程序： Option Base 1 Private Sub Command1_Click() Dim a a=Array(45， 27， 34， 24， 91， 37，11， 67， 82， 63) For i = 1 To 9 For i = i + 1 To 10 If a(i) a(j)Then a1

12、 = a(i) a(i) = a(j) a(j) = a1 End If Next j Next i For i = 1 To 10 Print a(i) Next i End Sub 程序运行后，单击命令按钮，则窗体上第 2行和第 3行显示的内容是 （ A） 27和 34 （ B） 34和 24 （ C） 45和 63 （ D） 24和 27 28 在窗体上画一个名称为 Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim n As Integer For n = 0 To 9 Step 3 Print rel(n)； Next

13、 n End Sub Private Function rel(ByVal i As Integer)As Integer Dim x As Integer x = 0 For j = 1 To i If i 5 Then rel = i： EXit Function x = x + i Next i rel = x End Function 程序运行后，单击命令按钮，则窗体上显示的内容是 （ A） 1 3 5 7 （ B） 2 8 14 53 （ C） 0 3 21 45 （ D） 0 5 11 34 29 在窗体上画一个名称为 Commandl的命令按钮，然后编写如下事件过程： Priva

14、te Sub Command1_Click() y = 8 Print fun1(1 + fun1(fun1(fun1(y)*10) End Sub Private FLinctiOn fUnl(A)funl(A)= 1 + a End Function 程序运行后，单击命令按钮，则窗体上显示的内容是 （ A） 112 （ B） 2 （ C） 909090 （ D） 1001 30 编写如下程序： Private Sub Command1_Click() x=“abcd“ y=“1234“ For i=1 To 4 z=z+Mid(x， i， 1)+Left(y， 1) Next i Prin

15、t z End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 （ A） abcd1234 （ B） a1b2c3d4 （ C） a1b1c1d1 （ D） 1234abcd 31 在运行时，按 Tab键跳过了一个可以获得焦点的控件 (如文本框 )，则可能是因为 （ A）该控件的 TabStop属性值为 True （ B）该控件的 TabStop属性值为 False （ C）该控件的 Enabled属性值为 True （ D）该控件的 Enabled属性值为 False 32 在窗体上画一个命令按钮 ，其名称为 Command1，然后编写如下程序： Option Base 1 Priv

16、ate Sub Command1_Click() Dim a As Variant a=Array(1，2， 3， 4) j=1 For i=4 To 1 Step -1 s = s + a(i)* j j = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按 钮，其输出的结果为 （ A） 4321 （ B） 12 （ C） 34 （ D） 1234 33 在窗体上画一个命令按钮 (其 Name属性为 Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a(4， 4) For

17、 i=1 To 4 For i=1 To 4 a(i， j)=(i-1)*3 + i Next j Next i For i=3 To 4 For j=3 To 4 Print a(j， i)； Next j Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容为 （ A） 6 9 7 10 （ B） 7 10 8 11 （ C） 8 11 9 12 （ D） 9 12 10 13 34 在窗体上画一个文本框，然后编写如下代码： Option Base 1 Private Sub Form_Click() Dim arr Dim Start As Integer， Fin

18、ish As Integer Dim Sum As Integer arr=Array(12， 4， 8， 16) Start=Lbound(arr) Finish=Ubound(arr) Sum=0 For i=Start To Finish Sum=Sum+arr(i) Next i c=Sum/Finish Text1 Text=c End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 （ A） 40 （ B） 10 （ C） 12 （ D） 16 35 在窗体上画一个命令按钮，然后编写如下程序： Function funl(ByVal Bum As Long)As Long

19、Dim k As Long k = 0 Bum=Abs(Bum) Do While Bum k=k+(Bum Mod 10) Bum=Bum10 Loop fun1=k End Function Private Sub Command1_Click() Dim n As Long n=InputBox(“请输入一个数 “) Print fun1(n) End Sub 程序运行后，单击命令按钮，在对话框中输入 234，输出的结果为 （ A） 3 （ B） 4 （ C） 9 （ D） 10 36 在一棵二叉树中，度为 0的结点的个数为 n0，度为 2的结点的个数为 n2，则有n0=【 】。 37

20、实现算法所需的存储单元多少和算法的工作量大小分别称为算法的【 】。 38 软件结构中各模块之间相互连接关系的一种度量常称为模块的【 】。 39 数据结构包括数据的逻辑结构、数据的【 】以及对数据的操作运算。 40 在数据库的三级模式体系结构中，模式与内模式之间的映像 (模式 /内模式 )实现了数据库的【 】独立性。 41 为了使计时器控件 Timer1每隔 0.5s触发一次 Timer事件，应将 Timer1控件的Interva1属性设置为【 】。 42 下列程序的功能是求出所有的 1 100之间的孪生素数。孪生素数是指两个素数的差为 2，如 3和 5， 11和 13等，请填空。 Privat

21、e Sub Form_Click() Dim i As Integer For i=3 To 97 Step 2 If【 】 Then Print i， i+2 End If Next i End Sub Public Function prime(ByVal n As Integer)As Boolean Dim i As Integer For i=2 To n-1 If【 】 Then Exit For End If Next i If i=n Then prime=True Else prime=False End If 43 下列程序的功能是：单击窗体时将随机生成 10个 1 100

22、之间的数，求出它们的总和 及平均数。请填空。 Option Base 1 Private Sub Form_Click() Dim a(10)As Integer,i As Integer Dim sum As Integer,aver As Single 【 】 For i=1 To 10 a(i)=Int(100*Rnd)+1 sum=sum+a(i) Next i 【 】 Print sum,aver End Sub 44 下列程序的作用是：输入一个字符串，将其逆序输出。 说明：在窗体上放置两个文本框控件，其名称分别为 Text1和 Text2，分别存放输入的字符串和逆序后的字符串，单击

23、窗体上的 Command1按钮，将把 Text1中输入的字符串反序后输出到Text2中。程序运行时的界面如图 20-14所示。 Private Sub Command1_Click() Dim y As String， S As String S=Text1 Text 【 】 TextText=y End Sub Private Sub Rever(S As String,y As String) Dim i As Integer y=“ “ For i=Len(S) To 1 Step-1 y=y&【 】 Next i End Sub 45 下列程序实现的功能是：从键盘上输入 10个整数，并

24、把它们写到 “D： ”盘“a1 dat”文 件中，然后从中读出第 5个数并输出。 Private Sub Form_Click() Dim k As Integer Dim n As Integer， i As Integer n=Len(k) Open【 】 As#10 Len=n For i=1 To 10 k=InputBox(“请输入一个整数 “) 【 】 Next i 【 】 Get #10， k Print k End Sub VB 笔试模拟试卷 33 答案与解析 1 【正确答案】 D 【试题解析】 一个算法的空间复杂度是指执行这个算法所需的存储空间。一个算法所占用的存储空间包括算

25、法程序所占的空间、输入的初始数据所占的空间以及算法执行过程中所需要的额外空间。 2 【正确答案】 A 【试题解析】 线性表的链式存储是用一组任意的存储空间来存放数据元素，链表结点空间是动态生成的，其特点是逻辑上相邻的元素在物理位置上不一定相邻，因此需要另外开辟空间来保存元素之间的关系，花费的存储空间 较顺序存储多。访问只能沿指针方向顺序访问，不能随机存取。在链表中插入或删除结点，只需修改指针，不需要移动元素。 3 【正确答案】 A 【试题解析】 设这棵树中叶子结点数为 n0，度为 1的结点数为 n1，度为 2的结点数为 n2，度为 3的结点数为 n3，度为 4的结点数为 n4，总结点数为 n，

26、则 n=n0+n1+n2+n3+n4 (1) 设树的总入度为 m。由于在树中除了根结点外，其余每一个结点都有唯一的一个分支进入，则树的总结点数为 n=m+1 (2) 又由于树中这 m个进入分支分别由 非叶子结点射出，其中度为 1的结点射出 1，度为 2的结点射出 2，依此类推。而且射出分支总数与总的进入分支数相等，即 m=n1+2n2+3n3+4n4 (3) 由式 (1)、 (2)、 (3)可以得到 n0=n2+2n3+3n4+1=2+21+31+1=8。 4 【正确答案】 C 【试题解析】 对线性表进行顺序查找时，从表中的第一个元素开始，将给定的值与表中逐个元素的关键字进行比较，直到两者相符

27、，查到所要找的元素为止。在最坏的情况下，要查找的元素是表的最后一个元素或查找失败，这两种情况都 将与表中所有元素进行比较，因此比较次数为 n。 5 【正确答案】 B 【试题解析】 简单选择排序法的思想是：扫描整个线性表，从中选出最小 (或最大 )的元素，将它交换到表的最前面；然后对剩下的子表采用同样的方法，直到子表空为止。从序列变化情况可以看出，第 1趟是找出最小元素 13，第 2趟是找出次小元素 27，第 3趟是找出第三小元素 38，这是典型的简单选择排序法。 6 【正确答案】 B 【试题解析】 源程序的文档化主要包括： 符号名的命名应具有一定的实际含义，以便理解程序功能： 正确的程序注释；

28、 良好 的视觉组织，在程序中利用空格、空行、缩进等技巧使程序层次清晰。 7 【正确答案】 D 【试题解析】 软件生命周期可分为软件定义、软件开发及软件运行维护 3个阶段。详细设计、软件编码和软件测试都属于软件开发阶段；软件维护是软件生命周期的最后一个阶段，也是持续时间最长，花费代价最大的一个阶段，软件工程学的一个目的就是提高软件的可维护性，降低维护的代价。 8 【正确答案】 B 【试题解析】 在对程序进行测试时会发现错误，这就要进行程序调试 (排错 )。程序调试活动由 3部分组成：一是错误定位，根据错误 的外部表现形式，确定程序中出错的位置，找出错误的内在原因。二是对程序进行修改，排除这个错误

29、。三是进行回归测试，防止引进新的错误。所以程序调试的目的就是诊断和改正程序中的错误。软件调试不能改善软件的性能，也不能挖掘软件的潜能。 9 【正确答案】 D 【试题解析】 数据独立性是数据与程序间的互不依赖性，即数据库中数据独立于应用程序而不依赖于应用程序。也就是说，数据的逻辑结构、存储结构与存取方式的改变不会影响应用程序。数据独立性一般分为物理独立性与逻辑独立性两种。所以选项 A、 B、 C所描述的都不是数据独 立的概念。 10 【正确答案】 C 【试题解析】 关系模型是用二维表来表示实体之间的联系；网状模型是用无向图来表示实体之间联系；层次模型是用树形结构来表示实体之间联系。所以，选项C是

30、正确的。 11 【正确答案】 D 【试题解析】 传统的程序设计语言是面向过程的，但一般都可以实现结构化程序设计，有的也提供了较完善的集成开发环境和程序调试技术，但它们基本上都没有事件驱动编程机制。与这些语言相比， Visual Basic最突出的特点就是事件驱动编程机制。 12 【正确答案】 A 【试 题解析】 单击窗体内没有控件的地方，能使得窗体成为当前的活动对象。 13 【正确答案】 D 【试题解析】 Enabled 属性用于触发或禁止。每个对象都有一个 Enabled 属性，可以被设置为 True或者 False，分别用来触发或禁止该对象。对于窗体，该属性一般设置为 True，但为了避免

31、鼠标或键盘事件发送到某个窗体，也可以设置为False。 14 【正确答案】 C 【试题解析】 CommonDialog(通用对话框 )控件在 Visual Basic 和 Microsoft Windows 动态链接库 commd1g dll 的例程之间提供了一个接口。在应用程序中要使用 CommonDialog(通用对话框 )控件，应该将其添加到窗体中并设置其属性。 15 【正确答案】 A 【试题解析】 在设计阶段可以通过属性窗口中的 TabIndex 属性来改变 Tab顺序，当将其设置为 0时，可使该控件的 Tab顺序设置为第一。 16 【正确答案】 C 【试题解析】 Sgn(-62)的返

32、回值为 -1； Abs (62)的返回值为 36； Int(-62)的返回值为 -36。其计算结果为 -1。 17 【正确答案】 D 【试题解析】 给出的 4个选项都是列表框的 Click事件过程。当单击列表框中的某一项时，将发生单击事件，同时选择一个列表项，这个列表项可以用列表框的Text属性来表示，也就是说， List1 Text就是所选择的项目。此外，为了在标签中显示所选择的列表项，必须使用列表框的标题属性，即 Labell Caption。因此，正确的语句应是： Labell Caption=List1 Text在 Visual Basic中，不能在运行期间改变控件或窗体的名称 (Na

33、me属性 )，因此选项 B 和选项 C都是错误的：而列表框的 ListIndex 属性是所选择的列表项位置，即列表项的标题，不是列表项本身。 18 【正确答案】 A 【试题解析】 对于多重窗体应用程序，当前窗体只能有一个。 19 【正确答案】 A 【试题解析】 如果要在一个菜单中添加一条分隔线，正确的操作是在标题输入框中输入 “-”(减号 )。 20 【正确答案】 C 【试题解析】 在按下 A键的操作过程中，先触发 KeyDown 事件，再触发 KeyUp事件，最终在窗体上显示的是 A和 C。 21 【正确答案】 C 【试题解析】 Alignment属性用来确定标签中标题的放置方式，设置为 0

34、表示从标签的左边开始显示标题 (默认 )； 1表示标题靠右显示； 2表示标题居中显示。 22 【正确答案】 D 【试题解析】 在使用 Formats函数使数值按 “格式字符串 ”指定的格式输出时，符号 “E+”或 “E-”表示将用指数形式显示数值，两者作用基本相同。按 “0.00E-00”的输出格式，选项 D是正确的。 23 【正确答案】 B 【试题解析】 ForEachNext 语句是针对一个数组或集合中的每个元素，重复执行一组语句。而选项 A、 C、 D都是在满足条件时才执行。 24 【正确答案】 C 【试题解析】 若希望窗体一加载定时器就开始工作，应将 Enabled 属性设置为True

35、。否则，保持 Enabled 属性为 False。 25 【正确答案】 D 【试题解析】 用 Static来指定过程中的局部变量在内存中的默认存储方式。如果使用了 Static，则过程中的局部变量就是 “Static”型的，即在每次调用过程时，局部变量的值保持不变。 26 【正确答案】 D 【试题解析】 Chr(x)是将 x的值转换为相应的 ASCII字符， Asc(x)是返回字符串x中第一个字符的 ASCII码， Ucase(“字符串 ”)将 “字符串 ”中的小写字母转换为大写字母。本程序是将在文本框中输入的字符都转换成 4个大写字符输出。 27 【正确答案】 D 【试题解析】 冒泡排序是常

36、用的一种排序方法，它是每次对两个数据进行比较的方法，本题中就是 a(i)和 a(j)进行比较，循环变量 i和 j的关系为 j=i+1。由此，对同一个数组操作， i的范围应是 1 9，而 j的范围应是 i+1 10。容易犯错误的地方就是取 i的范围为 1 10，这样势必会造成在对 j进行操作时会出现 j=11，因此产生数组下标溢出的错误。如果是 “按升序排列 ”，那么就是将满足 “a(i) a(j)”条件时，将 a(i)和 a(j)进行交换，数据交换时需要通过一个临时变量来进行。 28 【正确答案】 C 【试题解析】 Exit Function 的功能是立即终止函数的运行并回到调用函数的地方继续

37、执行其他语句。在 Function 过程的任何位置都可以设置 Exit Function 语句。变量 n传值为 0、 3、 6、 9， 4次调用 rel 函数过程，由于 0和 3都小于 5，使得 i5不成立，被执行了 “Exit Function”语句，函数名将 0和 3返回。而 6和 9没有使得 i 5成立，变量 x的计算结果分别为 21和 45，也被函数名返回。 29 【正确答案】 A 【试题解析】 此题目主要是多次循环调用函数 funl，处理过程如下： fun1(1+fun1(fun1(fun1(8)*10=fun1(1+fun1(fun1(9) *10)=fiat(1+fun1(10)

38、*10)=fun1(1+11*10)， fun1(111) =112。逐层计算即可返回正确结果。 30 【正确答案】 C 【试题解析】 在 4次循环过程中 ，利用 Mid 函数从 x字符串中逐个获取的是 a、b、 c、 d， Left函数从 y字符串中逐个获取的是 1、 1、 1、 1，用 “+”号将它们连接起来，就得到了答案 C。 31 【正确答案】 B 【试题解析】 可以通过设置控件 TabStop 属性为 False、设置 Enable属性为False或设置 Visible属性为 False使得按 Tab键时跳过该控件，但在后两种情况下控件本身已不能获取焦点，所以本题答案是选项 B。 3

39、2 【正确答案】 D 【试题解析】 4次执行语句 s=s+a(i)j，执行完第 1次 s=4，执行完第 2次 s=34，执行完第 3次 s =234，执行完第 4次 s=1234，正确答案应为选项 D。 33 【正确答案】 D 【试题解析】 本题是测试对二维数组赋值过程的理解。一般情况下，一个二维数组用一个二重循环来赋值，本程序是给一个 5行 5列二维数组的部分数组元素赋值。在双重 For循环结构中，外循环的循环变量 i从 1增加到 4，循环 4次，内循环的循环变量， i从 1增加到 4，也循环 4次。因为在本例中，要求输出的是 a(3，3)， a(4， 3)， a(3， 4)， a(4， 4

40、)。直接通过内循环中的赋值语句 a(i， j)=(i-1)3+j，分别给所求的 a(3， 3)， a(3， 4)， a(4， 3)， a(4， 4)赋值，不难算出，a(3， 3)=9， a(4,3)=12， a(3， 4)=10， a(4， 4)=13。 34 【正确答案】 B 【试题解析】 本题首先定义了数组变量 arr和 3个整型变量，接着用 Array函数定义了一个数组，并用 LBound 和 UBound函数求出数组的上下界，分别存放在变量 Start和 Finish 中，然后通过 For循环求出数组中各元素的和，放在变量Sum中，最后将和除以数组的上界，实际上是求出数组各元 素的平均

41、值，即(12+4+8+16)/4=10，将在文本框中显示出来。 35 【正确答案】 C 【试题解析】 变量 n接受 234值后，通过调用函数过程 fun1，实参与形参结合后传送给形参变量 Bum。在函数的计算过程中， Bum的值 234 从个位至百位数被分解得 4、 3、 2，然后计算 4+3+2=9，其结果给变量 k，函数过程运行结束后再由k 赋值给函数过程名 funl，最后打印结果为 9。 36 【正确答案】 n2+1 【试题解析】 由二叉树的性质 (3)可得 n0=n2+1。 37 【正确答案】 空间 复杂度和时间复杂度 【试题解析】 对算法复杂度的划分方法的考查，其中，时间复杂度是指执

42、行该算法需要的计算工作量，算法的空间复杂度是指执行该算法需要的内存空间。 38 【正确答案】 耦合度 /耦合 【试题解析】 模块的独立程度可以由两个定性标准度量，这两个标准分别为内聚和耦合。耦合衡量不同模块之间互相依赖 (连接 )的紧密程度；内聚衡量一个模块内部各个元素彼此结合的紧密程度。 39 【正确答案】 存储结构 【试题解析】 数据结构作为计算机的一门学科，主要研究和讨论以下三方面的问题： 数据集合中的各种数据元素之间固有的逻辑关系，即数据的逻辑结构： 在数据进行处理时，各数据元素在计算机中的存储关系，即数据的存储结构； 对各种数据结构进行的运算。 40 【正确答案】 物理 【试题解析】

43、 数据库的三级模式结构指数据库系统由外模式、模式和内模式 3级构成。数据库管理系统在这三级模式之间提供了两层映像：外模式 /模式映像、模式 /内模式映像。这两层映像保证了数据库系统中的数据能够有其较高的逻辑独立性和物理独立性。 41 【正确答案】 500 【试题解析】 Timer 控件的计时间隔由 Interval 属性决定，其单位为毫秒 (ms)，所以要以 0.5s为间隔要把 Interval 属性的值设为 500。 42 【正确答案】 prime(i) And prime(i+2) , n Mod i=0 【试题解析】 此题 prime函数用来判断参数 n 是否为素数，如果是，则返回Tru

44、e，否则返回 0，判断素数的算法请参看相应章节， 15处应填 “n Mod i=0”。要找出 100以内的所有孪生素数，可采用以下方法：可用循环变量 i从第一个素数3开始判断该数和它的下一个奇数 (只有奇数 才有可能是素数 )是否同时为素数，如果是，则把该数和它的下一个奇数输出，然后循环变量加 2，接着进行判断 ，此处判断某数是否为素数，可以通过调用函数 Prime来实现，故 14处应填“prime(i)And prime(i+2)”。 43 【正确答案】 Randomize ,aver=aver 10 【试题解析】 本题首先定义了一个具有 10个元素的数组 a，然后通过 For循环给该数组的

45、每个元素赋一个随机数，并把该数加到变量 Sum中。 For 循环执行后，用总和除去元素个数就得到平均值。要产生随机数，可先使 用 Randomize进行随机数初始化，所以 12处应填 “Randomize”。循环过后应求平均值，故 13处应填 “aver=aver/10”。 44 【正确答案】 Call Rever(S， y) ,Mid(S， i， 1) 【试题解析】 本题 Rever()函数的功能是把字符串型形参 S逆序存放在字符串形参 y中。逆序存入的思路是：先给变量 y赋一个空字符串，然后通过一个循环从字符串 S 的尾部向前一个字符一个字符地分离出字符，并把分离的字符连接到形参 y的尾部

46、，当所有的字符都分离出来并连接到字符串形参 y的尾 部后， y就是 S逆序存放后的字符串。根据分析可知， 15处应填 “Mid(S， i， 1)”，即从 S字符串的第 i个位置开始取一个字符。当在 Command1 按钮上单击时，为把 Text1中显示的文字逆序后在 Text2中显示出来，可调用 Rever过程把字符串 S(Text1 Text值 )逆序存放到 y中，再把 y赋值给 Text2 Text属性，因此 14处应填过程调用语句 “Call Rever(S， y)”。 45 【正确答案】 “D:a1.dat“For Random , Put #10， i， k , Seek #10,5 【试题解析】 根据分析可知，本题打开的文件可以先写后读，既可以读又可以写，同时又发现文件读写使用 Get#和 Put#语句，因此，应该用随机方式打开文件，故 13处应填 “D:a1.dat“For Random”。通过一个 For循环输入 10个数，并把它们写到文件中去，因此 14处应填 “Put #10， i， r”。为读出第 5个整数，必须首先把记录指针移到第 5条记录处，可使用 Seek#语句，故 15处应填 “Seek #10,5”。