VB期末考试题库及答案最新最全面(完整版).docx

《VB期末考试题库及答案最新最全面(完整版).docx》由会员分享，可在线阅读，更多相关《VB期末考试题库及答案最新最全面(完整版).docx（34页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、VB期末考试题库及答案最新最全面(完整版)试卷方案：202005VisualBasic期末考试方案一、单项选择_共50题选：20题*1=20分第1题下面有关对象属性的讲法中，错误的是.A.工具箱中的控件并不是VB中所有的控件B.若将Frame的Enabled属性设置为C.对象的Name属性在运行时不能改变False，则不能使用放置在Frame里面的控件D.对象的所有属性都能够在属性窗口中设置第2题3x|xe数学表达式的VB算术表达式为.sin27y|A.Sin(27)+Sqr(x+Exp3)/(x+y)B.Sin(27*3.14159/180)+Sqr(x+Exp(3)/Abs(x+y)C.S

2、in(27*3.14159/180)+Sqr(x+e3)/Abs(x+y)D.Sin(27*pi/180)+Sqr(x+Exp(3)/Abs(x+y)第3题下列有关对象的叙述中,正确的是A.对象由属性，事件和方法构成B.对象的所有属性既能够在属性窗口设置，又能够在程序运行时用赋值语句设置C.对象的事件一定就是由VB预先设置好的人工干涉的动作D.对象的方法是对象响应某个事件后执行的一段程序代码第4题表达式A.1第5题的运算结果是CInt(4.5)+Cint(-4.51)+Int(4.9)+Int(-4.1)+Fix(-1.9)+0Mod2.C.2D.3B.-1下列关于菜单的讲法中,错误的是.A.

3、每一个菜单项就是一个对象，并且可设置本人的属性和事件B.菜单项不能够响应DblClick事件C.VB6.0允许创立超过四级的子菜单D.程序执行时，假如要求菜单项是灰色，不能被用户选择，则应设置菜单项的第6题属性为EnabledFalse下面关于数组的讲法中A.使用了Preserve,错误的是.子句的Redim语句，只允许改变数组最后一维的上界B.对于动态数组,Redim语句能够改变其维界但不能够改变其数据类型C.Erase语句的功能只是对固定大小的数组进行初始化D.Lbound函数返回值是指定数组某一维的下界第7题设运行printabc的结果是.a=3,b=2,c=1,D.出错A.TrueB.

4、FalseC.1第8题A.使用不带关键字B.使用不带关键字C.使用不带关键字D.使用不带关键字第9题的的的的ReDim语句能够重新定义数组的维数ReDim语句能够改变数组各维的上、下界ReDim语句能够改变数组的数据类型ReDim语句能够对数组中的所有元素进行初始化PreservePreservePreservePreserve在列表框List1中有若干列表项A.List1.text=B.List1.List(List1.ListIndex)=C.List1.Clear,能够删除选定列表项的语句是.D.List1.RemoveItemList1.ListIndex第10题2x53elnxsin

5、(2x)数学表达式对应的VB表达式是.x2|sinxcos|A.(e(2*x-5)*Log(x)+(Sin(2x)3)/Sqr(Sin(x)-Cos(x2)B.(Exp(2*3.14159*x-5)*Log(x)+(Sin(2*x)3)/Sqr(Sin(x)-Cos(x2)C.(Exp(2*x-5)*Ln(x)+(Sin(2*x)3)/Sqr(Sin(x)-Cos(x2)D.e(2*3.14159*x-5)*Ln(x)+(Sin(2*x)3)/Sqr(Sin(x)-Cos(x2)第11题下面有关数组参数的讲明中，正确的是A.在经过中可以用Dim语句对形参数组进行讲明B.动态数组作为实参时，可用

6、ReDim语句在经过中改变对应形参数组的维界C.调用经过时，数组名不能作为实参D.数组能够按地址传递可以以按植传递第12题下列有关经过的讲法中,错误的是.A.在Sub或B.对于使用经过内部不能再定义其它Sub或Function经过FunctionByRef讲明的形参,在经过调用时形参和实参只能按传址方式结合C.递归经过既能够是递归经过,可以以是递归Sub经过FunctionD.能够像调用第13题Sub经过一样使用Call语句调用Function经过要将焦点设置在某个控件上,下面四个选项中正确的是.A.只能使用鼠标直接点击控件B.只能使用Tab键将焦点移到该控件C.只能在程序中调用该控件的Set

7、Focus方法D.A、B、C三选项中涉及的方法均可使用第14题下面Case语句中,能正确描绘A.CaseAbs(Y)6C.CaseNot(-6To6)第15题下面关于变量作用域的叙述中Y的绝对值大于6的是.B.Case-6To6D.CaseIs6,正确的是.B.模块级变量只能用Dim语句声明C.但凡在窗体模块或标准模块的通用声明段用Public语句声明的变量都是全局变量D.当不同作用域的同名变量发生冲突时，优先访问局限性小的变量第16题下面关于数值常量的讲法中,错误的是A.八进制数的表示方法是在数字前面加B.十六进制数的表示方法是在数字前面加&O&HC.在浮点运算中使用D来分隔尾数和指数时，系

8、统将把该数值作为单精度型数处理D.32768是合法的数值常量第17题x3esin30数学表达式对应的VB表达式是.xA.Abs(ex+Sin(30)3)ySqr(x+y)B.Abs(Exp(x)+Sin(30)3)(Sqr(x+y)C.Abs(ex+Sin(30*3.14159180)3)(Sqr(x+y)D.Abs(Exp(x)+Sin(30*3.14159180)3)Sqr(x+y)第18题下面的4个表达式中,有关个能够对类型变量x(正数)的第3位小数正确地进行四舍五入计Single算.Format(x,#.00)Fix(100*(x+0.005)/100Int(100*(x+0.005)

9、/100CInt(100*(x+0.005)/100A.1个第19题B.2个C.3个个D.4执行下面语句时,会出现错误提示的是.A.Print2b3+12.5D.Print2e3+12第20题下面Case语句含有错误的是A.Case0To10第21题B.Print12.5+12C.Print12.5&12.5.B.CaseIs10C.CaseIs10AndIs10下列语句中,正确的是A.Textl.SetFocus第22题B.Forml.ClearC.Labell.SetFocusD.Listl.Cls下列选项中,所包含的所有表达式能够将两位整数.x的个位数与十位数对调(如将78转换为87)的

10、是Val(Right(X,1)&Left(X,1)Val(Right(CStr(X),1)&Left(CStr(X),1)Val(Right(Str(X),1)&Left(Str(X),1)Val(Mid(X,2,1)+Mid(X,1,1)D.A.第23题B.C.下面关于子经过或函数的定义中,正确的是第24题下列有关控件数组的讲法中,错误的是.A.控件数组由一组具有一样名称和一样类型的控件组成，不同类型的控件无法组成控件数组B.控件数组中的所有控件不得具有各自不同的属性设置值C.控件数组中的所有控件分享同一个事件经过D.控件数组中每个元素的下标由控件的第25题Index属性指定下面对数组参数的

11、讲明中,错误的是.A.在经过中能够用Dim语句对形参数组进行声明B.形参数组只能按地址传递C.实参为动态数组时，可用ReDim语句改变对应形参数组的维界D.只需把要传递的数组名作为实参，即可调用经过第26题要向文件datal.txt添加数据,正确的文件打开命令是.A.Opendatal.txtForOutputAs#1B.Opendatal.txtForInputAs#1C.Opendatal.txtForAppendAs#5D.Opendatal.txtForWriteAs#5第27题下面有关数组处理的叙述中，正确的是.A.在经过中使用ReDim语句能够改变动态数组数据的类型B.在经过中，能

12、够使用Dim、Private和Static语句来定义数组C.用ReDim语句重新定义动态数组时，能够改变数组的大小，但不能改变数组的维数D.不能够用Public语句在窗体模块的通用途讲明一个全局数组第28题下面的表达式中,运算结果为True的是.A.abcrd21第29题B.Int(134.69)数组定义语句中能够用负数或小数来指定某一维的维下界或维上界的值A.第32题下列关于对象A.SetFocusC.Setfocus第33题创立一个名为.B.C.D.与GotFocus的描绘中,正确的是SetFocus是事件,GotFocus是方法B.Setfocus和Gotfocus都是事件和GotFoc

13、us都是方法D.SetFocus是方法,GotFocus是事件文件的菜单项,欲使其可用方式访问,则在菜单编辑器的标题文本框中应输入Alt+FA.文件($F)第34题在下列属性中B.文件(&F)C.文件(#F)D.文件(%F),属于CommandButton控件、ListBoxB.Visible、Font控件共有的是.A.Caption、Text第35题、Visible、VisibleC.CaptionD.List下列能够正确表示条件XYB,则下列表达式中A.Sgn(X-Y)+Sgn(A-B)=-1C.Sgn(Y-X)+Sgn(A-B)=2,结果为True的是B.Sgn(X-Y)+Sgn(A-B

14、)=-2D.Sgn(Y-X)+Sgn(A-B)=0第39题执行语句时,会出现出错提示信息.A.Print5+7=14C.Print32768*2第40题B.Print16384*2D.Print14+32sin302logxy数学表达式对应的VisualBasic表达式是.xyeA.Sin(30*3.14159/180)+Sqr(Log(x)+y)/2*3.14159+Exp(x+y)B.(Sin(30*/180)+Sqr(Ln(x)+y)/(2*+Exp(x+y)C.Sin(30*180/3.14159)+Sqr(Log(x)+y)/(2*3.14159+e(x+y)第41题在一个多窗体程序

15、中A.Form2.UnloadC.Form2.End第42题,能够仅将窗体Form2从内存中卸载的语句是B.UnloadForm2D.Form2.Hide.Print方法可在上输出数据.窗体A.第43题文本框B.图片框标签列表框立即窗口D.C.若要使逻辑表达式结果为True,则x、y、z的取值应为下列选项中的xyXoryB.(x5-Cos(29)/(Sqr(Exp(x)+Log(y)+5)C.(x5-Cos(29*3.14159/180)/(Sqr(Exp(x)+Log(y)+5)D.(x5-Cos(29*3.14159/180)/(Sqr(ex+Log(y)+5二、填空_共20题选：15空*

16、2=30分阅读理解：填写程序的输出结果第1题运行下列程序，单击,第三行的内容是Command1,在窗体上显示的第一行内容是【3】。【1】,第二行的内容是【2】OptionExplicitPrivateSubCommand1_Click()DimsAsStrings=BasicCalltrans(s)EndSubPrivateSubtrans(sAsString)DimjAsInteger,tAsStringDimkAsIntegerk=3Doj=InStr(s,a)t=LCase(Right(s,j)s=Right(t,Len(s)-k)&Left(s,Len(t)k=k-1PrintsLoo

17、pUntilk=0EndSub第2题执行下面程序，单击行是【3】。OptionExplicitCommand，1则窗体上显示的第一行是【1】，第三行是【2】，最后一PrivateSubCommand1Click()DimxAsInteger,yAsIntegerx=12:y=0DoWhilex0IfxMod4=0Theny=y+xElsey=y-xEndIfx=x-3Printx,yLoopEndSub第3题执行下面的程序，单击体上显示的第一行是OptionExplicitPrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=1:b=1Call

18、sub1(a,b)Printa,bEndSubPrivateSubsub1(aAsInteger,bAsInteger)a=a+b:b=b+aPrinta,bIfa10Thena=a+bb=b+aElseCallsub1(a,b)EndIfEndSub第4题运行下面的程序，单击Command1在,窗体上显示的变量a的值为【1】，变量b的值为【2】,变量c的值为【3】。OptionExplicitPrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=5:b=10:c=15Printfun(a,b,c)+fun(a,b,c)P

19、rinta,b,cEndSubPrivateFunctionfun(xAsInteger,yAsInteger,zAsInteger)AsIntegerz=xx=x+yy=y+zfun=x+yEndFunction第5题执行下面的程序，连续三次单击命令按钮Command1之后，A数组共有。【1】个元素；数组元素A(2)的值【2】OptionExplicitOptionBase1，A(4)的值是【3】PrivateSubCommand1_Click()StaticA()AsInteger,nAsIntegerDimiAsInteger,kAsIntegerk=nn=n+2ReDimPreserv

20、eA(n)NextiFori=1TonPrintA(i);NextiPrintEndSub第6题运行下面程序，单击Command，1在窗体上显示的变量A的值为【1】,变量B的值为【2】。OptionExplicitDimaAsIntegerPrivateSubCommand1_Click()DimbAsIntegerb=3a=4b=fun(fun(a,b+2),a)+bPrinta,bEndSubPrivateFunctionfun(nAsInteger,kAsInteger)n=n+ak=n-kfun=n+k+aEndFunction第7题执行下面的程序，单击Command，l则窗体上第一行

21、显示的是【1】，第二行显示的是【2】。OptionExplicitDimxAsIntegerPrivateSubCommand1_Click()DimyasIntegerX=10:Y=2Callprocess(y)PrintX,YCallprocess(y)PrintX,YEndSubPrivateSubprocess(nAsInteger)DimyAsIntegerIfn0Thenx=x-ny=xElsex=x+ny=x+2EndIfn=-n执行下面程序，单击Command，1窗体上显示的第一行是【1】，第二行是【2】，第四行是【3】，最后一行是【4】.OptionExplicitPriva

22、teSubCommand1_Click()DimnAsIntegern=5Calltest(n)PrintnEndSubPrivateSubtest(ByValnAsInteger)DimiAsInteger,sAsIntegerIfn0ThenFori=1Tons=s&CStr(i)NextiPrintsCalltest(n-2)ElsePrintOVEREndIfEndSub第9题运行下列程序，单击Command，1在窗体上显示的第一行内容是【1】第二行的内容是【2】,第三行,的内容是【3】。A的ASCII码是65，Z是90OptionExplicitPrivateSubCommand1_

23、Click()DimiAsInteger,stAsString,nAsInteger,pAsString*1p=BFori=3To1Step-1n=Asc(p)-iIfn执行下面的程序，单击Command，1输出的变量i的值是【1】，变量j的值是【2】，变量k的值是【3】。OptionExplicitPrivateSubCommand1_Click()DimiAsInteger,jAsIntegerDimkAsIntegeri=10j=4k=Funk(i,j)Printi,j,kEndSubPriateFunctionFunk(ByValAAsInteger,BAsInteger)AsInte

24、gerA=A+BB=B-2IfB=0OrB=1ThenFunk=1ElseFunk=A+Funk(A,B)EndIfEndFunction第11题运行下面程序，假如连续三次单击命令按钮之后，数组共有【2】,A(5)的值是【3】.【1】个元素；数组元素A(2)的值是OptionExplicitOptionBase1PrivateSubCommand1_Click()Statica()AsInteger,nAsIntegerDimiAsInteger,kAsIntegerk=nn=n+2ReDimPreservea(n)Fori=k+1Tona(i)=i*n+1NextiFori=1TonPrinta(i);NextiPrintEndSub第12题执行下面的程序，单击Command1在,窗体界面上显示的第一行是【1】，第二行是【2】，第三行是【3】，第四行是【4】。OptionExplicit