计算机2级考试题目

计算机2级考试题目1计算机2级考试2 2007-11-0121:11:03 阅读357 评论0 字号：大中小

�一、选择题（（1）~（35）每小题2分，共70分）

��下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。

��（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的线性表进行顺序查找，在最坏情况下所需要的比较次数为______。

�� A)log2n B)n/2 C)nD)n+1

��（5）下列对于线性链表的描述中正确的是______。

�� A) 存储空间不一定是连续，且各元素的存储顺序是任意的

�� B) 存储空间不一定是连续，且前件元素一定存储在后件元素的前面

�� C) 存储空间必须连续，且前件元素一定存储在后件元素的前面

�� D) 存储空间必须连续，且各元素的存储顺序是任意的

��（6）下列对于软件测试的描述中正确的是______。

�� A) 软件测试的目的是证明程序是否正确

�� B) 软件测试的目的是使程序运行结果正确

�� C) 软件测试的目的是尽可能多地发现程序中的错误

�� D) 软件测试的目的是使程序符合结构化原则

��（7）为了使模块尽可能独立，要求______。

�� A) 模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强

�� B) 模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱

�� C) 模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱

�� D) 模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强

��（8）下列描述中正确的是______。

�� A)程序就是软件 B)软件开发不受计算机系统的限制

�� C)软件既是逻辑实体，又是物理实体

�� D)软件是程序、数据与相关文档的集合

��（9）数据独立性是数据库技术的重要特点之一。所谓数据独立性是指______。

�� A)数据与程序独立存放

�� B)不同的数据被存放在不同的文件中

�� C)不同的数据只能被对应的应用程序所使用

�� D)以上三种说法都不对

��（10）用树形结构表示实体之间联系的模型是______。

�� A)关系模型 B)网状模型 C)层次模型 D)以上三个都是

��（11）在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。

�� A) Private SubText1_Change()

�� Command1.Caption ="计算机等级考试"

��End Sub

�� B) Private SubCommand1_ Click ()

�� Caption = "计算机等级考试"

��End Sub

�� C) Private SubForm1_ Click ()

�� Text1.Caption ="计算机等级考试"

��End Sub

�� D) Private SubCommand1_ Click ()

�� Text1.Text ="计算机等级考试"

��End Sub

��（12）设a=5，b=4，c=3，d=2下列表达式的值是______。

��3 > 2 * b Or a =c And b <> c Or c > d

�� A)1 B)True C)False D)2

��（13）设a = "MicrosoftVisualBasic" ，则以下使变量b的值为“VisualBasic”的语句是______。

�� A) b = Left(a, 10)B) b = Mid(a, 10)

�� C) b = Right(a,10) D) b = Mid(a, 11, 10)

��（14）假定有如下的窗体事件过程：

��Private SubForm_Click()

�� a$ ="Microsoft Visual Basic"

�� b$ = Right(a$, 5)

�� c$ = Mid(a$, 1, 9)

�� MsgBox a$, 34, b$,c$, 5

��End Sub

��程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是______。

�� A) MicrosoftVisual B) Microsoft

�� C) Basic D)5

��（15）设a = "a"，b = "b"，c = "c"，d = "d"，执行语句x=IIf((ad),”A”,”B”)后，x的值为______。

�� A)”a” B)”b” C)”B” D)”A”

��（16）为了使命令按钮（名称为Command1）右移200，应使用的语句是______。

�� A) Command1.Move-200

�� B) Command1.Move200

�� C) Command1.Left =Command1.Left + 200

�� D) Command1.Left =Command1.Left - 200

��（17）在窗体上画一个文本框，然后编写如下事件过程：

��Private SubForm_Click()

��x = InputBox("请输入一个整数")

�� Print x +Text1.Text

��End Sub

��程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为______。

�� A) 123 B)456 C)479 D) 123456

��（18）在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：

��Private SubCommand1_Click()

��Timer1.______

��End Sub

��Private SubTimer1_Timer()

�� Text1.Text = Time

��End Sub

��在下划线处应填入的内容是______。

�� A) Enabled = TrueB) Enabled = False

�� C) Visible = TrueD) Visible = False

��（19）假定在图片框Picture1中装入了一个图形，为了清除该图形（不删除图片框），应采用的正确方法是______。

�� A)选择图片框，然后按Del键

�� B)执行语句Picture1.Picture = LoadPicture ("")

�� C)执行语句Picture1.Picture =""

�� D)选择图片框，在属性窗口中选择Picture属性条，然后按回车键

��（20）在窗体上画一个名称为List1的列表框，一个名称为Label1的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是：_____。

�� A)Private SubList1_Click()

�� Label1.Caption =List1.ListIndex

�� End Sub

�� B)Private SubList1_Click()

��Label1.Name=List1.ListIndex

�� End Sub

��C) Private Sub List1_Click()

��Label1.Name=List1.Text

�� End Sub

�� D) Private SubList1_Click()

�� Label1.Caption=List1.Text

�� End Sub

��（21）在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：

��Private SubCommand1_Click()

�� Dim i As Integer,x As Integer

�� For i = 1 To 6

�� If i = 1 Then x =i

�� If i <= 4 Then

�� x = x + 1

�� Else

�� x = x + 2

�� End If

�� Next i

�� Print x

��End Sub

��程序运行后，单击命令按钮，其输出结果为______。

�� A)9 B)6 C)12 D)15

��（22）在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程：

��Private Sub Command1_Click()

�� c = “ABCD”

�� For n= 1 To 4

�� Print ______

�� Next

��End Sub

��程序运行后，单击命令按钮，要求在窗体上显示如下内容

��D

��CD

��BCD

��ABCD

��则在______处填入的内容为。

�� A) Left(c,n) B)Right(c,n) C) Mid(c,n,1) D) Mid(c,n,n)

��（23）执行以下程序段

��Dim i As Integer, xAs Integer

��x = 0

��For i = 20 To 1Step -2

�� x = x + i \ 5

��Next

��Print x

��后，x的值为______。

�� A)16 B)17 C)18D)19

��（24）在Visual Basic工程中，可以作为“启动对象”的程序是______。

�� A)任何窗体或标准模块 B)任何窗体或过程

�� C)Sub Main过程或其他任何模块 D) Sub Main过程或任何窗体

��（25）假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是______。

�� A)数组中每个命令按钮的名称（Name属性）均为Command1

�� B)数组中每个命令按钮的标题（Caption属性）都一样

�� C)数组中所有命令按钮可以使用同一个事件过程

�� D)用名称Command1(下标)可以访问数组中的每个命令按钮

��（26）把窗体的KeyPreview属性设置为True，然后编写如下事件过程

��Private SubForm_KeyPress(KeyAscii As Integer)

�� Dim ch As String

�� ch = Chr(KeyAscii)

�� KeyAscii =Asc(UCase(ch))

�� Print Chr(KeyAscii+ 2)

��End Sub

��程序运行后，按键盘上的“A”键，则在窗体上显示的内容是______。

�� A)A B) B C)C D)D

��（27）在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：

�� Private SubCommand1_Click()

�� a=InputBox(“请输入日期（1~31）”)

�� t=”旅游景点：” _

�� & IIf ( a >0 And a <= 10,”长城”,””) _

�� & IIf ( a>10 And a <= 20,”故宫”,””) _

�� & IIf ( a >20 And a <= 31,”颐和园”,””)

�� Text1.Text = t

�� End Sub

��程序运行后，如果从键盘上输入16，则在文本框显示的内容是______。

�� A) 旅游景点：长城故宫 B) 旅游景点：长城颐和园

�� C) 旅游景点：颐和园 D) 旅游景点：故宫

��（28）在窗体上画一个名称为Label1的标签，然后编写如下事件过程：

��Private SubForm_Click()

�� Dim arr(10, 10) AsInteger

�� Dim i As Integer,j As Integer

�� For i = 2 To 4

�� For j = 2 To 4

�� arr(i, j) = i * j

�� Next j

�� Next i

�� Label1.Caption =Str(arr(2, 2) + arr(3, 3))

��End Sub

��程序运行后，单击窗体，在标签中显示的内容是______。

�� A)12 B)13 C)14D)15

��（29）在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：

��Private Functionfun(ByVal m As Integer)

�� If m Mod 2 = 0Then

�� fun = 2

�� Else

�� fun = 1

�� End If

��End Function

��Private SubCommand1_Click()

�� Dim i As Integer,s As Integer

�� s = 0

�� For i = 1 To 5

�� s = s + fun(i)

�� Next

�� Print s

��End Sub

��程序运行后，单击命令按钮，在窗体上显示的是______。

�� A)6 B)7 C)8 D)9

��（30）阅读程序：

��Option Base 1

��Dim arr() AsInteger

��Private SubForm_Click()

�� Dim i As Integer,j As Integer

�� ReDim arr(3, 2)

�� For i = 1 To 3

�� For j = 1 To 2

�� arr(i, j) = i * 2+ j

�� Next j

�� Next i

�� ReDim Preservearr(3, 4)

�� For j = 3 To 4

�� arr(3, j) = j + 9

�� Next j

�� Print arr(3, 2) +arr(3, 4)

��End Sub

��程序运行后，单击窗体，输入结果为______。

�� A)21 B)13 C)8 D)25

��（31）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：

�� Option Base 1

��Private SubCommand1_Click()

�� Dim c As Integer,d As Integer

�� d = 0

�� c = 6

�� x = Array(2, 4, 6,8, 10, 12)

�� For i = 1 To 6

�� If x(i) > cThen

�� d = d + x(i)

�� c = x(i)

�� Else

�� d = d - c

�� End If

�� Next

�� Print d

��End Sub

��程序运行后，如果单击命令按钮，则在窗体上输出的内容为______。

�� A) 10 B) 16 C) 12 D)20

��（32）设有如下程序：

��Private SubCommand1_Click()

�� Dim c As Integer,d As Integer

�� c = 4

�� d =InputBox("请输入一个整数")

�� Do While d > 0

�� If d > c Then

�� c = c + 1

�� End If

�� d =InputBox("请输入一个整数")

�� Loop

�� Print c + d

��End Sub

��程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是______。

�� A)12 B)11 C)10 D)9

��（33）在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串：Microsoft Visual Basic Programming

��然后编写如下事件过程：

��Private SubCommand1_Click()

�� Open"d:\temp\outf.txt" For Output As #1

�� For i = 1 ToLen(Text1.Text)

�� c =Mid(Text1.Text, i, 1)

�� If c >="A" And c <= "Z" Then

�� Print #1, LCase(c)

�� End If

�� Next i

�� Close

��End Sub

��程序运行后，单击命令按钮，文件outf.txt中的内容是______。

�� A)MVBP B)mvbp C)MD)m

�� V v

�� B b

�� P p

��（34）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：

��Dim SW As Boolean

��Function func(X AsInteger) As Integer

�� If X < 20 Then

�� Y = X

�� Else

�� Y = 20 + X

�� End If

�� func = Y

��End Function

��Private SubForm_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

�� SW = False

��End Sub

��Private SubForm_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

�� SW = True

��End Sub

��Private SubCommand1_Click()

�� Dim intNum As Integer

�� intNum = InputBox("")

�� If SW Then

�� Print func(intNum)

�� End If

��End Sub

��程序运行后，单击命令按钮，将显示一个输入对话框，如果在输入对话框中输入25，则程序的执行结果为______。

�� A)输出0 B)输出25 C)输出45 D)无任何输出

��（35）设有如下通用过程：

��Public Sub Fun(a()As Integer, x As Integer)

�� For i = 1 To 5

�� x = x + a(i)

�� Next

��End Sub

��在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程：

��Private SubCommand1_Click()

�� Dim arr(5) AsInteger, n As Integer

�� For i = 1 To 5

�� arr(i) = i + i

�� Next

�� Fun arr, n

�� Text1.Text =Str(n)

��End Sub

��程序运行后，单击命令按钮，则在文本框中显示的内容是______。

�� A)30 B)25 C)20D)15

��

��二、填空题（每空2分，共30分）

��请将每空的正确答案写在答题卡【1】～【15】序号的横线上，答在试卷上不得分。

��（1）某二叉树中度为2的结点有18个，则该二叉树中有【1】个叶子结点。

��（2）在面向对象方法中，类的实例称为【2】。

��（3）诊断和改正程序中错误的工作通常称为【3】。

��（4）在关系数据库中，把数据表示成二维表，每一个二维表称为【4】。

��（5）问题处理方案的正确而完整的描述称为【5】。

��（6）以下语句输出结果是【6】。

�� PrintInt(12345.6789 * 100 + 0.5) / 100

��（7）在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

��Private SubForm_Click()

�� Text1.Text ="VB程序设计"

��End Sub

�� Private SubText1_Change()

�� Picture1.Print"VB Programming"

��End Sub

��程序运行后，单击窗体，则在文本框中显示的内容是【7】，而在图片框中显示的内容是【8】。

��（8）阅读下面的程序：

�� Private SubForm_Click()

�� Dim Check AsBoolean, Counter As Integer

�� Check = True

�� Counter = 5

�� Do

�� Do While Counter< 20

�� Counter = Counter+ 1

�� If Counter = 10Then

�� Check = False

�� Exit Do

�� End If

�� Loop

�� Loop Until Check =False

�� Print Counter

��End Sub

��程序运行后，单击窗体，输出结果为【9】。

��（9）设有如下程序：

��Private SubForm_Click()

�� Dim n As Integer,s As Integer

�� n = 8

�� s = 0

�� Do

�� s = s + n

�� n = n - 1

�� Loop While n >0

�� Print s

��End Sub

��以上程序的功能是【10】。程序运行后，单击窗体，输出结果为【11】。

��（10）设有如下程序：

��Option Base 1

��Private SubCommand1_Click()

�� Dim arr1

�� Dim Min AsInteger, i As Integer

�� arr1 = Array(12,435, 76, -24, 78, 54, 866, 43)

�� Min = 【12】

�� For i = 2 To 8

�� If arr1(i) <Min Then 【13】

�� Next

�� Print "最小值是："; Min

��End Sub

��以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。

��（11）在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：

��Private SubForm_Click()

�� Open"d:\test\smtext1.txt" For Input As #1

�� Do While Not 【14】

�� Line Input #1,aspect$

�� whole$ = whole$ +aspect$ + Chr$(13) + Chr$(10)

�� Loop

�� Text1.Text =whole$

�� Close #1

�� Open"d:\test\smtext2.txt" For Output As #1

�� Print #1, 【15】

�� Close #1

��End Sub

��上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。

��

��

��参考答案：

��

��选择题：

�� 1---5 DBDCA

�� 6---10 CBDDC

�� 11--15 ABBCD

�� 16--20 CDABD

�� 21--25 ABCDB

�� 26--30 CDBBA

�� 31--35 CDDDA

��

��填空题：

��【1】19

��【2】对象

��【3】程序调试

��【4】关系

��【5】算法

��【6】12345.68

��【7】VB程序设计

��【8】 VB Programming

��【9】 10

��【10】求1-8的和

��【11】36

��【12】 arr1(1)

��【13】min=arr1(i)

��【14】 EOF(1)

��【15】text1.text(或whole$)