执行VisualBasic程序的测试题VIP专享VIP免费

第1页共79页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第1页共79页选择题0分()1.执行下列VisualBasic语言片段程序的结果为何？X=110IfX<100ThenY=1ElseY=2IfX>120ThenY=3EndIfEndIfPrintY(A)1(B)2(C)3(D)110()2.下列这段BASIC程序代码，可以由身高及性别计算标准体重，计算后所印出的Weight值为何？Sex="F"Height=170IfSex="M"thenWeight=(Height-80)*0.7ElseWeight=(Height-70)*0.6EndIfPrintWeight(A)54(B)56(C)60(D)63()3.执行下列VisualBasic程序片段后，Max值为何？A=10:B=20IfA>BThenMax=AElseMax=BEndIf(A)10(B)20(C)30(D)Max()4.执行下列VisualBasic程序后，输出的结果为何？x=10:y=4Ifx>=10Andy<6ThenPrint"HappyEndIfPrint"Birthday"第2页共79页第1页共79页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第2页共79页(A)HappyBirthday(B)Happy(C)BirthdayHappy(D)Birthday()5.执行下列VisualBasic程序后，输出的结果为何？X=13X=X+10IFX>=30THENX=X-20PRINTX(A)3(B)13(C)23(D)43()6.在VisualBasic程序语言中，下列何种指令最适合用于多重选择结构中？(A)Do...Loop(B)For...Next(C)OptionBase(D)Select...Case()7.执行下列VisualBasic程序后，输出的结果为何？A=1:B=2IfA>1ThenB=B+3PrintB(A)1(B)2(C)3(D)5()8.下列程序叙述中，何者可用来判断BMI值介于18至24之间？(A)IfBMI>=18OrBMI<=24(B)IfBMI=18AndBMI=24(C)IfBMI>=18AndBMI<=24(D)IfBMI=18OrBMI=24()9.执行下列VisualBasic程序后，输出的结果为何？x=4:y=1SelectCasexCase1To3:y=x+3*yCase4To6:y=x+5*yCase7To9:y=x+7*yEndSelectPrinty(A)5(B)9(C)10(D)12()10.下列VisualBasic程序之执行结果为何？A=3:B=2:C=1IfB=1Andd<=31(C)d<=31(D)d>=1()12.在程序设计的观念中，先测试某一条件再依结果改变执行路径的结构属于(A)循序结构(B)随机结构(C)选择结构(D)多元结构()13.执行下列VisualBasic程序后，输出的结果为何？a=3:b=5:c=4Ifa>bThenIfb>cThenPrinta;ElsePrintb;EndIfPrintc(A)4(B)34(C)54(D)354()14.执行下列VisualBasic程序后，输出的结果为何？Y=-1IfY>1OrY<=-1ThenPrint"1IfY>=-1AndY<=0ThenPrint"2IfY>0AndY<=1ThenPrint"3PrintY+1(A)123(B)23(C)120(D)124()15.下列VisualBasic程序执行后，总共输出几个$？PrivateSubForm_Activate()X=3\2SelectCaseXCase1:Print"$"Case2:Print"$$"CaseElse:Print"$$$"EndSelectEndSub(A)1(B)2(C)3(D)6()16.若某家婚友社要利用VisualBasic帮敬民撰写一个可过滤征婚条件是否符合的程序；假设他的择偶条件为：年龄（age）须不满30岁且身高（h）须在165公分（含）以下。请问下列空格第4页共79页第3页共79页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第4页共79页处应填入Ifage<30ThenIf______________ThenMsgBox("条件符合，可安排双方见面")EndIfEndIf(A)h<=165(B)h<165(C)h>=165(D)h>165()17.执行下列VisualBasic程序片段，会产生哪一种错误的讯息？Ifa>5Thena=a+3ElseIfb>5Thena=a-5(A)没有定义变量的初始值(B)变量名称没有意义(C)If条件式中不能使用比较运算子(D)没有成对的EndIf()18.叙述IfA>100AndB$<>"Y"ThenC=1ElseC=2与下列何者同等效果？(A)IfA<=100OrB$="Y"ThenC=2ElseC=1(B)IfA<=100AndB$="Y"ThenC=2ElseC=1(C)IfNot(A<100OrB$="Y")ThenC=1ElseC=2(D)IfA<100AndB$="N"ThenC=2ElseC=1()19.执行下列VisualBasic程序片段，出现提示符号时输入任一整数，其输出的结果不可能为下列何者？j=InputBox("inputnumber")a=Sgn...