全国计算机二级考试历年真题练习考点accessc语言

1、2013 年计算机二级考试必备历年真题演练5 年一、选择题（ 1） （35）每小题 2 分，共 70 分下列各题A）、B）、 C）、D）四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。 （ 1）数据的存储结构是指（）。 A 存储在外存中的数据B数据所占的存储空间量C数据在计算机中的顺序存储方式D数据的逻辑结构在计算机中的表示（ 2）下列关于栈的描述中错误的是（）。A栈是先进后出的线性表 B 栈只能顺序存储 C 栈具有记忆作用D对栈的插入与删除操作中，不需要改变栈底指针（ 3）对于长度为 n 的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是（

2、）。A冒泡排序为 n/2 B 冒泡排序为 n C快速排序为 n D快速排序为 n(n-1)/2（ 4）对长度为 n 的线性表进行顺序查找， 在最坏情况下所需要的比较次数为 （）。 Alog2nBn/2CnDn+1（ 5）下列对于线性链表的描述中正确的是（）。 A 存储空间不一定是连续，且各元素的存储顺序是任意的 B 存储空间不一定是连续，且前件元素一定存储在后件元素的前面C存储空间必须连续，且前件元素一定存储在后件元素的前面 D存储空间必须连续，且各元素的存储顺序是任意的（ 6）下列对于软件测试的描述中正确的是（）。A软件测试的目的是证明程序是否正确B软件测试的目的是使程序运行结果正确C软件测

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

4、的数据只能被对应的应用程序所使用D以上三种说法都不对（ 10）用树形结构表示实体之间联系的模型是（A关系模型）。B网状模型C层次模型D以上三个都是 （11）在窗体（名称为 Form1）上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试” 。以下能实现上述操作的事件过程是（）。APrivate Sub Text1_Change()Command1.Caption = 计算机等级考试End SubBPrivate Sub Command1_ Click ()Capti

5、on = 计算机等级考试 End SubCPrivate Sub Form1_ Click ()Text1.Caption = 计算机等级考试 End SubDPrivate Sub Command1_ 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 dA1BTrueCFalseD2）。（ 13）设 a = MicrosoftVisualBasic，则以下使变量b 的值为“ VisualBasic”的语句是（）。Ab = Left(a, 10)B

6、该文章转载自无忧考网：b = Mid(a, 10)Cb = Right(a, 10)Db = Mid(a, 11, 10)（ 14）假定有如下的窗体事件过程：Private Sub Form_Click()a$ = Microsoft Visual Basic b$ = Right(a$, 5)c$ = Mid(a$, 1, 9)MsgBox a$, 34, b$, c$, 5End Sub程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是（AMicrosoft Visual）。BMicrosoftCBasicD5（ 15）设 a = a，b = b，c = c， d = d，执行语

7、句x=IIf(aD, ”A”, ”B”) 后， x 的值为（）。A” a”B” b”C”B”D”A”（ 16）为了使命令按钮（名称为Command1）右移200，应使用的语句是（）。ACommand1.Move -200BCommand1.Move 200CCommand1.Left = Command1.Left + 200DCommand1.Left = Command1.Left - 200（ 17）在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()x = InputBox( 请输入一个整数 )Print x + Text1.TextEnd Su

8、b程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（）。A123B456C479D123456（ 18）在窗体上画一个文本框和一个计时器控件，名称分别为 Text1 和 Timer1 ，在属性窗口中把计时器的 Interval 属性设置为 1000，Enabled 属性设置为 False 。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：Private Sub Command1_Click()Timer1. （）End SubPrivate Sub Timer1_Timer()T

9、ext1.Text = TimeEnd Sub在下划线处应填入的内容是（）。AEnabled = TrueBEnabled = FalseCVisible = TrueDVisible = False（ 19）假定在图片框 Picture1 中装入了一个图形，为了清除该图形（不删除图片框） ，应采用的正确方法是（ ）。A选择图片框，然后按Del 键B执行语句 Picture1.Picture = LoadPicture ()C执行语句 Picture1.Picture =D选择图片框，在属性窗口中选择Picture属性条，然后按回车键（ 20）在窗体上画一个名称为 List1 的列表框， 一个

10、名称为 Label1 的标签，列表框中显示若干个项目。 当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是：_。APrivate Sub List1_Click()Label1.Caption = List1.ListIndex End SubBPrivate Sub List1_Click() Label1.Name=List1.ListIndex End SubCPrivate Sub List1_Click() Label1.Name=List1.Text End SubDPrivate Sub List1_Click()Label1.Caption

11、 =List1.TextEnd Sub （21）在窗体上画一个命令按钮，其名称为Comma该文章转载自无忧考网：Private Sub Command1_Click()Dim i As Integer, x As IntegerFor i = 1 To 6If i = 1 Then x = iIf i 0 And a 10 And a 20 And a c Thend = d + x(i)c = x(i)Elsed = d - cEnd IfNextPrint dEnd Sub程序运行后，如果单击命令按钮，则在窗体上输出的内容为（A 10）。B16C12D20（ 32）设有如下程序：Priva

12、te Sub Command1_Click()Dim c As Integer, d As Integerc = 4d = InputBox(请输入一个整数Do While d 0If d c Thenc = c + 1End If)d = InputBox(请输入一个整数 )LoopPrint c + dEnd Sub程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是（）。A12B1110D9（ 33）在窗体上画一个名称为 Command1的命令按钮和一个名称为 Text1 的文本框，在文本框中输入以下字符串：Microsoft Visu

13、该文章转载自无忧考网： Basic Programming 然后编写如下事件过程：Private Sub Command1_Click()Open d:tempoutf.txt For Output As #1For i = 1 To Len(Text1.Text)c = Mid(Text1.Text, i, 1)If c = A And c = Z ThenPrint #1, LCase(End IfNext iCloseEnd Sub程序运行后，单击命令按钮，文件outf.txt中的内容是（）。AMVBPBmvbpCMDmV vB bP p（ 34）在窗体上画一个名称为 Command1的

14、命令按钮，然后编写如下程序：Dim SW As BooleanFunction func(X As Integer) As Integer If X 20 ThenY = XElseY=20+XEnd Iffunc = YEnd FunctionPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) SW = FalseEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Sin

15、gle, Y As Single)SW = TrueEnd SubPrivate Sub Command1_Click()Dim intNum As IntegerintNum = InputBox()If SW ThenPrint func(intNum)End IfEnd Sub程序运行后，单击命令按钮，将显示一个输入对话框，如果在输入对话框中输入25，则程序的执行结果为（）。A输出 0B输出 25输出 45D无任何输出（ 35）设有如下通用过程：Public Sub Fun(a() As Integer, x As Integer)For i = 1 To 5x = x + a(i)Ne

16、xtEnd Sub在窗体上画一个名称为Text1 的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程：Private Sub Command1_Click()Dim arr(5) As Integer, n As IntegerFor i = 1 To 5arr(i) = i + iNextFun arr, nText1.Text = Str(n)End Sub程序运行后，单击命令按钮，则在文本框中显示的内容是（）。A30B25C20D15 二、填空题（每空2 分，共 30 分）请将每空的正确答案写在答题卡【1】【 15】序号的横线上，答在试卷上不得分。（1）某二叉树中度为

17、2 的结点有 18 个，则该二叉树中有【 1】 个叶子结点。（2）在面向对象方法中，类的实例称为【2】 。（3）诊断和改正程序中错误的工作通常称为【 3】 。（4）在关系数据库中，把数据表示成二维表，每一个二维表称为【4】 。（5）问题处理方案的正确而完整的描述称为【 5】 。（6）以下语句输出结果是【6】 。Print Int(12345.6789 * 100 + 0.5) / 100（7）在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_该文章转载自无忧考网：Text1.Text = VB程序设计 End SubPrivate Sub Text1

18、_Change()Picture1.Print VB ProgrammingEnd Sub程序运行后，单击窗体，则在文本框中显示的内容是【7】 ，而在图片框中显示的内容是【8】 。（8）阅读下面的程序：Private Sub Form_Click()Dim Check As Boolean, Counter As IntegerCheck = TrueCounter = 5DoDo While Counter 0Print sEnd Sub以上程序的功能是【 10】 。程序运行后，单击窗体，输出结果为【11】 。（10）设有如下程序：Option Base 1Private Sub Comma

19、nd1_Click()Dim arr1Dim Min As Integer, i As Integerarr1 = Array(12, 435, 76, -24, 78, 54, 866, 43)Min =【12】For i = 2 To 8If arr1(i) Min Then【13】NextPrint 最小值是： ; MinEnd Sub以上程序的功能是：用 Array 函数建立一个含有 8 个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。（11）在名称为Form1 的窗体上画一个文本框，其名称为属性设置为 True ，然后编写如下的事件过程：Private Sub Form_

20、Click()Open d:testsmtext1.txt For Input As #1Do While Not【 14】Line Input #1, aspect$whole$ = whole$ + aspect$ + Chr$(13) + Chr$(10)LoopText1.Text = whole$Close #1Open d:testsmtext2.txt For Output As #1Print #1,【 15】Close #1End SubText1 ，在属性窗口中把该文本框的MultiLine上述程序的功能是，把磁盘文件 smtext1.txt 的内容读到内存并在文本框中显示

21、出来，然后把该文本框中的内容存入磁盘文件 smtext2.txt 。请填空 2005 年 4 月全国计算机等级考试二级 VB语言笔试答案参考答案：选择题：1-5 DBDCA6-10 CBDDC11-15 ABBCD16-20 CDABD21-25 ABCDB26-30 CDBBA31-35 CDDDA填空题：【1】19【2】 对象【3】 程序调试该文章转载自无忧考网：【5】 算法【6】12345.68【7】VB程序设计【8】 VB Programming【9】 10【4】 关系【10】 求 1-8 的和【11】 36【12】 arr1(1)【13】 min=arr1(i)【14】 EOF(1)

22、【15】 text1.text(或whole$)结束该文章转载自无忧考网： 07 年 4 月二级 VB语言笔试试题及答案发布时间： 11-04页数：7页上一篇 :06 年四月全国等级考试二级VB语言考前密卷下一篇 :02 年 9 月二级 VB语言笔试试题及答案( 一)-2007 年 4 月全国计算机等级考试二级笔试试卷Visual Basic语言程序设计一、选择题 ( 第小题 2 分, 共 70 分)下列各题 A) 、B)、 C)、D)四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。(1) 下列叙述中正确的是 (B)A)算法的效率只与问题的规模有关，而与

23、数据的存储结构无关B)算法的时间复杂度是指执行算法所需要的计算工作量C)数据的逻辑结构与存储结构是一一对应的D)算法的时间复杂度与空间复杂度一定相关(2) 在结构化程序设计中，模块划分的原则是 (D) A)各模块应包括尽量多的功能B)各模块的规模应尽量大C)各模块之间的联系应尽量紧密D)模块内具有高内聚度、模块间具有低耦合度(3) 下列叙述中正确的是 (A)A)软件测试的主要目的是发现程序中的错误B)软件测试的主要目的是确定程序中错误的位置C)为了提高软件测试的效率，最好由程序编制者自己来完成软件的测试工作D)软件测试是证明软件没有错误(4) 下面选项中不属于面向对象程序设计特征的是 (C)

24、A)继承性B)多态性C)类比性D)封装性(5) 下列对队列的叙述正确的是 (D)A)队列属于非线性表B)队列按“先进后出”原则组织数据C)队列在队尾删除数据D)队列按“先进先出”原则组织数据（6) 对下列二叉树 (C)ABCDEFXYZ进行前序遍历的结果为A)DYBEAFCZXB)YDEBFZXCAC)ABDYECFXZD)ABCDEFXYZ(7) 某二叉树中有 n 个度为 2 的结点 , 则该二叉树中的叶子结点数为 (A) A)n+1B)n-1 C)2n D)n/2(8) 在下列关系运算中 , 不改变关系表中的属性个数但能减少元组个数的是 (B) A)并(9) 在 E R图中 , 用来表示实

25、体之间联系的图形是 (C) A)矩形B)椭圆形C)菱形D)平行四边形(10) 下列叙述中错误的是 (A)(11) 下面可以正确定义 2 个整形变量和 1 个字符串变量的语句的是 (D) A)Dim n,m AS Interger,s AS StringB)Dim a%,b$,c AS StringC)Dim a AS Integer,b,c AS String D)Dim x%,y AS Integer,z AS String(12) 下列表述中不能判断 x 是否为偶数的是 (D)A)x/2=Int(x/2)B)x Mod 2=0C)Fix(x/2)=x/2D)x2=013) 设在名称为 My

26、form 的窗体上只有 1 个名称为 C1的命令按钮 , 下面叙述中正确的是 (B) A)窗体的 Click 事件过程的过程名是 Myform_ClickB)命令按钮的 Click 事件过程名是 C1_ClickC)命令按钮的 Click 事件过程的过程名是 Command1_Click(14) 设窗体上有 1 个滚动条 , 要求单击滚动条右端的按钮一次 , 滚动条移动一定的刻度值 , 决定此刻度的属性是 (C)A)MaxB)MinC)SmallChangeD)LargeChang(15)1 个二维数组可以存放1 个矩形 . 在程序开始有语句Option Base 0, 则下面定义的数组中正好

27、可以存放1 个 4*3 矩阵 ( 即只有 12 个元素 ) 的是 (B)A)Dim a(-2 To 0,2) AS IntegerB)Dim a(3,2) AS IngegerC)Dim a(4,3)AS IngegerD)Dim a(-1 To -4,-1 To -3)AS Ingeger(16) 若设置了文本框的属性 PasswordChar=”$”, 则运行程序时向文本框中输入 8 个任意字符后 , 文本框中显示的是 (A)A)8 个” $” B)1 个” $” C)8 个”*”D)无任何内容(17) 设在窗体上有 1 个名称为 Combo1的组合框 , 含有 5 个项目 , 要删除最后

28、一项 , 正确的语句是 (B) A)Combo1.RemoveItem Combo1.TextB) Combo1.RemoveItem4C) Combo1.RemoveItem Combo1.ListCount D) Combo1.RemoveItem5(18) 工程中有 2 个窗体 , 名称分别为 Form1.Form2,Form1 为启动窗体 , 该窗体上有命令按钮 Command1,要求程序运行后单击该命令按钮时显示 Form2,则按钮的 Click 事件过程应该是 (A)A)Private Sub Command1_Click( )B) Private Sub Command1_Cli

29、ck( )Form2.ShowForm2.VisibleEndSubEndSubC) Private Sub Command1_Click( )D)Private Sub Command1_Click( )Load Form2Form2.LoadEndSubEndSub(19) 若在某窗体模块中有如下事件过程 (D) Private Sub Command1_Click(Index AS Integer)End Sub则以下叙述中正确的是A) 此事件过程与不带参数的事件过程没有区别B) 有 1 个名称为 Command1的窗体 , 单击此窗体则执行此事件过程C) 有 1 个名称为 Comman

30、d1的空件数组 , 数组中有多个不同类型控件D) 有 1 个名称为 Command1的空件数组 , 数组中有多个相同类型控件(20) 以下循环语句中在任何情况下都至少执行一次循环体的是(C)A)Do While B)While 循环体循环体LoopWendC)DoD)Do Until 循环体循环体Loop Until Loop(21) 在窗体上有 1 个名为 Cd1的通用对话框 , 为了在运行程序时打开保存文件对话框 , 则在程序总应使用的语句是 (A)A)Cd1.Action=2B)Cd1.Action=1C)Cd1.ShowSave=TureD)Cd1.ShowSave=0(22) 下面关

31、于菜单的叙述中错误的是 (B)A) 各级菜单中的所有菜单项的名称必须唯一(23) 已知有下面的过程 (D)Private Sub proc1(a As Integer,b As String,Optional x As Boolean)End Sub正确调用此过程的语句是A)Call procl(5)B)Call proc1 5,”abc”,FalseC)proc1(12, ” abc”,True)D)proc1 5,“abc”(24) 在窗体上有一个文件名称为 Text1 的文本框和 1 个名称为 Command1的命令按钮，要求在程序执行时，每单击命令按钮一次，文本框向右移动一定距离。下面

32、能够正确实现上述功能的程序是(C)A)Private Sub Command1_Click()Text1.Left=100End SubC)Private Sub Command1_Click()Text1.Move.Text.Left+100End SubB) Private Sub Command1_Click()Text1.Left= Text1.Left-100End SubD) Private Sub Command1_Click()Text1.Move.Text.LeftEnd Sub(25) 某人创建了 1 个工程，其中的窗体名称为 Form1;之后又添加了 1 个名为 Form

33、2的窗体，并希望程序执行时先显示 Form2窗体，那么，他需要做的工作是 (A)A)在工程属性对话框中把“启动对象”设置为 Form2 B)在 Form1的 Load 事件过程中加入语句 Load Form2 C)在 Form2的 Load 事件过程中加入语句 Form2.ShowD)在 Form2的 TabIndex 属性设置为，把 Form1的 TabIndex 属性设置为(26) 窗体上有个名称为 Text1 的文本框和个名称为 Command1的命令按钮。要求程序运行时， 单击命令按钮，就可以把文本框中的内容写到文件 out.txt 中，每次写入的内容附加到文件原有内容之后。下面能够实

34、现上述功能的程序是 (C)A)Private Sub Command1_Click()B) Private Sub Command1_Click()Open “out.txt” For Inpit As#1Open“out.txt”For Outpit As#1Print#1,Text1.TextPrint#1,Text1.TextClose#1Close#1End SubEnd SubC) Private Sub Command1_Click()D) Private Sub Command1_Click()Open “out.txt” For Append As#1OpenPrint#1,T

35、ext1.TextClose#1End Sub“out.txt” For Random As#1Print#1,Text1.TextClose#1End Sub(27) 为计算 1+3+5+99 的值，某人编程如下k=1s=0While k=99 k=k+2 : s=s+k WendPrint s在调试时发现运行结果有错误，需要修改。下列错误原因和修改方案中正确的是(D)A)WhileWend循环语句错误，应改为For k=1 To 99Next kB)循环条件错误，应改为Whlie k99C)循环前的赋值语句k=1 错误，应改为k=0D)循环中两条赋值语句的顺序错误，应改为s=s+k :（2

36、9）在窗体上有 1 个名称为 CommonDialog1的通用对话框和 1 个名称为 Command1的命令按钮， 以及其他一些控件。要求在程序运行时， 单击 Command1按钮，则显示打开文件对话框， 并在选择或输入了 1 个文件名后，就可以打开该文件。以下是 Command1_Click事件过程的两种算法算法 1：Private Sub Command1_Click()CommonDialog1.ShowOpenOpen CommonDialog1.FileName For Input As#1End Sub算法 2：Private Sub Command1_Click()CommonD

37、ialog1.ShowOpenIfCommonDialog1.FileName”ThenOpen CommonDialog1.FileName For Input As#1End IfEnd Sub下面关于这两种算法的叙述中正确的是(B)A) 显示打开文件对话框后若未选择或输入任何文件名，则算法2 会出错，算法 1 不会B) 显示打开文件对话框后若未选择或输入任何文件名，则算法1 会出错，算法 2 不会C) 两种算法的执行结果完全一样D) 算法 1 允许输入的文件名中含有空格，而算法 2 不允许（30）窗体上有 1 个名称为 List的列表框，其中已经输入了若干个项目（如图所示）：还有 2 个

38、文本框，名称分别为 Text1 、Text2, 1 个名称为 Command1的命令按钮，并有以下程序 Private Sub Command1_Click()Dim str As String, s As String, k As Integers=Text1Str=”For k=List1.ListCount-1 to 0 Step-1If InStr(List.List(k),s)0 thenstr=str&List.List(k)&”End IfNext kIf str=”ThenText2=”没有匹配的项目”ElseText2=strEnd IfEnd Sub程序运行时，在Text1 中输入“京”，单击命令按钮，则在Text2 中显示的内容是 (C)A) 京B) 北京 南京C) 南京D) 没有匹配的项目（31）在窗体上画 1 一个名称为 Command1的命令按钮，并编写以下程序 Private Sub Command1_Click()Print fun(“ ABCDEFG