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

1、二级 VISUAL+BASIC 笔试-248 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.窗体如图 1 所示。要求程序运行时，在文本框 Text1 中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框 List1 中所有该姓氏的项目。若编写以下程序来实现此功能：（分数：2.00）A.B.C.D.2.下面有关标准模块的叙述中，错误的是( )。（分数：2.00）A.标准模块的文件扩展名为.basB.标准模块中的 Private 过程不能被工程中的其他模块调用C.标准模块不完全由代码组成，还可以有窗体D.标准模块中的全局

2、变量可以被工程中的任何模块引用3.设计窗体时双击窗体的任何位置，将打开( )。（分数：2.00）A.窗口设计器B.代码窗口C.工具箱窗口D.属性窗口4.复选框是否被选中，取决于复选框的( )。（分数：2.00）A.Enabled 属性B.Value 属性C.Checked 属性D.Visible 属性5.已知文本框的 ScrollBars 属性设置为 3，却看不到任何效果，原因是( )。（分数：2.00）A.文本框中没有内容B.文本框的 Locked 属性值为 TrueC.文本框的 MultiLine 属性值为 FalseD.文本框的 MultiLine 属性值为 True6.下列特征中不是面

3、向对象方法的主要特征的是( )。（分数：2.00）A.多态性B.标识惟一性C.封装性D.耦合性7.下列程序段的执行结果为( )。a=0:b=1Doa=a+bb=b+1Loop While a10Print a;b（分数：2.00）A.10 30B.a bC.0 1D.10 58.以下叙述中正确的是( )。（分数：2.00）A.一个 Sub 过程至少要有一个 Exit Sub 语句B.一个 Sub 过程必须有一个 End Sub 语句C.可以在 Sub 过程中定义一个 Function 过程，但不能定义 Sub 过程D.调用一个 Function 过程可以获得多个返回值9.结构化程序设计的 3

4、种结构是( )。（分数：2.00）A.顺序结构，分支结构，跳转结构B.顺序结构，选择结构，循环结构C.分支结构，选择结构，循环结构D.分支结构，跳转结构，循环结构10.已知二叉树后序遍历序列是 CDABE，中序遍历序列是 CADEB，它的前序遍历序列是 ( )。（分数：2.00）A.ABCDEB.ECABDC.EACDBD.CDEAB11.窗体上有一个名称为 Option1 的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub Option1_Click(Index As Integer)End Sub下面关于此过程的参数 Index 的叙述中正确的是(

5、 )。（分数：2.00）A.Index 的值可正可负B.Index 的值用米区分哪个单选按钮被选中C.Index 表示数组中单选按钮的数量D.Index 为 1 表示单选按钮被选中，为 0 表示未选中12.有如下程序：Private Sub Form_Click()Dim i As Integer,sum As Integersum=0Fori=2 To 10If i Mod 20 And i Mod 3=0 Thensum=sum+iEnd IfNext iPrint sumEnd Sub程序运行后，单击窗体，输出结果为( )。（分数：2.00）A.24B.30C.12D.1813.某人编写

6、了下面的程序，希望能把 Text1 文本框中的内容写到 Temp.txt 文件中Private Sub Command1_Click()Open “Temp.txt“ For Output As#2Print“Text1“Close #2End Sub调试时发现没有达到目的，为实现上述目的，应做的修改是( )。（分数：2.00）A.把所有#2 改为#1B.把 Print“Text1“改为 Print #2,Text1C.把 Print“Text1“改为 Write“Text1“D.把 Print“Text1“改为 Print Text114.下面哪个属性不是框架控件的属性( )。（分数：2.0

7、0）A.CaptionB.LeftC.TextD.Enabled15.窗体 Form1 上有一个名称为 Command1 的命令按钮，以下对应窗体单击事件的事件过程是( )。（分数：2.00）A.Private Sub Form 1_Click()End SubB.Private Sub Form_Click()End SubC.Private Sub Command1_Click()EndSubD.Private Sub Command1_Click()End Sub16.若将变量 TestDate 声明为 Date 类型，则下列为变量 TestDate 赋值的语句中正确的是 ( )。（分数

8、：2.00）A.TestDate=date(“1/1/2002“)B.TestDate=#“1/1/2002“#C.TestDate=#1/1/2002#D.TestDate=Format(“m/d/yy“,“1/1/2002“)17.下列程序段的执行结果为( )。Form1.Clsa=“ABBACDDCBA“For i=6 To 2 Step-2x=Mid(a,i,i)y=Left(a,i)z=Right(a,i)z=xtt,Next iEnd SubPrivate Function Sum(_)_j=j+nSum=jEnd Function（分数：4.00）填空项 1:_45.下面的程序执

9、行时，将把当前目录上的顺序文件 smtext1.txt 的内容读入内存，并在文本框 Text1 中显示出来。请填空。Private Sub Command1_Click()Dim inData As StringText1.Text=“Open “./smtext1.txt“_As#1Do While_Input #1,inDataText1.Text=Text1.Text Next j_Next iEnd Sub（分数：6.00）填空项 1:_二级 VISUAL+BASIC 笔试-248 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.窗体

10、如图 1 所示。要求程序运行时，在文本框 Text1 中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框 List1 中所有该姓氏的项目。若编写以下程序来实现此功能：（分数：2.00）A.B.C.D. 解析：解析 在程序运行时删除列表框中的项目可以使用 RemoveItem 方法，其语法为：列表框.RemoveItem 索引号，列表框的属性 ListIndex 返回当前所选项目的索引号，因此删除列表框选中项目的语句为：List1.RemoveItem List1.ListIndex。列表框的 List(Index)属性返回指定索引号的列表项内容，第一个列表项的索引为 0

11、 而最后一个项目的索引为 ListCount-1，其中，ListCount 属性返回列表框中当前的列表项总数。本题原代码错误原因：每执行一次 RemoveItem 方法后，列表框中被删除项目的后续项目的位置将前移，即其 ListIndex 属性值将减 1。为此可从列表框的最后一个项目开始进行查找，即：For k=List1.Listcount-1 To 0 Step-1。2.下面有关标准模块的叙述中，错误的是( )。（分数：2.00）A.标准模块的文件扩展名为.basB.标准模块中的 Private 过程不能被工程中的其他模块调用C.标准模块不完全由代码组成，还可以有窗体 D.标准模块中的全局

12、变量可以被工程中的任何模块引用解析：解析 标准模块是只含有程序代码的应用程序文件，其扩展名为.bas。标准模块是应用程序内其它模块可访问的过程和声明的容器，它们可以包含变量、常数、类型、外部过程和全局过程的全局(在整个应用程序范围内有效的)声明或模块级声明，它由 3 部分组成：全局变量声明；模块层声明；通用过程。其中，全局声明放在标准模块的首部，因为每个模块都可能要求有它自己的惟一名字的全局变量。全局变量的作用域最大，可以在工程的每个模块、每个过程中使用。在默认情况下，模块级变量对该模块中的所有过程都是可见的，但对其他模块中的代码不可见。3.设计窗体时双击窗体的任何位置，将打开( )。（分数：

13、2.00）A.窗口设计器B.代码窗口 C.工具箱窗口D.属性窗口解析：解析 本题考查 VB 的窗口特性。VB6.0 运行环境为设讨 VB 源程序提供了若干常用的窗口。从窗体窗口中用鼠标双击一个控件或者窗体本身，或者在工程窗口中选择查看代码，或者从“视图”菜单中选择“代码窗口”命令，均可以打开代码窗口。其他的窗口可以利用“视图”菜单，或者从工具栏中直接打开。4.复选框是否被选中，取决于复选框的( )。（分数：2.00）A.Enabled 属性B.Value 属性 C.Checked 属性D.Visible 属性解析：解析 本题考查复选框的常见属性。复选框的 Enabled 属性决定复选框是否可用

14、，Value 属性决定复选框是否选定，其属性值有 3 种：0-Unchecked：表示未被选定，1-Checked：选定，2-Grayed：灰色，禁止选择；Visible 属性决定其是否可见；复选框没有 Checked 属性。5.已知文本框的 ScrollBars 属性设置为 3，却看不到任何效果，原因是( )。（分数：2.00）A.文本框中没有内容B.文本框的 Locked 属性值为 TrueC.文本框的 MultiLine 属性值为 False D.文本框的 MultiLine 属性值为 True解析：解析 本题考查文本框的常见属性。文本框的 ScrollBars 属性是当 MultiLi

15、ne 属性为 True 时才有效，它表示了文本框中出的滚动条形式：0-None、1-Horizontal、2-Vertical、3-Both，而 MultiLine属性的作用是设置是否多行显示，默认一行属性值为 False，允许多行显示时属性值为 True；Locked 属性为 True 表示锁定文本框而不允许编辑。6.下列特征中不是面向对象方法的主要特征的是( )。（分数：2.00）A.多态性B.标识惟一性C.封装性D.耦合性 解析：解析 面向对象设计方法与面向过程设计方法有本质的不同，其基本原理是：使用现实世界的概念抽象地思考问题从而自然地解决问题。其特点包括：标识惟一性、多态性、封装性、

16、模块独立性、继承和多态性好。7.下列程序段的执行结果为( )。a=0:b=1Doa=a+bb=b+1Loop While a10Print a;b（分数：2.00）A.10 30B.a bC.0 1D.10 5 解析：解析 本题考查 DoWhile 循环分析。根据分析循环程序的原则，首先找出循环变量为 a，其初始值为 0，循环步长为 a+b，注意每次循环 b 的值会发生变化，变化规律为 1，2，3，由此推出 a 的变化规律为：0+1，1+2，3+3，当 a 变化到 10 的时候，退出循环。8.以下叙述中正确的是( )。（分数：2.00）A.一个 Sub 过程至少要有一个 Exit Sub 语句

17、B.一个 Sub 过程必须有一个 End Sub 语句 C.可以在 Sub 过程中定义一个 Function 过程，但不能定义 Sub 过程D.调用一个 Function 过程可以获得多个返回值解析：解析 本题考查过程。常见过程分为 Sub 过程和 Function 函数过程。一个 Sub 过程必须有一个End Sub 语句，二者是成对出现的。过程不可以嵌套定义，但可以嵌套调用。一个函数过程仅可以有一个返回值。9.结构化程序设计的 3 种结构是( )。（分数：2.00）A.顺序结构，分支结构，跳转结构B.顺序结构，选择结构，循环结构 C.分支结构，选择结构，循环结构D.分支结构，跳转结构，循环

18、结构解析：解析 程序设计语言仅仅使用顺序、选择和重复(循环)三种基本控制结构就足以表达出各种其他形式结构的程序设计方法。遵循程序结构化的设计原则，按结构化程序设计方法设计出的程序易于理解、使用和维护；可以提高编程工作的效率，降低软件的开发成本。10.已知二叉树后序遍历序列是 CDABE，中序遍历序列是 CADEB，它的前序遍历序列是 ( )。（分数：2.00）A.ABCDEB.ECABDC.EACDB D.CDEAB解析：解析 由于后序遍历的最后一个元素为 E，所以 E 为根结点，所以它的前序遍历的首个元素为 E，故排除 A)和 D)选项。由于中序遍历中，元素 B 在元素根结点 E 的后面，所

19、以 B 为二叉树的右子树，并且该二叉树右子树只有一个元素，所以前序遍历的最后一个元素应为 B，故选项 C)为正确选项，即该二叉树的前序遍历序列是 EACDB。11.窗体上有一个名称为 Option1 的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub Option1_Click(Index As Integer)End Sub下面关于此过程的参数 Index 的叙述中正确的是( )。（分数：2.00）A.Index 的值可正可负B.Index 的值用米区分哪个单选按钮被选中 C.Index 表示数组中单选按钮的数量D.Index 为 1 表示单选按钮被

20、选中，为 0 表示未选中解析：解析 控件数组是一组具有共同名称和类型的控件，它们拥有共同的事件，数组中的每个控件都有惟一的索引号(Index)，即下标，默认索引号从 0 开始，不能为负值。12.有如下程序：Private Sub Form_Click()Dim i As Integer,sum As Integersum=0Fori=2 To 10If i Mod 20 And i Mod 3=0 Thensum=sum+iEnd IfNext iPrint sumEnd Sub程序运行后，单击窗体，输出结果为( )。（分数：2.00）A.24B.30C.12 D.18解析：解析 本题考查循环

21、程序的分析。分析循环程序关键在于分析循环体的功能，应详细地分析循环的条件、执行的次数、每次执行的操作等。本题中 For 循环执行 9 次(i 取值范围2，10之间所有的整数)，循环体中执行的条件为：如果 i 不是偶数，同时 i 是 3 的倍数，那么此时的 i，累加到变量 sum 中，因此当 i 为 3、9 时累加到变量 sum 中 sum=3+9=12。13.某人编写了下面的程序，希望能把 Text1 文本框中的内容写到 Temp.txt 文件中Private Sub Command1_Click()Open “Temp.txt“ For Output As#2Print“Text1“Clos

22、e #2End Sub调试时发现没有达到目的，为实现上述目的，应做的修改是( )。（分数：2.00）A.把所有#2 改为#1B.把 Print“Text1“改为 Print #2,Text1 C.把 Print“Text1“改为 Write“Text1“D.把 Print“Text1“改为 Print Text1解析：解析 本题是一个文件输出的问题。若要对以 Output 形式打开的某文件使用 Print 方法进行输出，标准格式为 Print 文件号，字符串。14.下面哪个属性不是框架控件的属性( )。（分数：2.00）A.CaptionB.LeftC.Text D.Enabled解析：解析

23、框架控件的 Caption 属性用来显示说明性的文字，Left 属性来指定框架左侧坐标，Enabled 属性用来指定框架是否可用。而 Text 属性用于返回或设置文本框中的内容，具有该属性的控件有文本框、列表框、组合框等，不包括框架控件。15.窗体 Form1 上有一个名称为 Command1 的命令按钮，以下对应窗体单击事件的事件过程是( )。（分数：2.00）A.Private Sub Form 1_Click()End SubB.Private Sub Form_Click()End Sub C.Private Sub Command1_Click()EndSubD.Private Su

24、b Command1_Click()End Sub解析：解析 窗体的单击事件不同于其他控件的单击事件，在事件过程头中不出现窗体名字，而是统一使用 Form_Click()。16.若将变量 TestDate 声明为 Date 类型，则下列为变量 TestDate 赋值的语句中正确的是 ( )。（分数：2.00）A.TestDate=date(“1/1/2002“)B.TestDate=#“1/1/2002“#C.TestDate=#1/1/2002# D.TestDate=Format(“m/d/yy“,“1/1/2002“)解析：解析 本题考查 VB 中 Date 数据的书写格式。所有日期型数

25、据有两种写法，其一是利用号码符(#)，把字面上认可的日期型括起来；其二是以数字序列表示。选项 A)括起的号码符不正确，选项 B)中“1/1/2002“”为字符型数据，系统不会认为是日期，选项 C)是正确的，选项 D)中 Format 函数的调用格式为：Format(“Data“，“格式“)。17.下列程序段的执行结果为( )。Form1.Clsa=“ABBACDDCBA“For i=6 To 2 Step-2x=Mid(a,i,i)y=Left(a,i)z=Right(a,i)z=xtt,Next iEnd SubPrivate Function Sum(_)_j=j+nSum=jEnd Fu

26、nction（分数：4.00）填空项 1:_ （正确答案：ByVal n As Integer；Static j As Integer）解析：解析 本题考查参数的传递和静态局部变量。Sum 函数在窗体单击事件中调用 5 次并用来求和，因此每一次求和结果应当保留，所以借助静态变量实现。同时要求传递的形参变化不应影响到实参，因此采用传值调用。45.下面的程序执行时，将把当前目录上的顺序文件 smtext1.txt 的内容读入内存，并在文本框 Text1 中显示出来。请填空。Private Sub Command1_Click()Dim inData As StringText1.Text=“Open “./smtext1.txt“_As#1Do While_Input #1,inDataText1.Text=Text1.Text Next j_Next iEnd Sub（分数：6.00）填空项 1:_ （正确答案：i=j；ij print）解析：解析 本题考查打印矩阵。观察输出结果，矩阵对角线包括对角线下部为 1，对角线上部为-1，因此对角线下部分矩阵的行标小于等于列标，体现在下标上就是 i=j，上部分矩阵的行标大于列标ij。注意每输出矩阵的一行就输出一个回车。