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

1、二级 VISUAL+BASIC 笔试-359 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.设 a=5，b=4，c=3，d=2，则表达式 32*b Or a=c And bc Or cd 的值是（分数：2.00）A.1B.TrueC.FalseD.22.链表不具有的特点是（分数：2.00）A.不必事先估计存储空间B.可随机访问任一元素C.插入删除不需要移动元素D.所需空间与线性表长度成正比3.运行下列程序段后，显示的结果为J1=23：J2=32If J1J2 Then Print J2 Else Print J1（分数：2.00）A.23

2、B.32C.55D.23324.阅读程序：Option Base 1Dim arr()As IntegerPrivate Sub Form_Click()Dim i As Integer，j As IntegerReDim arr(3，2)For i=1 To 3For j=1 To 2arr(i，j)=i*2+jNextNextReDim Preserve arr(3，4)For j=3 To 4arr(3，j)=j+9NextPrint arr(3，2)+arr(3，4)End Sub程序运行后，单击窗体，输出结果为（分数：2.00）A.21B.13C.8D.255.计时器文件设置时间间隔

3、的属性是（分数：2.00）A.EnabeldB.TndexC.TagD.Interval6.软件生命周期中所花费用最多的阶段是（分数：2.00）A.详细设计B.软件编码C.软件测试D.软件维护7.为了提高测试的效率，应该（分数：2.00）A.随机选取测试数据B.取一切可能的输入数据作为测试数据C.在完成编码以后制定软件的测试计划D.集中对付那些错误群集的程序8.下列有关数据库的描述，正确的是（分数：2.00）A.数据处理是将信息转化为数据的过程B.数据的物理独立性是指当数据的逻辑结构改变时，数据的存储结构不变C.关系中的每一列称为元组，一个元组就是一个字段D.如果一个关系中的属性或属性组并非该

4、关系的关键字，但它是另一个关系的关键字，则称其为本关系的外关键字9.下列程序：Private Sub Command1_Click()a=InputBox(“请输入“)b=InputBox(“请输入“)Print=a+bEnd Sub运行时输入 3 和 4，输出的结果是（分数：2.00）A.7B.34C.3+4D.出错10.设已打开 5 个文件，文件号分 5U 为 1，2，3，4，5。要关闭所有文件，以下语句正确的是（分数：2.00）A.Close#1，2，3，4，5B.Close#1；#2；#3；#4；#5C.Close #1-#5D.Close11.假定有如下的窗体事件过程：Private

5、 Sub Form_Click()a$=“Microsoft Visual Basic“b$=Right(a$，5)c$=Mid(a$，1，9)MsgBox a$，34，b$，c$，5End Sub程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是（分数：2.00）A.Microsoft VisualB.MicrosoftC.BasicD.512.已知二叉树后序遍历序列是 dabec，中序遍历序列是 debac，它的前序遍历序列是（分数：2.00）A.acbedB.decabC.deabcD.cedba13.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的

6、命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim arr(10，10)As Integer，i，j As IntegerFor i=1 To 3For j=2 To 4arr(i，j)=i+jNextNextText1.Text=an(2，3)+arr(3，4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是（分数：2.00）A.12B.13C.14D.1514.结构化程序设计的 3 种结构是（分数：2.00）A.顺序结构、选择结构、转移结构B.分支结构、等价结构、循环结构C.多分支结构、赋值结构、等价结构D.顺序结构、选择结构、循环结

7、构15.要建立一个学生成绩的随机文件，如下定义了学生的记录类型，由学号、姓名、三门课程成绩(百分制)组成，下列程序段正确的是（分数：2.00）A.Type stud1no As Integername As Stringscore (1 To 3) As SingleEnd TypeB.Type stud1no As Integername As String * 10score ( ) As SingleEnd TypeC.Type stud1no As Integername As String * 10score (1 To 3) As SingleEnd TypeD.Type stud

8、1no As Integername As Stringscore (1 To 3) As SingleEnd Type16.假定在图片框 Picture1 中装入了一个图形，为了清除该图形(不删除图片框)，应采用的正确方法是（分数：2.00）A.选择图片框，然后按 Del 键B.执行语句 Picture1.Picture=LoadPicture(“)C.执行语句 Picturel.Picture=“D.选择图片框，在属性窗口中选择 Picture 属性条，然后按回车键17.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()For i=1 T

9、o 4X=4For j=1 To 2X=x+6NextNextPrint xEnd Sub程序运行后，单击命令按钮，输出结果是（分数：2.00）A.12B.13C.16D.1718.数据库管理系统中用来定义模式、内模式和外模式的语言为（分数：2.00）A.CB.BasicC.DDLD.DML19.在窗体上画一个名为 Command1 的命令按钮，其 Command1_Click 事件过程如下。Sub Command1_Click()Dim student As studtypeDim record_no As Integerrecord n=1With student.ino=12.strna

10、me=“Smith“.strsex=“男”.smark=89End With_Put # 1，record_no，studentClose # 1End Sub要求在 c:/的随机文件 studentdat 写入一条记录。应在程序中空行处填入以下哪条语句使该功能完整（分数：2.00）A.Open“c:/student.dat“For Input As # 1 len=len(student)B.Open“c:/student.dat:For random As # 1 len=len(student)C.Open“c:/student.dat“For Output As # 1 len=len

11、(student)D.Open“c:/student.dat“For Append As # 1 len=len(student)20.算法的时间复杂度是指（分数：2.00）A.执行算法程序所需要的时间B.算法程序的长度C.算法执行过程中所需要的基本运算次数D.算法程序中的指令条数21.下列有关数据库的描述，正确的是（分数：2.00）A.数据库是一个 DBF 文件B.数据库是一个关系C.数据库是一个结构化的数据集合D.数据库是一组文件22.设 A=“123456“，则表达式 Val(Left(A，4)+Mid(A，4，2)的值为（分数：2.00）A.123456B.123445C.5D.623

12、.以下关系表达式中，其值为假的是（分数：2.00）A.“XYZ“XYz“B.“Visual Basic“=“visualbasic“C.“the“there“D.“Integer“Int“24.设用复制、粘贴的方法建立了个命令按钮数组 Command1，以下对该数组说法错误的是（分数：2.00）A.命令按钮的所有 Caption 属性都是 Command1B.在代码中访问任意一个命令按钮只需使用名称 Command1C.命令按钮的大小都相同D.命令按钮共享相同的事件过程25.执行下列程序后，鼠标单击窗体，输出结果为Private Sub Form_Click()Print “Click“；En

13、d SubPrivate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)Print “Donw“End SubPrivate Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，Y As single)Print “Up“End Sub（分数：2.00）A.DownUpClickB.ClickDownUpC.DownClickUpD.UpDownclick26.在窗体上画一个命令按钮和一个文本框，名称分别为 C

14、ommand1 和 Text1，然后编写如下程序：Private Sub Command1_Click()a=InputBox(“请输入日期(1-31)“)t=“旅游景点：“a（分数：2.00）A.-1 6B.-1 16C.1 6D.11 2130.如果要将窗体中的某个命令按钮设置成无效状态，应该设置命令按钮的什么属性（分数：2.00）A.ValueB.VisibleC.EnabledD.Default31.栈和队列的共同特点是（分数：2.00）A.都是先进先出B.都是先进后出C.只允许在端点处插入和删除元素D.没有共同点32.窗体上有 Text1、Text2 两个文本框及一个命令按钮 Com

15、mand1，编写下列程序Dim y As IntegerPrivate Sub Command1_Click()Dim x As IntegerX=2Text1.Text=Fun2(Fun1(x)，y)Text2.Text=Fun1(x)End SubPrivate Function Fun1(x As Integer)As Integerx=x+y:y=x+yFun1=x+yEnd FunctionPrivate Function Fun2(x As Integer，y As Integer)As IntegerFun2=2*x+yEnd Function当单击 1 次和单击 2 次命令按钮

16、后，文本框 Textl 和 Text2 内的值分别是（分数：2.00）A.2 42 4B.2 44 8C.10 1058 58D.4 48 833.执行下列程序段后，输出的结果是For k1=0 To 4y=20For k2=0 To 3y=10For k3=0 To2y=y+10Next k3，k2，k1Print y（分数：2.00）A.90B.60C.40D.1034.下列程序段的执行结果为a=3：b=1For i=1 To 3f=a+b：a=b：b=fPrint fNext I（分数：2.00）A.4 3 6B.4 5 9C.6 3 4D.7 2 835.能够将 Picture 对象

17、Picl 加载当前目录中的 face.bmp 的语句是（分数：2.00）A.Pic1.Picture=LoadPicture(App.path a（分数：2.00）A.-1 6B.-1 16C.1 6 D.11 21解析：解析 For 循环的一般格式是：For 循环变量=初值 To 终值 Step步长语句Exit For语句Next循环变量该循环语句的执行过程为：“循环变量”首先取得“初值”，检查是否超过“终值”，如果超过，就一次也不循环而跳出循环，属于“先检查后执行”的类型。现在来看程序段，For k=1 To 0 中，初值为 1，终值为 0，显然当“循环变量”首先取得“初值”1，检查后超过

18、“终值” 0，所以一次也不执行，即最后执行 Print 时，k=1，a=6。30.如果要将窗体中的某个命令按钮设置成无效状态，应该设置命令按钮的什么属性（分数：2.00）A.ValueB.VisibleC.Enabled D.Default解析：解析 Enabled 属性是命令按钮的状态属性，如果将该属性设为 True，则命令按钮有效；如果设置成 Flase，则命令按钮无效。31.栈和队列的共同特点是（分数：2.00）A.都是先进先出B.都是先进后出C.只允许在端点处插入和删除元素 D.没有共同点解析：解析 栈和队列都是一种特殊的操作受限的线性表，只允许在端点处进行插入和删除。二者的区别是：栈

19、只允许在表的一端进行插入或删除操作，是一种“后进先出”的线性表；而队列只允许在表的一端进行插入操作，在另一端进行删除操作，是一种“先进先出”的线性表。32.窗体上有 Text1、Text2 两个文本框及一个命令按钮 Command1，编写下列程序Dim y As IntegerPrivate Sub Command1_Click()Dim x As IntegerX=2Text1.Text=Fun2(Fun1(x)，y)Text2.Text=Fun1(x)End SubPrivate Function Fun1(x As Integer)As Integerx=x+y:y=x+yFun1=x+

20、yEnd FunctionPrivate Function Fun2(x As Integer，y As Integer)As IntegerFun2=2*x+yEnd Function当单击 1 次和单击 2 次命令按钮后，文本框 Textl 和 Text2 内的值分别是（分数：2.00）A.2 42 4B.2 44 8C.10 1058 58 D.4 48 8解析：解析 函数 Fun1 和 Fun2 都是传值调用，其中，Text1 文本框中的内容使用了嵌套调用。实参 X是过程变量，实参 Y 是窗体变量。33.执行下列程序段后，输出的结果是For k1=0 To 4y=20For k2=0

21、To 3y=10For k3=0 To2y=y+10Next k3，k2，k1Print y（分数：2.00）A.90B.60C.40 D.10解析：解析 这是一个 3 重循环嵌套的程序。多重 For 循环的执行过程是：外层循环的循环控制变量每取一个值，内循环的循环控制变量要取遍所有的值。这个程序中最外两层循环的最后一次循环执行时 k1= 4，k2=3，都要再执行一次 y=10，不管 y 以前取得何值， y 都要重新取得初值 10，这时再执行 1 次内循环。内层循环体要执行 3 次，即加 3 次 10。y 最终的值是 40。34.下列程序段的执行结果为a=3：b=1For i=1 To 3f=

22、a+b：a=b：b=fPrint fNext I（分数：2.00）A.4 3 6B.4 5 9 C.6 3 4D.7 2 8解析：解析 初始值 a=3，b=1。For 循环中步长缺省值为 1，循环变量 I 的初值为 1，终值为 3，所以此循环结构可以循环 3 次。第 1 次循环后，结果为：f=4，a=1，b；4第 2 次循环后，结果为：f=5，a=4，b=5第 3 次循环后，结果为：f=9，a=5，b=9因此每循环一次，便输出 f 当前值，循环 3 次即便输出 3 个 f 值分别为 4，5，9。35.能够将 Picture 对象 Picl 加载当前目录中的 face.bmp 的语句是（分数：2

23、.00）A.Pic1.Picture=LoadPicture(App.path &“face.bmp“) B.Pic1.LoadPicture(App.path 及&“face.bmp“)C.Picutrel.Picutre=LoadPicture(App.path&“face.bmp“)D.Picturel.LoadPicture(App.path &“face.bmp“)解析：解析 LoadPieture 是 Visual Basic 的函数，不是图片对象的方法，因此选项 B 和 D 是错误的。图片的 Picture 属性必须用 LoadPicture 函数才能加载图片。本题中图片对象的名

24、称为 Pic1 而不是默认的 Picture 1，因此正确答案是选项 A。二、填空题(总题数：15，分数：30.00)36.算法的基本特征是可行性、确定性、 【1】 和拥有足够的情报。（分数：2.00）填空项 1:_ （正确答案：有穷性）解析：解析 算法是指解题方案的准确而完整的描述。它有 4 个基本特征，分别是可行性、确定性、有穷性和拥有足够的情报。37.某二叉树中度为 2 的结点有 18 个，则该二叉树中有 【2】 个叶子结点。（分数：2.00）填空项 1:_ （正确答案：19）解析：解析 在任意一棵二叉树中，度为 0 的结点(即叶子结点)总是比度为 2 的结点多一个。38.在面向对象的程

25、序设计中，类描述的是具有相似性质的一组 【3】 。（分数：2.00）填空项 1:_ （正确答案：对象）解析：解析 将属性、操作相似的对象归为类，也就是说，类是具有共同属性、共同方法的对象的集合。39.通常，将软件产品从提出、实现、使用维护到停止使用退役的过程称为 【4】 。（分数：2.00）填空项 1:_ （正确答案：软件生命周期）解析：解析 软件产品从考虑其概念开始，到该软件产品不能使用为止的整个时期都属于软件生命周期。一般包括可行性研究与需求分析、设计、实现、测试、交付使用以及维护等活动。40.数据库管理系统常见的数据模型有层次模型、网状模型和 【5】 3 种。（分数：2.00）填空项 1

26、:_ （正确答案：关系模型）解析：解析 数据库管理系统是位于用户与操作系统之间的一层系统管理软件，是一种系统软件，是用户与数据库之间的一个标准接口。其总是基于某种数据模型，可以分为层次模型、网状模型和关系模型。41.函数 Int(Rnd*10)+10 的值为范围是 【6】 。（分数：2.00）填空项 1:_ （正确答案：(10，19)）解析：解析 Rnd 产生随机数的范围为(01110.999)；因此，Rnd*10 的范围为(0.111-9.999)；Int()函数是取整，Int(Rnd，10)取整后的范围为(1-9)；再加上 10，所以试子的取值范围为(10-19)。42.当对象得到焦点时，

27、会触发 GotFocus 事件，当对象失去焦点时将触发 【7】 事件。（分数：2.00）填空项 1:_ （正确答案：LostFocus）解析：解析 在 Visual Basic 中，当对象得到焦点时，它可以接收用户的输入；当得到焦点时会触发GotFocus 事件，当失去焦点时会触发 DostFocus 事件。43.用户可以用 【8】 语句定义自己的数据类型。（分数：2.00）填空项 1:_ （正确答案：Type）解析：解析 用户可以用 Type 语句来定义数据类型，格式是：Type 数据类型名数据类型元素名 As 类型名数据类型元素名 As 类型名EndType其中“数据类型名”是要定义的数据

28、类型的名字，其命名规则和变量的命名规则相同；“数据类型元素名”也遵守相同的规则，且不能是数组名；“类型名”可以是任何基本数据类型，也可以是用户定义的类型。44.下面程序的功能是计算给定正整数序列中奇数之和 y 与偶数之和 x，最后输出 x 平方根与 y 平方根的乘积。请在画线处填上适当的内容使程序完整。Private Sub Form_Click()a=Array(3，6，8，11，64，13，24，9，42，35，22)y=Fun1(a)print yEnd SubPrivate Function Fun1(b)x=0：y=0for k=0 to 10If 【9】 Mod 2=0 thenx

29、=x+b(x)elsey=y+b(x)End IfNextFun1=Sqr(x)*Sqr(y)End Function（分数：2.00）填空项 1:_ （正确答案：a(0)）解析：解析 数据的奇偶性，在默认的情况下数组的下标从 0 开始，所以填 a(0)。45.执行下面的程序段，x 的值为 【10】 。Private Sub Command1_Click()For i=1 To 9a=a+iNextx=Val(i)MsgBox xEnd Sub（分数：2.00）填空项 1:_ （正确答案：10）解析：解析 在程序中 ForNext 语句之后并没有对 i 的值改变，此时 i 为 10，故运行后结

30、果为 10。46.在窗体上面有一个列表，然后编写如下两个事件过程：Private Sub Form_Click()List1.RemoveItem 1：List1.RemoveItem2List1.RemoveItem 3End SubPrivate Sub Form_Loab()List1.AddItem “ItemA “:List1.AddItem “Item B“List1.AddItem“Item C“：List1.AddItem “ItemD“List1.AddItem “ItemE“End Sub运行上面的程序，然后单击窗体，列表框中显示的项目是 【11】 。（分数：2.00）填空

31、项 1:_ （正确答案：List1.AddItem“ItemA“List.AddItem “ItemC/）解析：解析 在列表框中删除项目时，“索引值”可以指定插入项在列表框中的位置，表中的项目从。开始计数，则题目中是删除第 2，3，4 项，列表框中显示的项目是“ItemA“和“ItemE“。47.设有如下程序：Private Sub Form_Click()Dim a As Integer，s As Integern=8：s=0Dos=s+n:n=n-1Loop While n0Print sEnd Sub以上程序的功能是计算 1 到 8 的和。程序运行后，单击窗体，输出结果为 【12】 。（

32、分数：2.00）填空项 1:_ （正确答案：36）解析：解析 DoWhile 语句的循环运算次数为 8 次，当 n 减小到 0 时跳出循环。所以经运算s=1+2+3+4+5 +6+7+8，其结果为 36。48.执行如下程序段后，intsum 的值为 【13】 。Private Sub Command1_Click()sum=0For i=1 To 18 Step 2For j=2 To 6If(i Mod j)0 Then sum=sum+jNextNextPrint sumEnd Sub（分数：2.00）填空项 1:_ （正确答案：161）解析：解析 单循环次数 r=int(终值-初值+步

33、K)/步长)，嵌套循环次数是各层循环次数的乘积。该段程序的循环次数为 95=45(次)，当 i 不能被 j 整除时，j 的值相加。该段程序中只有以下条件不成立，即 3/3、5/ 5、9/3、15/3、15/5，所以计算结果为 9(2+3+4+5+ 6)-(3+5+3+3+5)=161。49.在窗体上画一个文本框，名称为 Text1，画一个命令按钮，名称为 Command1。程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件 test .dat 中。请在空格处填上适当的内容，将程序补充完整。Private Sub Command1_Click()Open “c:

34、/test.dat“For 【14】 As #1For i=1 to Len(Text1.text)print#1，mid(Text1.Text，i，1)NextClose #iEnd Sub（分数：2.00）填空项 1:_ （正确答案：output）解析：解析 文件的打开方法中 Output 是指定顺序输出方式。50.设在工程中有一个标准模块，其中定义了如下记录类型Type BooksName As String*10TelNum As string*20End Type在窗体上画一个名为 Command1 的命令按钮，要求当执行事件过程 Command1_Click 时，在顺序文件 Person.txt 中写入一条记录。该操作的事件过程是 【15】 。（分数：2.00）填空项 1:_ （正确答案：Private Sub Command1_Click()Dim Book1 As BooksOpen“c：/Person.txt“For Output As #1Book1.Name=InputBox(“输入姓名”)Book1.TelNum=InputBox(“输入电话号码”)Write#1，Book1.Name，Book1.TelNumClose#1End Sub）解析：解析 引用记录类型成员的格式是：类型名.成员名。其中记录类型各个成员可以是不同的类型数据。