《2023年3和9月月计算机等级考试二级-VB笔试真题及答案.docx》由会员分享，可在线阅读，更多相关《2023年3和9月月计算机等级考试二级-VB笔试真题及答案.docx（24页珍藏版）》请在课桌文档上搜索。
1、2023年3月全国计算机等级考试二级VB笔试试卷一、选择题（每题2分，共70分）（1）下列叙述中正确的是（）A）对长度为n的有序链表进行查找，最坏状况下须要比较次数为nB）对长度为n的有序链表进行对分查找，最坏状况下须要比较次数为（n2）C）对长度为n的有序链表进行对分查找，最坏状况下须要的比较次数（Iog2n）D）对长度为n的有序链表进行对分查找，最坏状况下须要的比较次数（nlog2n）（2）算法的时间困难是指（）A）算法的执行时间B）算法所处理的数据量C）算法程序中的语句或指令条数D）算法在执行过程中所须要的基本运算次数（3）软件按功能可以分为：应用软件、系统软件和支持软件（或工具软件），
2、下面属于系统软件的是（）A）编辑软件B）操作系统C）教务管理系统D）阅读器（4）软件（程序）调试的任务是（）A）诊断和改正程序中的错误B）进肯能多的发觉程序中的错误C）发觉并改正程序中的全部错误D）确定程序中错误的性质（5）数据流程图（DFD图）是（）A）软件概要设计的工具B）软件具体设计的工具C）机构化方法的需求分析工具D）面对对象方法的需求分析工具（6）软件生命周期可以分为定义阶段，开发阶段和维护阶段。具体设计属于（）A）定义阶段B）开发阶段C）维护阶段D）上述三个阶段（7）数据库管理系统中负责数据模式定义的语言是A）数据定义语言B）数据管理语言C）数据操纵语言D）数据限制语言（8）在学生
3、管理的关系数据库中，存取一个学生信息的数据单位是A）文件B）数据库C）字段D）记录（9）数据库设计中，用E-R图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的A）需求分析阶段B）逻辑设计阶段O概念设计阶段D）物理设计阶段（IO）有两个关系R和T如下：ABCa12b22c32d32H口HLJEJH则由关系R得到关系T的操作是A)选择B)投影C)交D)并(11)在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是(12)设X是整型变量，与函数11f(xO,-x,x)有相同结果的代数式是A) xB) -IxIC) XD) -X(13)设窗体文件中有下面的事务
4、过程：PrivateSubCommandl_Click()Dimsa%=100PrintaEndSub其中变量a和S的数据类型分别是A)整型，整型B)变体型，变体型C)整型，变体型D)变体型，整型(14)下面哪个属性确定不是框架控件的属性A) TextB) CaptionC) 1.eftD) Enabled(15)下面不能在信息框中输出“VB”的是A) MsgBoxVBB) X=MsgBox(MVB)C) MsgBox(rVB)D) CallMSgBOXVB(16)窗体上有一个名称为OPtionl的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事务过程PrivateSubOpti
5、on1_Click(IndexAsInteger)EndSub下面关于此过程的参数Index的叙述中正确的是A) IndeX为1表示单选按钮被选中，为0表示未选中B) IndeX的值可正可负C) Index的值用来区分哪个单选按钮被选中D) Index表示数组中单选按钮的数量(17)设窗体中有一个文本框Textl,若在程序中执行了TeXtLSetFOeus,则触发A) Textl的SetFocus事务B) Textl的GotFoCUS事务C) Textl的LOStFoCUS事务D)窗体的GotFocus事务(18) VB中有3个键盘事务：KeyPressKeyDown,KeyUp,若光标在Te
6、Xtl文本框中，则每输入一个字母A)这3个事务都会触发B)只触发KeyPreSS事务C)只触发KeyDoWn、KeyUP事务D)不触发其中任何一个事务(19)下面关于标准模块的叙述中错误的是A)标准模块中可以声明全局变量B)标准模块中可以包含一个SUbMain过程，但此过程不能被设置为启动过程O标准模块中可以包含一些PUbliC过程D) 一个工程中可以含有多个标准模块(20)设窗体的名称为Form1,标题为Win,则窗体的MoUSeDOWn事务过程的过程名是A) Form1.MouseDownB) Win_MouseDownC) Form_MouseDownD) MouseDown_Form1
7、(21)下面正确运用动态数组的是A) Dimarr()AsIntegerReDimarr(3,5)B) Dimarr()AsIntegerReDimarr(50)AsStringC) Dimarr()ReDimarr(50)AsIntegerD) Dimarr(50)AsIntegerReDimarr(20)(22)下面是求最大公约数的函数的首部Functiongcd(ByValXAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数，下面正确的语句是A)Printgcd(8J2),gcd(12J6),gcd(16,8)B) Print
8、gcd(8,12J6)C) Printgcd(8),gcd(12),gcd(16)D) Printgcd(8,gcd(!2,16)(23)有下面的程序段，其功能是按图1所示的规律输出数据Dima(3,5)AsIntegerFori=lTo3Forj=ITo5A(i,j)=i+jPrinta(i,j);NextPrintNext若要按图2所示的规律接着输出数据，则接在上述程序段后面的程序段应当是A) Fori=1To5Forj=ITo3Printa(j,i);NextPrintNextB) Fori=lTo3Forj=ITo5Printa(j,i);NextPrintNextC) Forj=IT
9、o5Fori=lTo3Printa(j,i);NextPrintNextD) Fori=lTo5Forj=ITo3Printa(i,j);NextPrintNext(24)窗体上有一个TeXtl文本框，一个Commandl吩咐按钮，并有以下程序PrivateSubCommandLCIick()DimnIfTextLTexto23456”Thenn=n+1PrinL口令输入错误&n&次EndIfEndSub希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”吩咐按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序须要修
10、改。下面修改方案中正确的是A)在Dimn语句的下面添加一句：n=0B)把Print”口令输入错误”&n&次改为Print口令输入错误+n+次C)把Print”口令输入错误&n&次改为Print口令输入错误&Str(n)&次D)把Dimn改为Staticn(25)要求当鼠标在图片框Pl中移动时，马上在图片框中显示鼠标的位置坐标。下面能正的确现上述功能的事务过程是A)(Button AS IntegenShift As Integer1X As Single, Y As Single) Print X,YEnd SubB)(Button AS IntegenShift As Integer1X A
11、s Single, Y As Single) Picture. Pri nt X,YEnd SubC)(Button AS IntegenShift As Integer1X As Single, Y As Single)PLPrintX, YPrivate Sub PLMOUSeMoVePrivate Sub Pl_MouseDownPrivate Sub Pl_MouseMoveEndSubPrivateSubForm_MouseMove(ButtonASIntegenShiftAsInteger1XAsSingle,YAsSingle)PLPrintX,YEndSub(26)计算二的近似
12、值的一个公式是。某人编写下面的程序用此公式计算并输出的近似值：PrivateSubComandI_Click()PI=ISign=1n=20000Fork=3TonSign=-SignZkPI=PHSignZkNextkPrintPI*4EndSub运行后发觉结果为3.22751,明显，程序须要修改。下面修改方案中正确的是A)把Fork=3Ton改为Fork=lTonB)把n=20000改为n=20000000C)把Fork=3Ton改为Fork=3TonStep2D)把PI=I改为Pl=O(27)下面程序计算并输出的是PrivateSubComandI_Click()a=10s=0Dos=s
13、+a*a*aa=a-l1.oopUntilaForm2,Forml为启动窗体。FOrm2中有菜单。其结构如表。要求在程序运行时，在FOrml的文本框TeXtl中输入口令并按回车键(回车键的ASCIl码为13)后，隐藏Form1,显示FOrm2。若口令为“Teacher”，全部菜单项都可见;否则看不到“成果录入”菜单项。为此，某人在FOrml窗体文件中编写如下程序：PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13ThenIfText1.Text=,TeacheroThenForm2.input.visible=TrueElseFor
14、m2.input.visible=FalseEndIfEndIfFormLHideForm2.ShowEndSub程序运行时发觉刚输入口令时就隐藏了Form1,显示了FOrm2,程序须要修改。下面修改方案中正确的是A)把Forml中Textl文本框及相关程序放到Form2窗体中B)把FOrmLHide、Form2.Show两行移到2个EndIf之间C)把IfKeyASeii=I3Then改为IfKeyASCii=TeaeherThenD)把2个Form2.input.Visib1e中的“Form2”删去(33)某人编写了下面的程序，希望能把TeXtl文本框中的内容写到OULtXt文件中Priv
15、ateSubComandI_Click()Openz,out.txt,fForOutputAs#2Print,TextlClose#2EndSub调试时发觉没有达到目的，为实现上述目的，应做的修改是A)把PrinLTeXtI改为Print#2,TextlB)把PrintTextl改为PrintTextlC)把PrintTextl改为Write,TextlD)把全部#2改为#1(34)窗体上有一个名为COmmandI的吩咐按钮，并有下面的程序：PrivateSubComandI_Click()Dimarr(5)AsIntegerFork=lTo5arr(k)=kNextkprogarr()For
16、k=lTo5Printarr(k)NextkEndSubSubprog(a()AsInteger)n=Ubound(a)Fori=nTb2step-IForj=ITon-1ifa(j)=0ThenCount(n)=Count(n)+1EndIfNextkm=count(0)Fork=lTo25Ifm2PrintiEndSub程序运行后，单击窗体，输出结果为【10】。(9)在窗体上画一个名称为COmmandl的吩咐按钮。然后编写如下程序：OptionBase1PrivateSubCommandl_Click()Dima(10)AsIntegerFori=lTo10a(i)=iNextCallsw
17、ap(11)Fori=lTo10Printa(i);NextEndSubSubswap(b()AsInteger)n=Ubound(b)Fori=lTon/2t=b(i)b(i)=b(n)b(n)=t12NextEndSub上述程序的功能是，通过调用过程swap,调换数组中数值的存放位置，即a(l)与a(10)的值互换，a(2)与a(9)的值互换，,请填空。(10)在窗体上画一个文本框，其名称为Textl,在属性窗口中把该文本框的MUltiLine属性设置为TrUe,然后编写如下的事务过程：PrivateSubForm_Click()OPend:testsmtextl.TxtForInputA
18、s#1DoWhileNot131.ineInput#1,aspect$Whole$=whole$+aspect$+Chr$(13)+Chr$(10)1.oopText1.Text=WholeS14OPend:testsmtext2.TxtForOutputAs#1Print#1,15Close#1EndSub运行程序,单击窗体,将把磁盘文件SmteXtI.lxt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件SmteXt2.txt。请填空。2023年3月全国计算机等级考试二级VB笔试试卷答案选择题1-5ADBAC6-10BADBA11(D)12(B)13(C)14（八）1
19、5(D)16(C)17(B)18（八）19(B)20（八）21（八）22(D)23（八）24(D)25(C)26(C)27（八）28(C)29(C)30(B)31(C)32(B)33（八）34(B)35(D)填空题(1)A,B,C,D,E,F,5,4,3,2,1(2) 15(3) Edbghfca(4)程序(5)课号(6)627500(8) 8NotIabelLvisible(9) 9Timer!.Enabled=Ture(10) 1028(II)Ula()或a(12) 12n=n-l(13) 13EOF(I)(14) 14Close#1(15) 15TextLTexttext1dfyz来自2
20、023年9月全国计算机等级考试二级笔试试卷VisualBasic语言程序设计（考试时间90分钟，满分100分）一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）下列叙述中正确的是（）。A）算法就是程序B）设计算法时只须要考虑数据结构的设计O设计算法时只须要考虑结果的牢靠性D）以上三种说法都不对（2）下列关于线性链表的叙述中，正确的是A）各数据结点的存储空间可以不连续，但它们的存储依次与逻辑依次必需一样B）各数据结点的存储依次与逻辑依次可以不一样，但它们的存储空间必需连续O进行插入与删除时
21、，不须要移动表中的元素D）以上三种说法都不对（3）下列关于二叉树的叙述中，正确的是A）叶子结点总是比度为2的结点少一个B）叶子结点总是比度为2的结点多一个C）叶子结点数是度为2的结点数的两倍D）度为2的结点数是度为I的结点数的两倍（4）软件按功能可以分为应用软件、 件的是A）学生成果管理系统C） UNIX操作系统（5）某系统总体结构图如下图所示:功能1功能2.1该系统总体结构图的深度是A） 7B） 6（6）程序调试的任务是 A）设计测试用例 C）发觉程序中的错误系统软件和支撑软件（或工具软件）。下面属于应用软B） C语言编译程序 D）数据库管理系统XY系统；I 功能2功能3：I、I功能2.2功
22、能2.3C） 3D） 2B）验证程序的正确性D）诊断和改正程序中的错误（7）下列关于数据库设计的叙述中，正确的是A）在需求分析阶段建立数据字典C）在逻辑设计阶段建立数据字典B)D)在概念设计阶段建立数据字典 在物理设计阶段建立数据字典（8）数据库系统的三级模式不包括A）概念模式B）内模式C）外模式（9）有三个关系R、S和T如下:（10）下列选项中属于面对对象设计方法主要特征的是D）数据模式D）并D）逐步求精A）继承B）自顶向下C）模块化（11）以下描述中错误的是A）窗体的标题通过其CaPtion属性设置B）窗体的名称（Name属性）可以在运行期间修改C）窗体的背景图形通过其PiCtUre属性设
23、置D）窗体最小化时的图标通过其ICon属性设置A）代码窗口C）工程资源管理器窗口（13）设有如下变量声明语句：Dim a, b As Boolean则下面叙述中正确的是A） a和b都是布尔型变量C） a是整型变量，b是布尔型变量（14）下列可以作为ViSUaIBaSiC变量名的是A） A#AB） 4ABCB）工具箱窗口D）属性窗口B） a是变体型变量，b是布尔型变量D） a和b都是变体型变量C) ?xyD) Print_Text（12）在设计阶段，当按Qrl+R键时，所打开的窗口是（15）假定一个滚动条的LargeChange属性值为100,则100表示A）单击滚动条箭头和滚动框之间某位置时滚
24、动框位置的改变量B）滚动框位置的最大值C）拖动滚动框时滚动框位置的改变量D）单击滚动条箭头时滚动框位置的改变量（16）在窗体上画一个吩咐按钮，然后编写如下事务过程:PrivateSubCommandl_Click()MsgBoxStr(l23+321)EndSub程序运行后，单击吩咐按钮，则在信息框中显示的提示信息为A)字符串“123+321”B)字符串“444C)数值“444D)空白(17)假定有以下程序：PrivateSubForm_Click()a=1:b=aDoUntila=5x=a*bPrintb;Xa=a+bb=b+a1.oopEndSub程序运行后，单击窗体，输出结果是A)11B
25、)11C)11D)1123243836(18)在窗体上画一个名称为LiStI的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名消逝。下列在LiSLCliCk事务过程中能正的确现上述功能的语句是A)Listl.RemoveItemListLTextB)ListLRemoveltemListLClearC)Listl.RemoveitemListl.ListCountD)ListI.RemoveitemList1.Listindex(19)列表框中的项目保存在一个数组中，这个数组的名字是A)ColumnB)StyleC)ListD)MultiSelect(20)有人编写了
26、如下的程序：PrivateSubForm_Click()DimsAsInteger,XAsIntegers=0x=0DoWhiles=10000x=x+1s=s+x21.oopPrintSEndSub上述程序的功能是：计算s=1+22+3?+!?+，直到s10000为止。程序运行后，发觉得不到正确的结果，必需进行修改。下列修改中正确的是A)把x=0改为X=1B)把DOWhileS=10000改为DOWhileS10000D)交换x=x+I和s=s+x2的位置(21)设有如下程序：PrivateSubForm_Click()DimsAsLong,fAsLx)ngDimnAsInteger,iAs
27、Integerf=1n=4Fori=1Tonf=f*is=sfNextiPrintsEndSub程序运行后，单击窗体，输出结果是A)32B)33(22)阅读下面的程序段：a=0Fori=1To3Forj=1TbiFork=jTo3a=a+INextkNextjNexti执行上面的程序段后，a的值为A)3B)9(23)设有如下程序：PrivateSubForm_Click()Clsa$=123456Fori=1To6PrintTab(12-i);NextiEndSub程序运行后，单击窗体，要求结果如图所示,A)Left(a$,i)B)Mid(a$,8-i,i)(24)设有如下程序：Private
28、SubForm_Click()C)34D)35C)14D)21112123123412345123456则在处应填入的内容为C)Right(a$,i)D)Mid(a$,7,i)DimiAsInteger,xAsString,yAsStringx=,ABCDEFGFori=4ToIStep-1y=Mid(x,i,i)+yNextiPrintyEndSub程序运行后，单击窗体，输出结果是a)Abccdedefgb)AabbcdefgC)Abcdefgd)Aabbccddeeffgg(25)设有如下程序：PrivateSubForm_Click()Dimary(lTo5)AsIntegerDimiA
29、sIntegerDimsumAsIntegerFori=1To5ary(i)=i+1sum=sum+ary(i)NextiPrintsumEndSub程序运行后，单击窗体，则在窗体上显示的是A)15B)16C)20D)25(26)有一个数列，它的前3个数为0,1,1,此后的每个数都是其前面3个数之和，即0,1,1,1,2,4,7,13,24,要求编写程序输出该数列中全部不超过100O的数。某人编写程序如下：PrivateSubForm_Click()DimiAsInteger,aAsInteger,bAsIntegerDimcAsInteger,dAsIntegera=0:b=I:c=1d=a
30、+b+ci=5Whiled=1000Printd;a=b:b=c:c=dd=a+b+ci=i+1WendEndSub运行上面的程序，发觉输出的数列不完整，应进行修改。以下正确的修改是A)把WhiIed1000B)把i=5改为i=4C)把i=i+1移到Whiled=100O的下面D)在i=5的上面增加一个语句：Printa;b;c;(27)下面的语句用Array函数为数组变量a的各元素赋整数值：a=Array(1,2,3,4,5,6,7,8,9)针对a的声明语句应当是A)DimaB)DimaAsIntegerC)Dima(9)AsIntegerD)Dima()AsInteger(28)下列描述中
31、正确的是A)ViSUalBaSiC只能通过过程调用执行通用过程B)可以在Sub过程的代码中包含另一个Sub过程的代码C)可以像通用过程一样指定事务过程的名字D)Sub过程和Function过程都有返回值(29)阅读程序：Functionfac(ByValnAsInteger)AsIntegerDimtempAsIntegertemp=IFori%=ITontemp=temp*i%Nexti%fac=tempEndFunctionPrivateSubForm_Click()DimnsumAsIntegernsum=IFori%=2To4nsum=nsum+fac(i%)Nexti%Printns
32、umEndSub程序运行后，单击窗体，输出结果是A)35B)31C)33D)37(30)在窗体上画一个吩咐按钮和一个标签，其名称分别为Commandl和Labd1,然后编写如下代码：SubS(xAsInteger,yAsInteger)StaticzAsIntegery=x*x+zz=yEndSubPrivateSubCommandl_Click()DimiAsInteger,zAsIntegerm=Oz=OFori=1To3Si,zm=m+zNexti1.abelLCaption=Str(m)EndSub程序运行后，单击吩咐按钮，在标签中显示的内容是A)50B)20C)14D)7(31)以下
33、说法中正确的是A) MOUSeUP事务是鼠标向上移动时触发的事务B) MOUSeUP事务过程中的X,y参数用于修改鼠标位置C)在MOUSeUP事务过程中可以推断用户是否运用了组合键D)在MOUSeUP事务过程中不能推断鼠标的位置(32)假定已经在菜单编辑器中建立了窗体的弹出式菜单，其顶级菜单项的名称为al,其“可见”属性为False。程序运行后，单击鼠标左键或右键都能弹出菜单的事务过程是A) PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=IAndButton=2ThenP
34、opupMenualEndIfEndSubB) PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)PopupMenualEndSubC) PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=IThenPopupMenualEndIfEndSubD) PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle
35、,YAsSingle)IfButton=2ThenPopupMenualEndIfEndSub(33)在窗体上画一个名称为CDI的通用对话框，并有如下程序：PrivateSubForm_Load()CDLDefaultExt=docCDLFileName=c:filel.txtCDLFilter=应用程序（*.exe）*.exe”EndSub程序运行时，假如显示了“打开”对话框，在“文件类型”下拉列表框中的默认文件类型是A）应用程序（*.exe）B）*.docC）*.txtD）不确定（34）以下描述中错误的是A）在多窗体应用程序中，可以有多个当前窗体B）多窗体应用程序的启动窗体可以在设计时设定
36、C）多窗体应用程序中每个窗体作为一个磁盘文件保存D）多窗体应用程序可以编译生成一个EXE文件（35）以下关于依次文件的叙述中，正确的是A）可以用不同的文件号以不同的读写方式同时打开同一个文件B）文件中各记录的写入依次与读出依次是一样的C）可以用InPUt#或LineInPUt#语句向文件写记录D）假如用APPend方式打开文件，则既可以在文件末尾添加记录，也可以读取原有记录二、填空题（每空2分，共30分）请将每空的正确答案写在答题卡【1至15序号的横线上，答在试卷上不得分。（1）数据结构分为线性结构与非线性结构，带链的栈属于【1】。（2）在长度为n的依次存储的线性表中插入一个元素，最坏状况下须要移动表中【2】个元素。（3）常见的软件开发方法有结构化方法和面对对象方法。对某应用系统经过需求分析建立数据流图（DFD）,则应采纳【3】方法。（4）数据库系统的核心是【4】.（5）在进行关系数据库的逻辑设计时，E-R图中的属性常被转换为关系中的属性，联系通常被转换为【5】1）（6）为了使标签能自动调整大小以
