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

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

1、VB 笔试模拟试卷 46 及答案与解析 1 数据的存储结构是指 （ A）存储在外存中的数据 （ B）数据所占的存储空间量 （ C）数据在计算机中的顺序储方式 （ D）数据的逻辑结构在计算机中的表示 2 下列关于栈的描述中错误的是 （ A）栈是先进后出的线性表 （ B）栈只能顺序存储 （ C）栈具有记忆作用 （ D）对栈的插入与删除操作中，不需要改变栈底指针 3 对于长度为 n的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的 （ A）冒泡排序为 n/2 （ B）冒泡排序为 n （ C）快速排序为 n （ D）快速排序为 n(n-1)/2 4 对长度为 n的线性表进行顺序查找，在最坏情

2、况下所需要的比较次数为 （ A） log2n （ B） n/2 （ C） n （ D） n+l 5 下列对于线性链表的描述中正确的是 （ A）存储空间不一定是连续，且各元素的存储顺序是任意的 （ B）存储空间不 定是连续，且前件元素一定存储在后件元素的前面 （ C）存储空间必须连续，且前件元素一定存储在后件元素的前面 （ D）存储空间必须连续，且各元素的存储顺序是任意的 6 下列对于软件测试的描述中正确的是 （ A）软件测 试的目的是证明程序是否正确 （ B）软件测试的目的是使程序运行结果正确 （ C）软件测试的目的是尽可能多地发现程序中的错误 （ D）软件测试的目的是使程序符合结构化原则 7

3、 为了使模块尽可能独立，要求 （ A）模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强 （ B）模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱 （ C）模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱 （ D）模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强 8 下列描述中正确的是 （ A）程序就是软件 （ B） 软件开发不受计算机系统的限制 （ C）软件既是逻辑实体，又是物理实体 （ D）软件是程序、数据与相关文档的集合 9 数据独立性是数据库技术的重要特点之一。所谓数据独立性是指 （ A）数据与程序独立存放 （ B）不同的数据被存放在不同的文件中 （ C）不同的数据只能被

4、对应的应用程序所使用 （ D）以上三种说法都不对 10 用树形结构表示实体之间联系的模型是 （ A）关系模型 （ B）网状模型 （ C）层次模型 （ D）以上三个都是 11 以下关于 Msg Box的叙述中，错误的是 （ A） Msg Box函数返回一个整数 （ B）通过 Msg Box函数可以设置信息框中图标和按钮的类型 （ C） Msg Box语句没有返回值 （ D） Msg Box函数的第二个参数是 个整数，该参数只能确定对话框中显示的按钮数量 12 在窗体上画一个名称为 Timer1的计时器控件，要求每隔 0.5秒发生一次计时器事件，则以下正确的属性设置语句是 （ A） Timer1.

5、Interval=0.5 （ B） Timer1.interval=5 （ C） Timer1.Interval=50 （ D） Timer1.Interval=500 13 在窗体上画一个名称为 Command1的命按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x， y End sub 程序运行后，连续三次单击 Command1按钮后，窗体上显示的是 （ A） 4 2 （ B） 12 18 （ C） 12 30 （ D） 4 6

6、14 以下关于多重窗体的叙述中，错误的是 （ A）用 Hide方法不但可以隐藏窗体，而且能清除内存中的窗体 （ B）在多重窗体程序中，各窗体的菜单是彼此独立的 （ C）在多重窗体程序中，可以根据需要指定启动窗体 （ D）对于多重窗体程序，需要单独保存每个窗体 15 以下关于文件的叙述中，错误的是 （ A）顺序文件中的记录一个接一个地顺序存放 （ B）随 机文件中记录的长度是随机的 （ C）执行打开文件的命令后，自动生成一个文件指针 （ D） LOF函数返回给文件分配的字节数 16 以下叙述中错误的是 （ A）事件过程是响应特定事件的一段程序 （ B）不同的对象可以具有相同名称的方法 （ C）对

7、象的方法是执行指定操作的过程 （ D）对象事件的名称可以由编程者指定 17 以下合法的 Visual Basic标识符是 （ A） For Loop （ B） Const （ C） 9abc （ D） a#x 18 当一个复选框被选中时，它的 Value属性的值是 （ A） 3 （ B） 2 （ C） 1 （ D） 0 19 表达式 5 Mod 3+35*2的值是 （ A） 0 （ B） 2 （ C） 4 （ D） 6 20 设 x=4， y=8， z=7以下表达式的值是 x y And(Not y z) Or z x （ A） 1 （ B） -1 （ C） True （ D） False 2

8、1 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Privme Sub Command1_Click( ) a$=“VisualBasic“ Print String(3， a ) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是 （ A） VVV （ B） Vis （ C） sic （ D） 11 22 设有如下程序段： x=2 For i=1 To 10 Step2 x=x+i Next 运行以上程序后， x的值是 （ A） 26 （ B） 27 （ C） 38 （ D） 57 23 以下叙 述中错误的是 （ A）在 KeyPress事件过程中不能

9、识别键盘的按下与释放 （ B）在 KeyPress事件过程中不能识别回车键 （ C）在 KeyDown和 KeyUp事件过程中，将键盘输入的 “A”和 “a”视作相同的字母 （ D）在 KeyDown和 KeyUp事件过程中，从大键盘上输入的 “1”和从右侧小键盘上输入的 “1”被视作不同的字符 24 执行如下两条语句后，窗体上显示的是 a=8596 Print Format(a，“$00.00.00“) （ A） 0， 009.86 （ B） $9.86 （ C） 9.86 （ D） 0， 009.86 25 在窗体上画一个名称为 CommonDialog1 的通用对话框，一个名称为 Com

10、mand1的命令按钮。然后编写如下事件过程： Private Sub Command1_Click( ) CommonDialog1.FileName=“ CommonDialog1.Hker=“All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt“ CommonDialog1.Filtefindex=2 CommonDialog1.DialoSTitle=“VBTest“ CommonDialog1.Action=1 End Sub 对于这个程序，以下叙述中错误的是 （ A）该对话框被设置为 “打开 ”对话框 （ B）在该对话框中指定默认文件名为空 （ C）该对话

11、框的标题为 VBTest （ D）在该对话框中指定的默认文件类型为文本文件 (*.Txt) 26 设一个工程由两个窗体组成，其名称分别为 Form1和 Form2，在 Form1上有一个名称为 Command1的命令按钮。窗体 Form1的程序代码如下： Private Sub Command1_Click( ) Dim a As Integer a=10 Call g(Form2，A)End Sub Private Sub g(f As Form， x As Integer) y=IIf(x 10， 100， -100) f.Show f.Caption=y End Sub 运行以上程序，正

12、确的结果是 （ A） Form1的 Caption 属性值为 100 （ B） Form2的 Caption属性值为 100 （ C） Form1的 Caption属性值为 -100 （ D） Form2的 Caption 属性值为 100 27 在窗体上画一个名称为 Command1的命令按钮，并编写如下程序： Private Sub Command1_Click( ) Dim x As integer Static y As integer x=10 y=5 Call f1(x， y) Print x， y End Sub Private Sub f1(ByRef xl As Intege

13、r， y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后，单击命令按 钮，在窗体上显示的内容是 （ A） 10 5 （ B） 12 5 （ C） 10 7 （ D） 12 7 28 设有如下程序 Option Base 1 Private Sub Command1_Click( ) Dim a(10)As Integer Dim n As Integer n=lnput Box(“输入数据 ”) If n 10 Then Call GetArray(a， n) End If End Sub Private Sub GetArray(b( )As Integ

14、er， n As Integer) Dim c(10)AsInteger j=0 For i=1 To n b(i)=CInt(Rnd( )*100) If b(i)/2=b(i)2 Then j=j+1 c(j)=b(i) End lf Next Print j End Sub 以下叙述中错误的是 （ A）数组 b中的偶数被保存在数组 c中 （ B）程序运行结束时，在窗体上显示的是 c数组中元素的个数 （ C） GetArray过程的参数 n是按值传送的 （ D）如果输入的数据大于 10，则窗体上不显示任何 信息 29 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程：

15、 Option Base 1 Private Sub Command1 Click( ) Dim a a Array(1， 2， 3， 4， 5) For i 1 To UBound(A)a(i)=a(i)+i-1 Next Printa(3) End Sub 程序 运行后，单击命令按钮，则在窗体上显示的内容是 （ A） 4 （ B） 5 （ C） 6 （ D） 7 30 阅读程序： Option Base 1 Private Sub Form_Click( ) Dim arr Sum Sum=0 arr=Array(1， 3， 5， 7， 9， 11， 13， 15， 17， 19) For

16、 i=1 TO 10 If arr(i)/3=arr(i)3 Then Sum=Sum+art(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为 （ A） 13 （ B） 14 （ C） 27 （ D） 15 31 在窗体上画一个名称为 File1的文件列表框，并编写如下程序： Private Sub File1_DblClick( ) x=Shell(File1_FileName， 1) End Sub 以下关于该程序的叙述中，错误的是 （ A） x没有实际作用，因此可以将该语句写为： Call Shell(File1 FileName，

17、 1) （ B）双击文件列表框中的文件，将触发该事件过程 （ C）要执行的文件的名字通过 File1 FileName指定 （ D） File1中显示的是当前驱动器、当前目录下的文件 32 在窗体上画一个名 称为 Label1、标题为 “Visual Basic考试 ”的标签，两个名称分别为 Conmmnd1和 Com mand2、标题分别为 “开始 ”和 “停止 ”的命令按钮，然后画一个名称为 Timer1的计时器控件，并把其 Interval属性设置为 500，如图所示。 编写如下程序： Private Sub Form_Load( ) Timer1.Enabled=False End S

18、ub Private Sub Command1_Click( ) Timer1.Enabled=True End Sub PrivateSubCommand2_Click( ) Fimerl.Enabled=False End Sub Private SubTimer1_Timer( ) If Label1.Left Width Then Label1.Left=Label1.1eft+20 Else Label1.Left=0 End If End Sub 程序运行后单击 “开始 ”按钮，标签在窗体中移动。 对于这个程序，以下叙述中错误的是 （ A）标签的移动方向为自右向左 （ B）单击 “

19、停止 ”按钮后再单击 “开始 ”按钮，标签从停止的位置继续移动 （ C）当标签全部移出窗体后，将从窗体的另 端出现并重新移动 （ D）标签按指定的时间间隔移动 33 执行以下程序段 a$=“abbacddcba“ For i=6 To 2 Step-2 X=Mid(a， i， i) Y=Left(a， i) z=Rfight(a， i) z=UCase(X&Y&z) Next i Print z 输出结果为 （ A） ABA （ B） BBABBA （ C） ABBABA （ D） AABAAB 34 在窗体上画一个名称为 Command1的命令按钮，然后编写如下程序： Option Base

20、 1 Private Sub Command1_Click( ) Dim a As Variant a=Array(1， 2， 3， 4， 5) Sum=0 For i=1 TO 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i) xThen Print a(i) Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是 （ A） 1 2 （ B） 1 2 3 （ C） 3 4 5 （ D） 4 5 35 假定一个工程由一个窗体文件 Form1和两个标准模块文件 Model1及 ModeL2组成。 Model1代码如下： P

21、ublic x As Integer Public y As Integer SubS1( ) x=1 S2 End Sub Sub S2( ) y=10 Form1.Show End Sub Model2的代码如下： Sub Main( ) S1 End Sub 其中 Sub Main被设置为启动过程。程序运行后，各模块的执行顺 序是 （ A） Form14ModellModel2 （ B） Model1Model2Form1 （ C） Model24Modell4Form1 （ D） Model2Form1Model1 36 问题处理方案的正确而完整的描述称为【 】。 37 对于给定的一组

22、关键字 (12， 2， 16， 30， 8， 28， 4， 10， 20， 6， 18)，按照希尔排序 (增量为 5)算法进行递增排序，第一趟排序后得到的结果是【 】。 38 在面向对象方法中，类的实例称为【 】。 39 测试的目的是暴露错误 ，评价程序的可靠性；而【 】的目的是发现错误的位置并改正错误。 40 数据库在经过一定时间运行后，其性能会逐步下降，这时需要对数据库进行数据库【 】。 41 一个控件在窗体上的位置由【 】属性决定，其大小由 Width和 Height属性决定。 42 以下程序用宋输出 20个在开区间 (10， 87)中的随机整数 R，每行输出 4个整数。请完善下列程序。

23、 Private Sub Command1_Click() For I = 1 To 10 R =【 】 Print R； If I Mod 4=0 Then Print Next I End Sub 43 在 Visual Basic中，用于管理文件系统的 3个控件是文件列表框、目录列表框和【 】。 44 为了能自动放大或缩小图像框中的图形以与图像框的大小相适应，必须将该图像框的 Stretch属性设置为【 】。 45 能判断是否到达文件尾的函数是【 】。 46 下列程序的功能是将数组中的奇数相加。给定的程序不完整，请将程序补充完整。 Option Base 1 Private Sub fo

24、rm_Click() Dim k As Integer Dim Total As Integer Dim n n = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) For k = 1 To UBound(n) If【 】 Then Total = Total + n(k) End If Next k Print Total End Sub 47 假定定义了一个记录类型，名为 Rt，同时建立了一个名为 Sp.txt的文件，然后编写如下的程序段： Dim Rv As Rt r1=Len(Rv) Open“Sp.txt“ For Random As # 1 x=LOF(1

25、) n=xr1 执行上面的程序段后，变量 n中存放的是文件【 】中所存放的是【 】记录类型的记录数。 48 假定建立了一个工程，该工程包括两个窗体，其名称 (Name属性 )分别为 Form1和 Form2，启动窗体为 Form1。在 Form1中画一个命令按钮 Command1，程序运行后，要求当单击该命令按钮时， Form1窗体消失，显示窗体 Form2，请将程序补充完整。 Private Sub Command1_Click() 【 】 Me Form【 】 End Sub 49 以下过程用来在 w数组中插入 x， w数组中的数已按由小到大的顷序存放， n指存储单元中存放数组中数据的个数

26、，插入后数组中的数仍有序。请填空补充程序。 Sub fun(w， x， n) Dim i， p p=0 w(n)=x Do While x w(p) 【 】 Loop For i=n to p+1 Step-1 w(i)=【 】 Next i w(p)=x n=n+1 Sub End 50 在下面程序的执行过程中，将要进行【 】次循环，而在第 3次循环输出的数据是【 】。 Private Sub Command1 Click() Dim b(-1 To 3) For i=LBound(b， 1)To UBound(b， 1) b(i)=2*i Print i， b(i) Next i End

27、Sub 51 在 Visual Basic 程序启动运行中设置一个封面窗口，显示一些有意义的信息，要求显示时间 5秒。 Sub dlys(ByVal n As Single) Dim tl As Single Dim t2 As Single t1 = Timer Do t2 = Timer If t2 t1 Then t2 = t2 + 86400 If t2 - tl n Then Exit Do 【 】 Loop End Sub Sub main( ) FormShow dlys【 】 【 】 Form1.Show End Sub VB 笔试模拟试卷 46 答案与解析 1 【正确答案】

28、D 【试题解析】 数据的逻辑结构在计算机存储空间中的存放形式称为数据的存储结构 (也称数据的物理结构 )。 2 【正确答案】 B 【试题解析】 栈 (stack)是限定只在一端进行插入与删除的线性表，这一端称为栈顶 (top)，另一端称为栈底 (bottom)，栈是按照 “先进后出 ”或 “后进先出 ”的原则组织数据的。栈具有记忆应用。 3 【正确答案】 D 【试题解析】 在最坏的情况下，冒泡排序和快速排序需要比较的次数为 n(n- 1)/2。 4 【正确答案】 C 【试题解析】 对于长度为 n的有序线性表，在最坏情况下，二分查找只需要比较 log2n 次，而顺序查找需要比较 n次。 5 【正

29、确答案】 A 【试题解析】 在链式存储结构中，存储数据结构的存储空间可以不连续，各数据结点的存储顺序与数据元素之间的逻辑关系 可以不一致，而数据元素之间的逻辑关系是由指针域来确定的。 6 【正确答案】 C 【试题解析】 软件测试是为了发现错误而执行程序的过程。 7 【正确答案】 B 【试题解析】 耦合性与内聚性是模块独立性的两个定性标准，耦合与内聚是相互关联的。在程序结构中，各模块的内聚性越强，则耦合性越弱。一般较优秀的软件设计，应尽量做到高内聚，低耦合，即减弱模块之间的耦合性和提高模块内的内聚性，有利于提高模块的独立性。 8 【正确答案】 D 【试题解析】 软件指的是计算机系统中与硬件相互依

30、存的另一 部分，包括程序、数据和相关文档的完整集合。程序是软件开发人员根据用户需要开发的、用程序设计语言描述的、适合计算机执行的指令序列。数据是使程序能正常操纵信息的数据结构。文档是与程序的开发、维护和使用有关的图文资料。 9 【正确答案】 D 【试题解析】 数据独立性是数据与程序间的互不依赖性，即数据库中的数据独立于应用程序而不依赖于应用程序。数据的独立性一般分为物理独立性与逻辑独立性两级。 10 【正确答案】 C 【试题解析】 层次模型是最早发展起来的数据库模型。层次模型的基本结构是树形结构。 11 【正确答案】 D 【试题解析】 Msg Box 函数的返回值是一个整数，它与所选择的按钮有

31、关。 Msg Box函数的第二个参数 Type是一个整数值或符号常量，用来控制在对话框内显示的按钮，图标的种类及数量。 Msg Box语句与 Msg Box函数不同之处在于 Msg Box语句设有返回值。 12 【正确答案】 D 【试题解析】 Interval 属性用来设置一个时间间隔，每间隔 1秒， 0.5秒时设为500。 13 【正确答案】 B 【试题解析】 由于 x用 Static关键字定义，故变 量 x为静态变量，具备数值存储的功能。每单击一次按钮，将执行 For i 循环，每一次执行 For i 循环， x值每次加2，故在最后一次执行 For i 循环时， “y=y+x”中的 x值本

32、别为 8、 10，故最终窗体上显示 x值为 12， y值为 18。 14 【正确答案】 A 【试题解析】 Hide方法只能隐藏某一窗体，但不能将其从内存中清除出去。只有执行 UnLoad方法，才可以清除内存中的窗体。 15 【正确答案】 B 【试题解析】 顺序文件，顾名思义，它的记录一个接一个地顺序有效。随机文件中记录的长度不是随机 的，而是固定的，这样将方便文件的读写操作， B 项表述错误。文件被打开后，自动生成一个文件指针，它是隐含的，文件的读写就是从这个指针所指的位置开始， D项的 LOF函数返回给文件分配的字节数。 16 【正确答案】 D 【试题解析】 Visual Basic 中对象

33、的事件、方法、属性的名称都是由 Visual Basic事先定义好的，不能由编程者指定。编程者只可在 Visual Basic 中定义变量，建立Sub过程、 Function 函数过程等。 17 【正确答案】 A 【试题解析】 由于 “Const“、 “#”是 Visual Basic 保留的关键字符，故 B、 D项所列不是合法的，同时 Visual Basic规定变量的命名只能以字母开头，所以 C项是非法的。 18 【正确答案】 C 【试题解析】 对于复选框， Value属性只能是 0、 1、 2。其中 O表示没有选择该复选框； 1表示被选中； 2表示复选框被禁止。 19 【正确答案】 B

34、【试题解析】 注意区别浮点除法与整数除法。 “/”表示浮点除法； “”表示整数除法，本题中涉及的是整数除法； “Mod“为取模运算。 “/”与 “*”运算的优先级高于“”， “”运算的优先级高于 “Mod”。 20 【正确答案】 D 【试题解析】 Not表示 “非 ”。 “Or”所连接的关系式，只要有一个为 True，则结果为 True。 And连接的关系式必须同时为 True，结果才为 True。本题由于 “Not y z”被括号括起来，故优先计算。 “Not y x”为 False， “x y”为 True，所以 “x y And(Not y x)”为 False，故 “x y And(N

35、ot y z)Or z x”为 False。 21 【正确答案】 A 【试题解析】 String返 回 n个字符。如果为字符串，则返回 n个字符串的首字符。返回 3个 “Visual Basic”的首字母 “V”。 22 【正确答案】 B 【试题解析】 变量 i的初始值为 1，每循环一次加 2，故当 i为 1、 3、 5、 7、 9时，可以执行语句 “x=x+i”，所以 x的值为： 2+1+3+5+7+9。 23 【正确答案】 B 【试题解析】 KeyPress 的参数 KeyAscii 对应不同的字符，它与 KeyDown 的参数 KeyCode有本质上的区别。 KeyCode对应键的 AS

36、CII码，不区分大小写。KeyPress 可以识别回车键，但不能识别键盘的按下与释放。 24 【正确答案】 D 【试题解析】 解题的关键是掌握格式说明字符的理解。 0表示一个数字位， 0的个数决定了显示区段的长度，多余的位以。补齐；小数点与。结合使用，可以放在显示区段的任何位置，根据格式字符串的位置，小数部分多余的数字按四舍五入处理；逗号起到分位的作用，即从小数点左边一位开始，每 3位用 个逗号分开，其中逗号可以放在小数点左边的任何位置，但不要放在头部，也不要紧靠小数点。 25 【正确答案】 D 【试题解析】 FileName用来设置 或返回要保存的文件的路径及文件名； Filter用来指定文

37、件对话框中显示文件的类型； Fiherlndex用来指定默认的过滤器；DialogTitle用来设置对话框的标题， C项表述正确； Action 表示对话框的类型；打开文件对话框的 Action 值为 1。据此，应选择 D项。 26 【正确答案】 B 【试题解析】 根据定义的 g Sub过程，当参数 x值小于 10时， y取值 100，否则取值 -100，然后再把 y赋给窗体 f 的 Caption属性。在事件过程中调用此过程的实参分别为 Form2与 a(其中 a被赋值为 10)。由于 a=10，故 y=-100，所以正确的结果为： Form2的 Caption 属性为 -100。 27 【

38、正确答案】 D 【试题解析】 传地址方式一般用 ByRef表示，形参在默认情况下也是以传地址的方式传送参数。本题中 F1 子过程的 x1与 y1 参数都是传地址的方式。这就意味着在调用该过程后，实参的数值会使着过程内的相关处理而发生变化。本题单击一次按钮后，实参 x加 2，变为 12，实参 y加 2，变为 7，当再次输出 x与 y时， x与 y的值已不再是 10与 5，而是变为 12与 7。 28 【正确答案】 C 【试题 解析】 GetAlTay 过程返回 c数组中元素的个数。 c数组元素由 b(i)赋值，但只有 b(i)中为偶数的元素才能赋值给 c数组中的元素。单击按钮时，如果输入的n 值

39、小于 10，则调用 GetArray过程。据此 A、 B、 D项都是正确的。 C项的错误比较明显， GetArvay 过程的参数 n前没有关键字 “ByVal”，则默认为 “ByReF”，即 n 是按传地址的方式传送参数的。 29 【正确答案】 B 【试题解析】 使用 Array函数赋值的数组 a，由于 “Option Basel”故其下标下界为 1。所以 For循环的语句表 示令 a(i)为 a(i)加 i减 1，对于 i为 3时， a(3)的值为“a(3)+3 -1”，即 “3+3-1”，结果为 5。 30 【正确答案】 C 【试题解析】 首先用 Array函数为数组 arr 赋值 10个

40、元素数值。 If 语句表明当 arr(i)为 3的倍数时，就把该 arr(i)加到变量 Sum上， Sum的初始值为 0。故本题的正确答案为： 3+9+15， C项为正确答案。 31 【正确答案】 A 【试题解析】 文件列表框显示当前驱动器，当前目录下的文件，故 D项表述正确。 FileName指定执行文件的名字，故 C项表述正确。 B项显然是正确的，Oblclick 表示双击文件。 A项表述有误， Shell 为函数，使用时必须有一变量接收它的返回值。 Shell函数不能写成 “CallShell“格式。 32 【正确答案】 A 【试题解析】 本题通过 Timer1的 Enabled 属性控

41、制计时器工作与否。计时器一旦运行，将每隔半秒 (Interval 设为 500)触发一次 Timer事件，在该文件中，Label1 的 Left属性每次增加 (每就是每半秒 )20，当 Label1 移出窗体时 (即Label1.left =width)Label1的 Left值回归为 0。 Left属性确定控件与窗体左端的距离，单位为 twip。故本题选项 A表述错误，标签的移动方向自左向右。 33 【正确答案】 B 【试题解析】 由于 Print语句在 For循环后，而不在 For循环内，故只有 For循环执行完毕后， Print方法才输出最终的 z值。当 i=z时， For循环执行最后一

42、次循环体。此时 Mid(a， 2， 2)表示返回 a从第 2个字符开始向右的 2个字符，即“bb”； Left(a， 2)表示返回 a左边的两个字符，即 “ab”； Risht(a， 2)表示返回 a右边两个 字符，即 “ba”。所以 “X&Y&z”的值为 “bbabba“， Ucase返回字符串的大写形式。 34 【正确答案】 D 【试题解析】 用 Array函数为数组 a(5)赋值，其元素分别为 1、 2、 3、 4、 5。第一个 For i循环把 a(i)数组中的元素逐个加到变量 Sum上，然后求出 Sum浮点除 5的结果 (为 3)，赋值给变量 x。第二个 For i 循环表示当 a(

43、i)大于 3时，则用 Print语句输出该元素。 35 【正确答案】 C 【试题解析】 一般情况下， Sub Main 过程存放在标准模块中。由于 Sub Main 过程被设置为启动过程，同时 SubMain又处在 Model2 中，所以 Model2 最先执行。Mode2被执行后， SubMain 过程调用 S1过程在 Modell 中定义故此时 Modell 模块被执行。在调用 S1过程时，又调用了 S2过程， “Form1.Show”是 S2的语句，故此时开始执行 FormI窗体文件。 36 【正确答案】 算法 【试题解析】 算法是指解题方案的正确而完整的描述，它有以下几个基本特征：可行

44、性、确定性、有穷性和拥有足够的情报。 37 【正确答案】 12， 2， 10， 20， 6， 28， 4， 16， 30， 8， 18 【试题解析】 根据希尔排序的排序规则，希尔排序 (增量为 5)第一趟排序过程如下图所示。 38 【正确答案】 对象 【试题解析】 类是具有共同属性、共同操作方法的对象的集合，所以类是对象的抽象，它描述了属于该对象类型的所有对象的性质，而一个对象则是其对应类的一个实例。 39 【正确答案】 调试 【试题解析】 软件测试的目标是在精心控制的环境下执行程序，以发现程序中的错误，给出程序可靠性的鉴定。调试也称排错，它是一个与测试有联系又有区别的概念。具体来说， 测试的

45、目的是暴露错误，评价程序的可靠性，而调试的目的是发现错误的位置，并改正错误。 40 【正确答案】 重组 【试题解析】 进行数据库重新整理，重新调整存储空间的工作称为数据库重组。 41 【正确答案】 Top 和 Left 【试题解析】 一个控件在窗体上的位置由 Top 和 Left属性决定，其大小由Width和 Height属性决定。 42 【正确答案】 Int(Rnd*76+11) 【试题解析】 本题目首先是要产生开区间 (10， 87)上的随机整数，根据 Int函数的用法，应该使用 Int(Rnd*76+11)，注意因为开区间 (10， 87)从 11开始，所以不能使用数字 10。至于换行，

46、根据题意当 I=4、 8等能被 4整除的数值时输出换行符号，可使用 Mod 语句。 43 【正确答案】 驱动器列表框 【试题解析】 在 Visual Basic中，用于管理文件系统的 3个控件是文件列表框、目录列表框和驱动器列表框。 44 【正确答案】 True 【试题解析】 Stretch 属性只用于图像框，用来自动调整图像框中图形内容的大小。它既可通过属性窗口设置，也可通过程序代码设置。 45 【正确答案】 EOF 【试题解析】 EOF函数返回一个 Integer，它包含 Boolean 值 True，表明已经到达为 Random或顺序 Input打开的文件末尾。 46 【正确答案】 n(

47、k)Mod 2 0或 n(k)Mod 2=1或 n(k)/2 Int(n(k)/2)或 n(k)/2-Int(n(k)/2) 0 【试题解析】 判定奇数的条件是数据除以 2的余数不为 0。 47 【正确答案】 Sp.txt , Rt 【试题解析】 分析程序，变量 rl 为记录类型 Rt的长度，变量 x得到的 是文件Sp.txt的长度，变量 n等于 x(文件长度 )整除 rl(记录长度 )，得到的应该是文件Sp.txt中的记录数。 48 【正确答案】 Unload , Show 【试题解析】 要使窗体消失，可以使用窗体的 Hide方法将窗体隐藏 (窗体仍在内存中 )，也可以使用 Unload 语句将窗体从内存中清除，程序中的关键字 Me代表当前程序代码所在的窗体，即 Forml，如果使用 Hide方法，正确的语句应该是Me.Hide，而如果使用 Unload 语句，正确的表示方法是 Unload Me。窗体的 Show方法可以实现将 窗体装入内存并显示出来的操作。 49 【正确答案】 p p+1 , w(i-1) 【试题解析】 先要找到 x的插入点，从 w(0)开始与 x比较，找到第一个大于 x的元素，该元素的位置即为 x的插入点， DoWhile语句就是完成这个功能， p作为下标变量，每循环比较一次，就移动一次，因此要对 p进行加 1的操作；找到