1、年3月世界打算机等级检验二级口试试卷VisualBasic语言次第方案检验时辰90分钟,总分值100分一、 选择题每题2分,共70分以下各题A、B、C、D四个选项中,只需一个选项是精确的,请将精确选项填涂在答题卡呼应位置上,答在试卷上不得分。1以下关于栈表达精确的选项是AA栈顶元素开场能被删除B栈顶元素最后才能被删除C栈底元素永世不克不迭被删除D以上三种说法都差错2以下表达中精确的选项是AA有一个以上根结点的数据结构不用定是非线性结构B只需一个根结点的数据结构不用定是线性结构C循环链表是非线性结构D双向链表是非线性结构3某二叉树共有7个结点,其中叶子结点只需1个,那么该二叉树的深度为假定根结点
2、在第1层DA3B4 C6D74在软件开拓中,需求分析阶段发作的要紧文档是DA软件集成测试方案B软件详细方案说明书C用户手册D软件需求规格说明书5结构化次第所恳求的全然结构不包括BA次第结构BGOTO跳转C选择分支结构D重复循环结构6上面描画中差错的选项是6-10BA系统总体结构图支持软件系统的详细方案B软件方案是将软件需求转换为软件表示的过程C数据结构与数据库方案是软件方案的任务之一DPAD图是软件详细方案的表示货色7担负数据库中查咨询把持的数据库语言是CA数据定义语言B数据管理语言C数据把持语言D数据把持语言8一个教师可解说多门课程,一门课程可由多个教师解说,那么实体教师跟课程间的联系是DA
3、1:1联系B1:m联系Cm:1联系Dm:n联系9有三个关系R、S跟T如下:RSTC1ABCA12B21C31ABc3那么由关系R跟S失落失落关系T的把持是CA自然连接B交C除D并10定义无标志整数类为UInt,上面可以作为类UInt实例化值的是BA-369B369 C0.369D整数聚拢1,2,3,4,511在VisualBasic集成状况中,可以列出工程中所有模块名称的窗口是AA工程资源管理器窗口B窗体方案窗口C属性窗口D代码窗口12假定编写了如下4个窗体状况的状况过程,那么运行应用次第并表示窗体后,已经实行的状况过程是AALoadBClickCLostFocusDKeyPress(13)为
4、了使标签存在“透明的表示结果,需求设置的属性是CA)CaptionB)AlignmentC)BackStyleD)AutoSize14上面可以发作20-30含20跟30的随机整数的表达式是BA)IntRnd*10+20B)IntRnd*11+20C)IntRnd*20+30D)IntRnd*30+2015设窗体上有一个名称为HS1的水平滚动条,假定实行了语句:CHS1.Value=HS1.Max-HS1.Min/2+HS1.Min那么A滚动块处于最左端B滚动块处于最右端C滚动块处于中间位置D滚动块可以处于任何位置,详细位置取决于Max、Min属性的值(16) 窗体上有一个名称为Cb1的组合框,
5、次第运行后,为了输出选中的列表项,应应用的语句是B(17) APrintCb1.SelectedBPrintCb1.List(Cb1.ListIndex)DPrintCb1.List(ListIndex)(17)为了在窗体上树破2组单项选择按钮,同时当次第运行时,每组都可以有一个单项选择按钮被选中,那么以下做法中精确的选项是DA)把这2组单项选择按钮设置为名称差异的2个控件数组B)使2组单项选择按钮的Index属性分不一样C)使2组单项选择按钮的名称分不一样D)使2组单项选择按钮分不画到2个差异的框架中18假定一个直线控件在窗体上呈现为一条垂直线,那么可以判定的是BA它的Y1、Y2属性的值相当
6、B它的X1、X2属性的值相当C它的X1、Y1属性的值分不与X2、Y2属性的值相当D它的X1、X2属性的值分不与Y1、Y2属性的值相当19设a=2,b=3,c=4,d=5,那么上面语句的输出是APrint32*bOra=cAndbcOrcdA)FalseB)1C)TrueD)-1(20)窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击状况的状况过程是AA)PrivateSubForm1_Click()EndSubB)PrivateSubForm_Click()EndSubC)PrivateSubCommand1_Click()EndSubD)PrivateSubComma
7、nd_Click()EndSub(21)默认状况下,上面声明的数组的元素个数是DDima5,-2to2A20B24C25D3022设有如下次第段Dima(10)ForEachxInaPrintx;Nextx在上面的次第段中,变量x必须是BA)整型变量B变体型变量C静态数组D)静态数组23设有以下函数过程PrivateFunctionFun(a()AsIntegerAsString)AsIntegerEndFunctionA假定已有变量声明:Dimx(5)AsInteger,nAsInteger,chAsString那么上面精确的过程调用语句是AA)x(0)=Fun(x,“ch)B)n=Fun(
8、n,ch)C)CallFunx,“chD)n=Fun(x(5),ch)(24)假定用上面的语句打开文件:COpen“Filel.txtForInputAS#1那么不克不迭精确读文件的语句是A)Input#1,ch$B)LineInput#1,ch$C)ch$=Input$(5,#1)D)Read#1,ch$(25)上面次第实行结果是DPrivateSubCommand1_Clicka=10Fork=1To5Step-1A=a-kNestkPrinta;kEndSubA)-56B)-5-5 C)100D)10126设窗体上有一个名为Text1的文体框跟一个名为Command1的命令按钮,并有以下
9、状况过程:PrivateSubCommand1_Click()X!=Val(Text1.Text)SelectCasexCaseIs=20Print“输出差错CaseIs0Print20-xCaseIs10Print20CaseIs5Orx-1NextEndSub运行次第,其中Do循环实行的次数是CA)15B)10 C)7D)328阅读次第PrivateSubCommand1_ClickDimarrDimiAsIntegerArr=Array(0,1,2,3,4,5,6,7,8,9,10)Fori=0To2Printarr7i;NextEndSub次第运行后,窗体上表示的是:BA)876B)7
10、65C)654D)54329在窗体上画一个名为Command1的命令按钮,然后编写以下次第:PrivateSubCommand1_Click()Dima(10)AsIntegerFork=10TO1Step-1ak=20-2*kNextkK=k+7Printa(k-a(k)EndSub运行次第,单击命令按钮,输出结果是AA)18B)12 C)8D)6(30)窗体上有一个名为Command1的命令按钮,并有如下次第:PrivateSubCommand1_Click()Dima(10),x%Fork=1To10a(k)=Int(Rnd*90+10)x=x+a(k)Mod2NextkPrintxEn
11、dSub次第运行后,单击命令按钮,输出结果是:AA)10个数中奇数的个数B)10个数中偶数的个数C)10个数中奇数的累加跟D)10个数中偶数的累加跟(31)窗体上有一个名为Command1的命令按钮跟一个名为Timer1的计时器,并有上面的状况过程:PrivateSubCommand1_Click()Timer1.Enabled=TrueEndSubPrivateSubForm_Load()Timer1.Interval=10Timer1.Enabled=FalseEndSubPrivateSubTimer1_Timer()Command1.Left=Command1.Left+10EndSu
12、b次第运行时,单击命令按钮,那么发作的结果是DA) 命令按钮每10秒向左移动一次B) 命令按钮每10秒向右移动一次C) 命令按钮每10毫秒向左移动一次D) 命令按钮每10毫秒向右移动一次32设窗体上有一个名为List1的列表框,并编写上面的状况过程:CPrivateSubList1_Click()DimchASStringch=List1.List(List1.ListIndex)List1.RemoveItemList1.ListIndexList1.AddItemchEndSub次第运行时,单击一个列表项,那么发作的结果是A)该列表项被移到列表的最后面B)该列表项被删除C)该列表项被移到列
13、表的最后面D)该列表项被删除后又在原位置拔出33窗体上有一个名为Command1的命令按钮,并有如下次第:PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=8b=12PrintFun(a,b);a;bEndSubPrivateFunctionFun(ByValaAsInteger,bAsInteger)AsIntegera=aMod5b=b5Fun=aEndFunction次第运行时,单击命令按钮,那么输出结果是BA332B382C8812D381234为了从当前文件夹中读入文件File1.txt,某人编写了上面的次第:PrivateSub
14、Command1_Click()OpenFile1.txtForOutputAs#20DoWhileNotEOF(20)LineInput#20,ch$PrintchLoopEndSub次第调试时,觉察有差错,上面的修改方案中精确的选项是DA在Open语句中的文件名前添加道路B把次第中各处的“20”改为“1”C把Printch语句改为Print#20,chD把Open语句中的Output改为Input35以下次第运行后的窗体如以下列图,其中组合框的名称是Combo1,已有列表项如以下列图;命令按钮的名称是Command1。PrivateSubCommand1_Click()IfNotcheck
15、(Combo1.Text)ThenMsgBox(输出差错)ExitSubEndIfFork=0ToCombo1.ListCount-1IfCombo1.Text=Combo1.List(k)ThenMsgBox(添加工程失落败)ExitSubEndIfNextkCombo1.AddItemCombo1.TextMsgBox(添加工程成功)EndSubPrivateFunctionCheck(chAsString)AsBooleann=Len(ch)Fork=1Tonc$=UCase(Mid(ch,k,1)IfcZThenCheck=FalseExitFunctionEndIfNextkChec
16、k=TrueEndFunction次第运行时,假定在组合框的编辑区中输出“Java,那么单击命令按钮后发作的结果是BA表示“输出差错B表示“添加工程失落败C表示“添加工程成功D不任何表示二、填空题每空2分,共30分请将每空的精确答案写在答题卡【1】至【15】序号的横线上,答在试卷上不得分。1有序线性表能停顿二分查寻的前提是该线性表必须是次第存储的。2一棵二叉树的中序遍历结果为DBEAFC,前序遍历结果为ABDECF,那么后序遍历结果为DEBFCA3对软件方案的最小单元模块或次第单元停顿的测试素日称为单元测试。4实体残缺性约束恳求关系数据库中元组的主键属性值不克不迭为空。5在关系AS,SN,D跟
17、关系BD,CN,NM中,A的要紧害字是S,B的要紧害字是D,那么称D是关系A的外码。6在窗体上有1个名称为Command1的命令按钮,并有如下状况过程跟函数过程:PrivateSubCommand1_Click()DimpAsIntegerp=m(1)+m(2)+m(3)PrintpEndSubPrivateFunctionm(nAsInteger)AsIntegerStaticsAsIntegerFork=1Tons=s+1Nextm=sEndFunction运行次第,单击命令按钮Command1后的输出结果为10。7在窗体上画1个名称为Command1的命令按钮,然后编写如下次第:Priv
18、ateSubCommand1_Click()DimmAsInteger,xAsIntegerDimflagAsBooleanflag=Falsen=Val(Intputbox(请输出任意1个正整数)DoWhileNotflaga=2flag=TureDoWhileflagAndaiTheni=i+1a(i)=【num】EndIfLoopWhileia(j)thentemp=a(i),a(i)=a(j);【a(j)=temp】NextjNextiFori=1To10Printa(i)NextiEndSub9窗体上已有名称分不为Drive1、Dir1、File1的驱动器列表框、目录列表框跟文件列表
19、框,且有1个名称为Text1的文本框。以下次第的功能是:将指定位置中扩展名为“.txt的文件表示在File1中,假定双击File1中某个文件,那么在Text1中表示该文件的内容。请填空。PrivateSubForm_Load()File1.Pattern=【*.txt|*.txt】EndSubPrivateSubDrive1_Change()Dir1.Path=Drive1.DriveEndSubPrivateSubDir1_Change()File1.Path=Dir1.PathEndSubPrivateSubFile1_DblClick()DimsAsString*1IfRight(Fil
20、e1.Path,1)=Thenf_name=File1.Path+File1.FileNameElsef_name=File1.Path+File1.FileNameEndIfOpenf_name【forinput】As#1Text1.Text=DoWhile【noteof(1)】s=Input(1,#1)Text1.Text=Text1.Text+sLoopClose#1EndSub年世界打算机等级检验二级VB参考答案选择题:1-5AADDB6-10BCDCB11-15AACBC16-20BDBAA21-25DBACD26-30CCBAA31-35DCBDB填空题1、次第2、DEBFCA3、单元4、主键5、D6、107、Ture8、a=a+19、n10、num11、i12、a(j)=temp13、*.txt|*.txt14、forinput15、noteof(1)