【计算机类职业资格】二级VISUAL+BASIC笔试-319及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC笔试-319及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-319及答案解析.doc（24页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC 笔试-319 及答案解析(总分：92.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.在窗体上画一个名称为 Text1 的文本框，然后画 3 个单选按钮，并用这 3 个单选按钮建立一个控件数组，名称为 Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句( )。Private Sub Optionl_Click(Index As Integer)Select CaseCase 0a=“宋体“Case 1a=“黑体“Case 2a=“楷体 GB2312“End Select

2、Text1. =aEnd Sub（分数：2.00）A.Option TextB.Index TextC.Index FontD.Option Font2.下列叙述正确的是( )。（分数：2.00）A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.以上 3 种描述都不对3.有如下函数过程：Function funl(ByVal x As Integer,ByVal y As Integer)As IntegerDo While y0reminder=x Mod yx=yy=reminderLoop

3、fun1=xEnd Function在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。Private Sub Command1_Click()Dim a As IntegerDim b As Integera=100b=25x=funl(a，b)Print xEnd Sub（分数：2.00）A.0B.25C.50D.1004.按文件的访问方式不同，可以将文件分为( )。（分数：2.00）A.顺序文件、随机文件B.文本文件和数据文件C.数据文件和可执行文件D.ASCII 文件和二进制文件5.窗体上添加一个文本框 Text1，编写如下代码：Private Sub Text1_KeyDow

4、n(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode+5) & KeyCodeEnd Sub程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。（分数：2.00）A.F65G66B.F65F66C.G66F65D.G65G666.数据的存储结构是指( )。（分数：2.00）A.数据所占的存储空间B.数据的逻辑结构在计算机中的存放形式C.数据在计算机中的顺序存储方式D.存储在计算机外存中的数据7.为了使列表框中的项目分为多列显示，需要设置的属性为( )。（分数：2.00）A.ColumnsB.StyleC.ListD.Multi

5、Select8.设有变量声明为“Dim aDate As Date”，则为变量 aDZe 正确赋值的表达方式是( )。（分数：2.00）A.aDate=#8/2008#B.aDate=#“8/8/2008“#C.aDate=Date(“8/8/2008“)D.aDate=Format(“m/d/yy“,“8/8/2008“)9.在 C 盘当前文件夹下建立一个名为 SDat.txt 的顺序文件。要求用 InputBox 函数输入 5 名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在下列横线处合适的语句是( )。Private Sub Form_Click()Op

6、en “C：/SDat.txt“ For Output As 1For i=1 To 5StuNo=InputBox(“请输入学号“)StuName=InputBox(“请输入姓名“)StuEndg=Val(InputBox(“请输入英语成绩“)Next iClose #1End Sub（分数：2.00）A.Input #1,StuNo,StuName,StuEndgB.Put #1，StuNo，StuName，StuEndgC.Vrite #1，StuNO，StuName，StuEndgD.Get #1，StuNo,StuName,StuEndg10.为了提高软件模块的独立性，模块之间最好是

7、( )。（分数：2.00）A.控制耦合B.公共耦合C.内容耦合D.数据耦合11.下列程序段错误的是( )。（分数：2.00）A.Dim a As Integera=array(1，2,3,4)B.Dim a()，b()a=array(1，2,3,4)：b=aC.Dim a As Varianta=array(1，“asd“,true)D.Dim a()As Varianta=array(1,2,3,4)12.已知代数式 eXSin(30)2x/(x+y)Lnx，则正确的 Visual Basic 表达式为( )。（分数：2.00）A.E*Sin(30*3.14/180)*2*X/X+Y*Log

8、(X)B.Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X)C.Exp(x)*Sin(30*3.14/180)*2*x/(x+y)*Log(x)D.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(X)13.待排序的关键码序列为(33，18，9，25，67，82，53，95，12，70)，要按关键码值递增的顺序排序，采取以第一个关键码为基准元素的快速排序法，第一趟排序后关键码 33 被放到第 ( )个位置。（分数：2.00）A.3B.5C.7D.914.下列程序代码实现生成 20 个 0100 之间的随机整数，存于数组中，打印数组中大于 50 的数，并求这些数

9、的和。请选择正确的程序段是( )，完成程序。Private Sub Commandl_Click()Dim arr(1 To 20)For i=1 To 20arr(i)=_Textl.Text=Textl.Text & arr(i)& Chr(13)& Chr(10)Next iSum=0For Each X _If X50 ThenPrint Tab(20)；XSum=Sum+XEnd IfNext XPrint Tab(20)；“Sum=“；SumEnd Sub（分数：2.00）A.Int(Rnd*99+1) In arrB.Int(Rnd) In arrC.Int(Rnd*99+1)

10、In arr()D.Int(Rnd) In arr()15.窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_Click()Dim aa=Array(1，2，3，4，5)For k=1 To 4S=S+a(k)Next kPrint SEnd Sub（分数：2.00）A.10B.14C.15D.12016.有下列程序段，其输出结果为( )。a=0：b=0For i=-1 To -2 Step-1For i=1 To 2b=b+1Next ja=a+1Next iPrint a；b（分数：2.00）A.2 3B

11、.-2 2C.4 2D.2 417.有下列二叉树，对此二叉树中序遍历的结果为( )。（分数：2.00）A.ABCDEFB.BDAECFC.ABDCEFD.ABCDFE18.假定有一个菜单项，名为 MenuItem，为了在运行时使该菜单项不可见，应使用的语句为( )。（分数：2.00）A.MenuItem.Enabled=FalseB.MenuItem.Enabled=TrmeC.MenuItem.Visible=TrueD.MenuItem.Visible=Flase19.源程序的文档化不包括( )。（分数：2.00）A.符号名的命名要有实际意义B.正确的文档形式C.良好的视觉组织D.正确的程

12、序注释20.栈和队列的共同点是( )。（分数：2.00）A.都是先进先出B.都是先进后出C.只允许在端点处插入和删除元素D.没有共同特点21.在使用打印直接输出信息时，下列哪个属性或方法实现了使文件结束打印( )。（分数：2.00）A.Print 方法B.Page 属性C.NewPage 方法D.EndDoc 方法22.下列程序的运行结果是( )。Private Sub Commandl_Click()a=1.5b=1.5Call fun(a，b)Print a，bEnd SubPrivate Sub fun(x，y)x=y*yy=y+xEnd Sub（分数：2.00）A.2.25 3.75B

13、.1.5 2.25C.1.5 0.75D.0.75 1.523.窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。Private Sub Commandl_Click()Picturel.Picture=LoadPicture(“c：/picture.jpg“)Picmrel.ClsPicturel.Print “picture“End Sub（分数：2.00）A.窗体无显示，图片框显示图片和文字 pictureB.窗体上出现 picture 文本，图片框无显示C.窗体上出现 picture 文本，图片框显示图片 picture.jpgD.窗体无显示，图片框只显示 picture

14、 文字24.下列程序运行时输出的结果是( )。Option Base 1Const a=10Private Sub Form_Click()Dim x(（分数：2.00）A.As Integerk=-1For i=1 To a25.在窗体上有一个文本框控件，名称为 TextTime，一个计时器控件，名称为 Timer1。要求每一秒在文本框中显示一次当前的时间。（分数：2.00）A.EnabledB.VisibleC.Timer()D.Interval26.下列程序段的执行结果为( )。a=75If a60 Then i=1If a70 Then i=2If a80 Then i=3If a90

15、 Then i=4Print “i=“；i（分数：2.00）A.i=1B.i=2C.i=3D.i=427.数据库系统的核心是( )。（分数：2.00）A.数据模型B.数据库管理系统C.数据库D.数据库管理员28.表达式 Str(Len(“123“)+Str(77.7)的值是( )。（分数：2.00）A.377.7B.377.7C.80.7D.12377.729.在窗体上画一个名称为“Command1”，标题为“计算”的命令按钮，再画 7 个标签，其中 5 个标签组成名称为 Labell 的控件数组；名称为 Label2 的标签用于显示计算结果，其 Caption 属性的初始值为空：标签 Lab

16、el3 的标题为“计算结果”。运行程序时会自动生成 5 个随机数，分别显示在标签控件数组的各个标签中。单击“计算”按钮，则将标签数组各元素的值累加，然后计算结果显示在 Label2。下列为“计算”按钮的事件过程，请为下划线处选择合适的语句( )。（分数：2.00）A.Labell(i).Caption Label2.CaptionB.Labell(i).Caption Label3.CaptionC.Labell.Caption Label2.CaptionD.Labell.Caption Label3.Caption30.下列( )事件过程可以将打开文件对话框的标题改变为“new Capti

17、on”。（分数：2.00）A.Prirate Sub Commandl Click()CommonDialogl.DialogTitle=“new Caption“CommonDialogl.ShowFontEnd SubB.Private Sub Commandl+Click()CommonDialogl.DialogTitle=“new Caption“CommonDialogl.ShowOpenEnd SubC.Private Sub Commandl_Click()CommonDialogl.DialogTitle=“new Caption“CommonDialogl.ShowHelp

18、End SubD.Private Sub Commandl_Click()CommonDialogl.DialogTitle=“new Caption“CommonDialogl.ShowColorEnd Sub31.对长度为 n 的线性表进行顺序查找，在最坏情况下需要比较的次数为( )。（分数：2.00）A.125B.n/2C.nD.n+132.在新建一个 Visual Basic 工程时，将新建窗体的 Name 属性设置为 TheFirst，则默认的窗体文件名为( )。（分数：2.00）A.Forml.rrmB.工程 1.frmC.TheFirst.fimD.Forml.vbp33.下列事

19、件过程的功能是：建立一个名为 Datal 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 1，2，3，90。请选择正确的程序段是( )，将程序补充完整。Private Type AngK As IntegerSinx As SingleCosx As SingleEnd TypeDim Ksc As AngPrivate Sub Form_Click()Dim Y As SingleDim i As IntegerDim Ksc As AngOpen _Y=3.14159/180For i=1 To 90Ksc.K=iKsc.Sinx=Sin(i*Y)Ksc.Cosx=Cos

20、(i*Y)Next iClose #2End Sub（分数：2.00）A.“/Datal.txt“For Random As #1 Len=10 Put #1，i，KscB.“/Datal.txt“For Random As #1 Len=10 Put #1，Y，KscC.“/Datal.txt“For Random As #1 Put #1，i，KscD.“/Datal.txt“For Random As #1 Put #1，Y，Ksc34.下列描述中正确的是( )。（分数：2.00）A.软件工程只是解决软件项目的管理问题B.软件工程主要解决软件产品的生产率问题C.软件工程的主要思想是强调在

21、软件开发过程中需要应用工程化原则D.软件工程只是解决软件开发过程中的技术问题35.要建立一个随机文件记录学生的信息，如下定义了学生的记录类型，由学号、姓名、5 门课程成绩(百分制)组成，下列的定义正确的是( )。（分数：2.00）A.Type sruno As Integername As Stringscore(1 To 5)As SingleEnd TypeB.Type stuno As Integername As String*10score()As SingleEnd TypeC.Type stuno As Integername As String*10score(1 To 5)A

22、s SingleEnd TypeD.Type stuno As Integername As Stringscore()As SingleEnd Type二、填空题(总题数：11，分数：22.00)36.在数据的存储结构中，不仅需要存储各数据元素的信息，还要存放各元素之间 1 的信息。（分数：2.00）填空项 1:_37.按照“先进先出”的原则组织数据的结构的是 1。（分数：2.00）填空项 1:_38.深度为 5 的满二叉树中，叶子结点的个数为 1。（分数：2.00）填空项 1:_39.在面向对象方法中， 1 描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_40.Jac

23、kson 方法是一种面向 1 的结构化方法。（分数：2.00）填空项 1:_41.在鼠标事件过程 MouseDown 和 MouseUp 中，参数 Button 的值为 1、2、4 时，分别代表按下鼠标的_、_和_按钮。（分数：2.00）填空项 1:_42.已知变量 bool Var 是一个布尔型的变量，如果要给其赋值为 Tree，则正确的赋值语句是 1。（分数：2.00）填空项 1:_43.执行以下语句后，输出结果为_。s$=“ABCDEFG“Print InStr(s$，“efg“)Print LCase$(s$)（分数：2.00）填空项 1:_44.表达式“12345“12345“&“A

24、BC“的值是_。（分数：2.00）填空项 1:_45.在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click()Text1.Text=“VB Programming“End SubPrivate Sub Textl_Change()Picturel.Print “VB 程序设计“End Sub程序运行后，单击窗体，则在文本框中显示的内容是_，而在图片框中显示的内容是_。（分数：2.00）填空项 1:_46.下列程序用于在带垂直滚动条的文本框 Text1 中输出 3 到 100 之间的全部素数。请填空。Private Sub Commandl_C

25、lick()Text1.Text=“For n=3 To 100k=Int(Sqr(n)i=2Flag=0Do While i=_And Flag=0If n Mod i=0 ThenFlag=1Elsei=i+1End IfLoopIf_ThenText1.Text=Text1.Text & Str(n)& Chr(13)&Chr(10)End IfNext nEnd Sub（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试-319 答案解析(总分：92.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.在窗体上画一个名称为 Text1 的文本框，

26、然后画 3 个单选按钮，并用这 3 个单选按钮建立一个控件数组，名称为 Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句( )。Private Sub Optionl_Click(Index As Integer)Select CaseCase 0a=“宋体“Case 1a=“黑体“Case 2a=“楷体 GB2312“End SelectText1. =aEnd Sub（分数：2.00）A.Option TextB.Index TextC.Index Font D.Option Font解析：解析 控件数组中的控件共享同一个

27、事件过程，相互间通过 Index 属性区别，题中单选按钮数组的单击事件中，有一个 Index 参数，单击不同的单选按钮，它取不同的值，根据该值进行不同的操作，所以，Select Case 语句的表达式应为“Index”：题中要求改变文本框中的字体，所以应修改 Text1 的Font 属性。2.下列叙述正确的是( )。（分数：2.00）A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止 D.以上 3 种描述都不对解析：解析 算法的执行效率与数据的存储结构密切相关。算法的空间复杂度是指算法执行过程中所需

28、的存储空间。3.有如下函数过程：Function funl(ByVal x As Integer,ByVal y As Integer)As IntegerDo While y0reminder=x Mod yx=yy=reminderLoopfun1=xEnd Function在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。Private Sub Command1_Click()Dim a As IntegerDim b As Integera=100b=25x=funl(a，b)Print xEnd Sub（分数：2.00）A.0B.25 C.50D.100解析：解析 可以通过

29、两种方式来传递参数，即按值传递参数和按地址传递参数。按值传递参数时，传递的只是变量的副本。如果过程改变了这个值，则所作变动只影响副本而不会影响变量本身。用 ByVal 关键字指出参数是按值来传递的。按地址传递参数使过程用变量的内存地址去访问实际变量的内容，在将变量传递给过程时，通过过程可永远改变变量值。默认时是按地址传递参数。题中 funl 函数的参数都是按值传送的，函数使用“过程名二表达式”的形式获得函数的返回值，如题中“funl=x”语句。调用函数“x=funl(a，b)”后，x=25。4.按文件的访问方式不同，可以将文件分为( )。（分数：2.00）A.顺序文件、随机文件 B.文本文件和

30、数据文件C.数据文件和可执行文件D.ASCII 文件和二进制文件解析：解析 根据不同的分类标准，文件可分为不同的类型。根据数据性质，文件可分为程序文件和数据文件：根据数据的存取方式和结构，文件可分为顺序文件和随机文件：根据数据的编码方式，文件可分为 ASCII 文件和二进制文件。5.窗体上添加一个文本框 Text1，编写如下代码：Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode+5) & KeyCodeEnd Sub程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。（分数：

31、2.00）A.F65G66 B.F65F66C.G66F65D.G65G66解析：解析 KeyDown 事件返回键盘上的键，如按下字母“A”或者字母键“a”，KeyCode 码都为 65，所以按下小写字母 a 和 b 后，KeyCode 值分别为 65 和 66，KeyCode+5 的值分别为 70 和 71，对应的字母分别为 F 和 G，所以打印输出 F65 和 G66。6.数据的存储结构是指( )。（分数：2.00）A.数据所占的存储空间B.数据的逻辑结构在计算机中的存放形式 C.数据在计算机中的顺序存储方式D.存储在计算机外存中的数据解析：解析 数据的存储结构，又称为数据的物理结构，是数

32、据的逻辑结构在计算机中的存放形式，数据的存储结构有顺序结构、链式结构、散列结构和索引结构等。7.为了使列表框中的项目分为多列显示，需要设置的属性为( )。（分数：2.00）A.Columns B.StyleC.ListD.MultiSelect解析：解析 Columns 属性返回或设置一个值，以决定控件是水平还是垂直滚动以及如何显示列中的项目。Columns 属性值为 0 时，控件为垂直滚动；Columns 属性等于 1 时，则列表框呈多行多列显示： Columns 属性值大于 1 时，为水平滚动，Columns 属性值的数量决定在控件中的可见宽度内显示列的数量。Columns 属性用来确定列

33、表框的列数。8.设有变量声明为“Dim aDate As Date”，则为变量 aDZe 正确赋值的表达方式是( )。（分数：2.00）A.aDate=#8/2008# B.aDate=#“8/8/2008“#C.aDate=Date(“8/8/2008“)D.aDate=Format(“m/d/yy“,“8/8/2008“)解析：解析 任何可辨认的文本日期都可以赋值给 Date 变量。日期文字必须以数字符号“#”扩起来，例如，#January 1、1993# 或 #1 Jan 93#。对于选项 D) 是按照格式字符串的要求显示数值表达式，Format 函数的正确格式为：Format(数值表达

34、式，格式字符串)，所以选项 D) 应该改为：aDate=Format(“8/8/2008“,“m/d/yy“)；选项 C) 中 Date 函数使用错误，应为：aDate=Date。9.在 C 盘当前文件夹下建立一个名为 SDat.txt 的顺序文件。要求用 InputBox 函数输入 5 名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在下列横线处合适的语句是( )。Private Sub Form_Click()Open “C：/SDat.txt“ For Output As 1For i=1 To 5StuNo=InputBox(“请输入学号“)StuNam

35、e=InputBox(“请输入姓名“)StuEndg=Val(InputBox(“请输入英语成绩“)Next iClose #1End Sub（分数：2.00）A.Input #1,StuNo,StuName,StuEndgB.Put #1，StuNo，StuName，StuEndgC.Vrite #1，StuNO，StuName，StuEndg D.Get #1，StuNo,StuName,StuEndg解析：解析 顺序文件的读操作使用 Input 语句，写操作使用 Print 或 Write 语句。Write 语句的正确格式为：Write#文件号，表达式表，各表达式之间用逗号隔开。随机文件

36、的写操作使用 Put#语句，读操作使用 Get#语句。10.为了提高软件模块的独立性，模块之间最好是( )。（分数：2.00）A.控制耦合B.公共耦合C.内容耦合D.数据耦合 解析：解析 耦合性与内聚性是模块独立性的两个定性标准，是互相关联的。在程序设计中，各模块间的内聚性越强，则耦合性越弱。一般较优秀的软件设计，应尽量做到高内聚、低耦合，有利于提高模块的独立性。11.下列程序段错误的是( )。（分数：2.00）A.Dim a As Integera=array(1，2,3,4) B.Dim a()，b()a=array(1，2,3,4)：b=aC.Dim a As Varianta=arra

37、y(1，“asd“,true)D.Dim a()As Varianta=array(1,2,3,4)解析：解析 本题是考查使用 Array 函数为数组变量赋值。使用 Array 函数给数组赋值时需要先定义数组变量，然后再使用 Array 函数赋值。注意：在定义数组变量的时候，数组变量不能是具体的数据类型，只能是变体(Variant)类型。12.已知代数式 eXSin(30)2x/(x+y)Lnx，则正确的 Visual Basic 表达式为( )。（分数：2.00）A.E*Sin(30*3.14/180)*2*X/X+Y*Log(X)B.Exp(X)*Sin(30)*2*X/(X+Y)*Ln(

38、X)C.Exp(x)*Sin(30*3.14/180)*2*x/(x+y)*Log(x) D.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(X)解析：解析 “Exp”函数功能是计算 e 的某次方，其格式为是 Exp(number)；“Sin”函数指定参数的正弦值，它的参数是表示以弧度为单位的角的 Double 型数据；“Log”函数得到某数的自然对数值，正确的表达方式是 Log(number)；“30”在计算机中应该写成 30*3.14/180；并且各个表达式之间的乘号不能省略。13.待排序的关键码序列为(33，18，9，25，67，82，53，95，12，70)，

39、要按关键码值递增的顺序排序，采取以第一个关键码为基准元素的快速排序法，第一趟排序后关键码 33 被放到第 ( )个位置。（分数：2.00）A.3B.5 C.7D.9解析：解析 快速排序的基本思想是：从表中选取一个元素(如本题中的 33)，将表中小于此元素的移到前面，大于此元素的移到后面，结果把线性表分割成两部分(两个子表)，此元素插入到其分界线的位置处。然后分别对两个子表再次分割本题中 33 作为分割的中界线，第一道排序后排在比它小的18、9、25、12 后面。14.下列程序代码实现生成 20 个 0100 之间的随机整数，存于数组中，打印数组中大于 50 的数，并求这些数的和。请选择正确的程

40、序段是( )，完成程序。Private Sub Commandl_Click()Dim arr(1 To 20)For i=1 To 20arr(i)=_Textl.Text=Textl.Text & arr(i)& Chr(13)& Chr(10)Next iSum=0For Each X _If X50 ThenPrint Tab(20)；XSum=Sum+XEnd IfNext XPrint Tab(20)；“Sum=“；SumEnd Sub（分数：2.00）A.Int(Rnd*99+1) In arr B.Int(Rnd) In arrC.Int(Rnd*99+1) In arr()D

41、.Int(Rnd) In arr()解析：解析 Rnd 函数用于产生一个小于 1 但大于或等于 0 的实数，题中要求 0100 之间的随机整数，所以需要对 Rnd 产生的实数进行计算处理 Int(Rnd*99+1)。要处理数组中的元素，使用 For EachNext语句处理数组元素时，Each 后只需写出数组名，不能使用小括号。15.窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_Click()Dim aa=Array(1，2，3，4，5)For k=1 To 4S=S+a(k)Next kPrint SE

42、nd Sub（分数：2.00）A.10B.14 C.15D.120解析：解析 解答本题的关键是读懂程序。我们来看程序，程序中首先通过赋值语句定义一个有 5 个元素的数组(数组的下标从零开始)：接下来是通过 For 循环来循环给变量 S 赋值(即对数组元素求和)，这里循环中 k 从 1 开始，因此 a(k)从 2 开始取值，到 a(4)也就是 5 结束，计算结果为 14。16.有下列程序段，其输出结果为( )。a=0：b=0For i=-1 To -2 Step-1For i=1 To 2b=b+1Next ja=a+1Next iPrint a；b（分数：2.00）A.2 3B.-2 2C.4

43、 2D.2 4 解析：解析 这个双重 For 循环中，外层的 For 循环循环次数是两次，计算变量 a 的值；内层 For 循环每次执行循环次数也是 2 次，计算变量 b 的值。执行过程为：当 a-0；b=0 时，语句 b=b+1 执行两次，结果为 2，a=a+1=1。当 a=1；b=2 时，语句 b=b+1 执行两次，结果为 4，a=a+1=2。因此最后计算结果为a=2，b=4。17.有下列二叉树，对此二叉树中序遍历的结果为( )。（分数：2.00）A.ABCDEFB.BDAECF C.ABDCEFD.ABCDFE解析：解析 对二叉树的中序遍历是指：首先遍历左子树，然后访问根结点，最后遍历右

44、子树。在遍历左、右子树时，注意依旧按照“左子树一根结点一右子树”的顺序。18.假定有一个菜单项，名为 MenuItem，为了在运行时使该菜单项不可见，应使用的语句为( )。（分数：2.00）A.MenuItem.Enabled=FalseB.MenuItem.Enabled=TrmeC.MenuItem.Visible=TrueD.MenuItem.Visible=Flase 解析：解析 Enabled 属性用来设置一个窗体或控件是否能够对用户产生的事件作出反应，设为 False时，菜单项在程序运行时失效，不响应用户的操作，设为 True 时，菜单项在程序运行有效，能响应用户的操作：Visib

45、le 属性用来设置窗体或控件是否可见，设为 False 时，控件不可见，设为 True 时，控件可见。19.源程序的文档化不包括( )。（分数：2.00）A.符号名的命名要有实际意义B.正确的文档形式 C.良好的视觉组织D.正确的程序注释解析：解析 源程序的文档化主要包括 3 点：符号名应具有一定实际的含义，便于理解程序功能；正确的程序注释；良好的视觉组织。利用空格、空行、缩进等技巧使程序层次清晰。20.栈和队列的共同点是( )。（分数：2.00）A.都是先进先出B.都是先进后出C.只允许在端点处插入和删除元素 D.没有共同特点解析：解析 栈和队列都是操作受限制的线性表，只允许在端点插入和删除

46、。不同点是：栈只允许在表的一端进行插入和删除操作，而队列允许在表的一端进行插入操作，而在另一端进行删除操作。21.在使用打印直接输出信息时，下列哪个属性或方法实现了使文件结束打印( )。（分数：2.00）A.Print 方法B.Page 属性C.NewPage 方法D.EndDoc 方法 解析：解析 每次应用程序结束时，它们会自动使用 EndDoc 方法，将打印机对象中任何未确定的信息送到打印机， 即通过“Printer.EndDoc”方法用来结束文件打印。22.下列程序的运行结果是( )。Private Sub Commandl_Click()a=1.5b=1.5Call fun(a，b)P

47、rint a，bEnd SubPrivate Sub fun(x，y)x=y*yy=y+xEnd Sub（分数：2.00）A.2.25 3.75 B.1.5 2.25C.1.5 0.75D.0.75 1.5解析：解析 分析程序，命令按钮中的调用函数语句执行过程为：Call fun(a，b)x=y*y=1.5*1.5=2.25，y=y+x=1.5+2.25=3.75。因为这里的参数是默认类型，即传地址形式传递参数，所以 a、b 的值也改变为 2.25、3.750。23.窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。Private Sub Commandl_Click()Pict

48、urel.Picture=LoadPicture(“c：/picture.jpg“)Picmrel.ClsPicturel.Print “picture“End Sub（分数：2.00）A.窗体无显示，图片框显示图片和文字 picture B.窗体上出现 picture 文本，图片框无显示C.窗体上出现 picture 文本，图片框显示图片 picture.jpgD.窗体无显示，图片框只显示 picture 文字解析：解析 图片框的装载语句为：Picturel.Picture=LoadPicture(图片完整路进)。Print 输出方法的功能是在指定的对象上输出文本信息，它的基本格式为：对象名.Print。24.下列程序运行时输出的结果是( )。Option Base 1Const a=10Private Sub Form_Click()Dim x(（分数：2.00）A.As Integerk=-1For i=1 To a解析：解析 本题中两个 For 循环的作用分别为：为 x 数组元素赋值，在窗体上依次输出 x 数组元素的值。其中，为 x 数组元素赋值时，有“x(i)=i*k”和“k=(-1)*k”两条语句。k 的值每次都取自己的相反数，这样，x