1、考试复习题库精编合集2021年4月全国计算机等级考试二级VB真题1、【单选题】下列选项中不属于结构化程序设计方法的是。2分A、自顶向下B、逐步求精C、模块化D、可复用答案：D;2、【单选题】两个或两个以上模块之间关联的紧密程度称为。2分A、耦合度B、内聚度C、复杂度D、数据传输特性答案：A;3、【单选题】下列叙述中正确的是。2分A、软件测试应该由程序开发者来完成B、程序经调试后一般不需要再测试C、软件维护只包括对程序代码的维护D、以上三种说法都不对答案：D;4、【单选题】按照“后进先出”原则组织数据的数据结构是。2分A、队列B、栈C、双向链表D、二叉树答案：B;5、【单选题】下列叙述中正确的是
2、。2分A、线性链表是线性表的链式存储结构B、栈与队列是非线性结构C、双向链表是非线性结构D、只有根结点的二叉树是线性结构答案：A;6、【单选题】对如下二叉树进行后序遍历的结果为。2分A、ABCDEFB、DBEAFCC、ABDECFD、DEBFCA答案：D;7、【单选题】在深度为7的满二叉树中，叶子结点的个数为。2分A、32B、31C、64D、63答案：C;8、【单选题】“商品”与“顾客”两个实体集之间的联系一般是。2分A、一对一B、一对多C、多对一D、多对多答案：D;9、【单选题】在E-R图中，用来表示实体的图形是。2分A、矩形B、椭圆形C、菱形D、三角形答案：A;10、【单选题】数据库DB、
3、数据库系统DBS、数据库管理系统DBMS之间的关系是。2分A、DB包含DBS和DBMSB、DBMS包含DB和DBSC、DBS包含DB和DBMSD、没有任何关系答案：C;11、【单选题】以下关于VisualBasic特点的叙述中，错误的是。2分A、VisualBasic是采用事件驱动编程机制的语言B、VisualBasic程序既可以编译运行，也可以解释运行C、构成VisualBasic程序的多个过程没有固定的执行顺序D、VisualBasic程序不是结构化程序，不具备结构化程序的三种基本结构答案：D;12、【单选题】以下叙述中，错误的是。2分A、一个VisualBasic应用程序可以含有多个标准
4、模块文件B、一个VisualBasic工程可以含有多个窗体文件C、标准模块文件可以属于某个指定的窗体文件D、标准模块文件的扩展名是.bas答案：C;13、【单选题】以下叙述中，错误的是。2分A、在VisualBasic中，对象所能响应的事件是由系统定义的B、对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定C、VisualBasic中允许不同对象使用相同名称的方法D、VisualBasic中的对象具有自己的属性和方法答案：B;14、【单选题】设有如下语句：Dima，bAsIntegerc=VisualBasicd=#7202021#以下关于这段代码的叙述中，错误的是。2分A、a被定义
5、为Integer类型变量B、b被定义为Integer类型变量C、c中的数据是字符串D、d中的数据是日期类型答案：A;15、【单选题】以下能从字符串VisualBasic中直接取出子字符串Basic的函数是。2分A、LeftB、MidC、StringD、Instr答案：B;16、【单选题】设a=4，b=3，c=2，d=1，下列表达式的值是。ab+1Orc2分A、TrueB、1C、-1D、0答案：D;17、【单选题】以下可以作为VisualBasic变量名的是。2分A、A#AB、counstAC、3AD、?AA答案：B;18、【单选题】设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是
6、。2分A、PrintA=x+yB、PrintA=;x+yC、PrintA=+Str(x+y)D、PrintA=&x+y答案：A;19、【单选题】假定有如下的命令按钮(名称为Command1)事件过程：PrivateSubCommand1_Click()x=InputBox(输入：，输入整数)MsgBox输入的数据是：”，”输入数据：+xEndSub程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是。2分A、x的值是数值10B、输入对话框的标题是“输入整数”C、信息框的标题是“输入数据：10”D、信息框中显示的是“输入的数据是：”答案：A;20、【单选题】在窗体上画1个命令
7、按钮(名称为Command1)和1个文本框(名称为Text1)，然后编写如下事件过程：PrivateSubCommand1_Click()x=Val(Text1.Text)SelectCasexCase1，3y=x*xCaseIs=10，Is90ThenExitForNextEndSub对于该事件过程，以下叙述中错误的是。2分A、a数组中的数据是30个100以内的整数B、语句ForEacharrItemIna有语法错误C、IfarrItemMod7=0语句的功能是输出数组中能够被7整除的数D、IfarrItem90语句的作用是当数组元素的值大于90时退出For循环答案：B;22、【单选题】设有
8、命令按钮Command1的单击事件过程，代码如下：PrivateSubCommand1_Click()Dima(3，3)AsIntegerFori=1To3Forj=1To3a(i，j)=i*j+iNextjNextiSum=0Fori=1To3Sum=Sum+a(i，4-i)NextiPrintSumEndSub运行程序，单击命令按钮，输出结果是。2分A、20B、7C、16D、17答案：C;23、【单选题】在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()a=0Fori=1To2Forj=1To4IfjMod20Then
9、a=a-1EndIfa=a+1NextjNextiPrintaEndSub程序运行后，单击命令按钮，输出结果是。2分A、0B、2C、3D、4答案：D;24、【单选题】窗体上有名称分别为Text1、Text2的2个文本框，有一个由3个单选按钮构成的控件数组Option1，如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中的数值与该单选按钮所对应的运算(乘以1、10或100)，并将结果显示在Text2中，如图2所示。为了实现上述功能，在程序中的问号(?)处应填入的内容是。PrivateSubOption1_Click(IndexAsInteger)IfText1.TextThenSe
10、lectCase?Case0Text2.Text=Val(Text1.Text)Case1Text2.Text=Val(Text1.Text)*10Case2Text2.Text=Val(Text1.Text)*100EndSelectEndIfEndSub2分A、IndexB、Option1.IndexC、Option1(Index)D、Option1(Index).Value答案：A;25、【单选题】在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序：PrivateSubCommand1_Click()Dima(10)AsIntegerDimxAsIntegerFori=1
11、To10a(i)=8+iNextx=2Printa(f(x)+x)EndSubFunctionf(xAsInteger)x=x+3f=xEndFunction程序运行后，单击命令按钮，输出结果为。2分A、12B、15C、17D、18答案：D;26、【单选题】以下关于过程的叙述中，错误的是。2分A、事件过程是由某个事件触发而执行的过程B、函数过程的返回值可以有多个C、可以在事件过程中调用通用过程D、不能在事件过程中定义函数过程答案：B;27、【单选题】在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1)，外观如图所示。编写如下程序
12、：PrivateSubForm_Load()Text1.Text=Text2.Text=Text3.Text=EndSubPrivateSubCommand1_Click()x=Val(Text1.Text)y=Val(Text2.Text)Text3.Text=f(x，y)EndSubFunctionf(ByValxAsInteger,ByValyAsInteger)DoWhiley0tmp=xModyx=yy=tmpLoopf=xEndFunction运行程序，在Text1文本框中输入36，在Text2文本框中输入24，然后单击命令按钮，则在Text3文本框中显示的内容是。2分A、4B、6
13、C、8D、12答案：D;28、【单选题】窗体上有名称分别为Text1、Text2的2个文本框，要求文本框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中问号(?)处应填入的内容是。PrivateSubText1_LostFocus()CallCheckInput(Text1，500)EndSubPrivateSubText2_LostFocus()CallCheckInput(Text2，1000)EndSubSubCheckInput(tAs?，xAsInteger)IfVal(t.Text)xThenMsgBox请重新
14、输入!EndIfEndSub2分A、TextB、SelTextC、ControlD、Form答案：C;29、【单选题】在窗体上画1个文本框，其名称为Text1，然后编写如下过程：PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubText1_KeyUp(KeyCodeAsInteger，ShiftAsInteger)PrintChr(KeyCode+2)EndSub程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为。2分A、AAB、ABC、ACD、AD答
15、案：C;30、【单选题】为了使列表框中的项目呈多列显示，需要设置的属性为。2分A、ColumnsB、StyleC、ListD、MultiSelect答案：A;31、【单选题】在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：DimFlagAsBooleanPrivateSubCommand1_Click()DimintNumAsIntegerintNum=InputBox(请输入：)IfFlagThenPrintf(intNum)EndIfEndSubFunctionf(XAsInteger)AsIntegerIfX10ThenY=XElseY=X+10EndIff=YEndF
16、unctionPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Flag=TrueEndSub运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为。2分A、0B、5C、15D、无任何输出答案：B;32、【单选题】在菜单编辑器中建立1个名称为Menu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程：PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsS
17、ingle)IfButton=1ThenPopupMenuMenu0EndIfEndSub则以下叙述中错误的是。2分A、该过程的作用是弹出一个菜单B、单击鼠标右键时弹出菜单C、Menu0是在菜单编辑器中定义的弹出菜单的名称D、参数X、Y指明鼠标当前位置的坐标答案：B;33、【单选题】窗体上有1个名称为CD1的通用对话框，1个名称为Command1的命令按钮。命令按钮的单击事件过程如下：PrivateSubCommand1_Click()CD1.FileName=CD1.Filter=AllFiles|*.*|(*.DoC|*.Doc|(*.Txt)|*.txtCD1.FilterIndex=2
18、CD1.Action=1EndSub关于以上代码，错误的叙述是。2分A、执行以上事件过程，通用对话框被设置为“打开”文件对话框B、通用对话框的初始路径为当前路径C、通用对话框的默认文件类型为*.TxtD、以上代码不对文件执行读写操作答案：C;34、【单选题】以下叙述中错误的是。2分A、用Shell函数可以执行扩展名为.exe的应用程序B、若用Static定义通用过程，则该过程中的局部变量都被默认为Static类型C、Static类型的变量可以在标准模块的声明部分定义D、全局变量必须在标准模块中用Public或Global声明答案：C;35、【单选题】以下关于文件的叙述中，错误的是。2分A、使用
19、Append方式打开文件时，文件指针被定位于文件尾B、当以输入方式(Input)打开文件时，如果文件不存在，则建立一个新文件C、顺序文件各记录的长度可以不同D、随机文件打开后，既可以进行读操作，也可以进行写操作答案：B;36、【填空题】对长度为10的线性表进行冒泡排序，最坏情况下需要比较的次数为_。每空2分答案：37、【填空题】在面向对象方法中，_描述的是具有相似属性与操作的一组对象。每空2分答案：38、【填空题】在关系模型中，把数据看成是二维表，每一个二维表称为一个_。每空2分答案：39、【填空题】程序测试分为静态分析和动态测试。其中_是指不执行程序，而只是对程序文本进行检查，通过阅读和讨论
20、，分析和发现程序中的错误。每空2分答案：40、【填空题】数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时，其逻辑结构可以不变，因此，基于逻辑结构的应用程序不必修改，称为_。每空2分答案：1、【填空题】下列语句的输出结果是_。PrintFormat(Int(12345.6789*100+0.5)100，0000，0.00)每空2分答案：2、【填空题】在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()Dimarr(1To100）AsIntegerFori=1To100arr(i)=Int(Rnd*1000)Nex
21、tiMax=arr(1)Min=arr（1）Fori=1To100If_ThenMax=arr(i)EndIfIf_ThenMin=arr(i)EndIfNextiPrintMax=；Max，Min=；MinEndSub程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组arr中，然后查找并输出这100个数中的最大值Max和最小值Min，请填空。每空2分答案：3、【填空题】在窗体上画1个名称为Command1的命令按钮和2个名称分别为Text1、Text2的文本框，如图所示，然后编写如下程序：FunctionFun(xAsInteger,ByValyAsInteger)As
22、Integerx=x+yIfx0ThenFun=xElseFun=yEndIfEndFunctionPrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=-10：b=5Text1.Text=Fun(a，b)Text2.Text=Fun(a，b)EndSub程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是_和_。每空2分答案：4、【填空题】在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，然后编写如下代码：DimSaveAllAsStringPrivateSubCommand1_Click()Te
23、xt1.Text=Left(UCase(SaveAll)，4)EndSubPrivateSubText1_KeyPress(KeyAsciiAsInteger)SaveAll=SaveAll+Chr(KeyAscii)EndSub程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是_。每空2分答案：5、【填空题】在窗体上画1个命令按钮和1个通用对话框，其名称分别为Command1和CommonDialog1，然后编写如下事件过程：PrivateSubCommand1_Click()CommonDialog1._=打开文件CommonDialog1.Filter=All
24、Files(*.*)|*.*CommonDialog1.InitDir=C：CommonDialog1.ShowOpenEndSub该程序的功能是，程序运行后，单击命令按钮，将显示“打开”文件对话框，其标题是“打开文件”，在“文件类型”栏内显示“AIlFiles(*.*)”，并显示C盘根目录下的所有文件，请填空。每空2分答案：6、【填空题】在窗体上画1个文本框，名称为Text1，然后编写如下程序：PrivateSubForm_Load()Opend：tempdat.txtForOutputAs#1Text1.Text=EndSubPrivateSubText1_KeyPress(KeyAsciiAsInteger)lf_=13ThenIfUCase(Text1.Text)=_ThenClose1EndElseWrite#1，_Text1.Text=EndIfEndIfEndSub以上程序的功能是，在D盘temp目录下建立1个名为dat.txt的文件，在文本框中输入字符，每次按回车键(回车符的ASCII码是13)都把当前文本框中的内容写入文件dat.txt，并清除文本框中的内容；如果输入“END”，则结束程序。请填空。每空2分答案：
