2016年最新vb期末复习题(1)

《2016年最新vb期末复习题(1)》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、VisualBasic期末复习题库单项选择题判断题填空题编程题1)下列程序运行后，输出的结果为______。B=1Dowhile(b<40)b=b*(b+1)LoopPrintba)42b)39c)6d)1答案：A2)设执行以下程序段时依次输入1、3、5，执行结果为_____。Dima(4)AsIntegerDimb(4)AsIntegerForK=0To2a(K+1)=Val(InputBox(“请输入数据："))b(3-K)=a(K+1)NextKPrintb(K)a)1b)3c)5d)0答案：A3)下列程序执行后，变量s的值为______。DimsAslong,xAsInt

2、egers=0:x=1DoWhile(x<10)s=s+xx=x+2LoopPrintsa)10b)25c)50d)100答案：B4）菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。CA、GotFocusB、LoadC、ClickD、KeyDown5）滚动条控件(如图所示)的Max属性所设置的是（2）。A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属

3、性6)编写如下事件过程：PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6AndButton=2ThenPrint"Hello"EndIfEndSub程序运行后，为了在窗体上输出"Hello"，应在窗体上执行以下_______操作。a)同时按下Shift键和鼠标左键b)同时按下Shift键和鼠标右键c)同时按下Ctrl、Alt键和鼠标左键d)同时按下Ctrl、Alt键和鼠标右键答案：D7)当变量x=2,y=5时，以下程序的输出结果为____。Dountily>5

4、x=x*yy=y+1loopprintxa)2b)5c)10d)20答案：C8)当执行以下程序时，在名为lblResult的标签框内将显示_____。PrivateSubcmdlt_click()DimI,RR=0ForI=1To5Step1R=R+INextIlblResult.Caption=Str（R）EndSuba)字符串15b)整数15c)字符串5d)整数5答案：A9)如下有一段不完整的程序段，如果要求该程序执行3次循环，则应在程序中的括号里输入______。X=1dox=x+3printxloopuntil(___)a)x>=8b)x<=8c)x>=7d)x<=7答案

5、：A10)若整型变量a的值为2、b的值为3，则下列程序段执行后整型变量c的值为______。Ifa>5thenifb<4thenc=a-belsec=b-aEndifelseifb>3thenc=a*belsec=amodbEndifa)2b)-1c)1d)6答案：A11)设有如下语句：str1=inputbox("输入","","练习")从键盘上输入字符串“示例”后，str1的值是___。a)“输入”b)“”c)“练习”d)“示例”答案：D12)我们在一个窗体上建立两个文本框，名称分别为Text1和Text2，事件过程如下，PrivateSubText1_change()Tex

6、t2.text=Ucase(Text1.text)EndSub则在Text1文本框输入“visualbasic”，Text2将______。a)Text2中无内容显示。b)Text2显示"VISUALBASIC"。c)Text2显示"visualbasic"d)Text1显示"visualbasic"答案：B13)下列程序的运行后s的值是_____。S=0Forx=99to1Step-2s=s+xNextxPrintsa)100b)500c)2500d)5000答案：C14)下列程序的执行结果是____。K=0ForI=1To3a=I^I^Kprinta;NextIa)111b)

7、123c)000d)149答案：A15)下列程序的执行结果是_____。Dima(5)AsStringDimbAsIntegerDimIAsIntegerForI=0To5a(I)=I+1Printa(I)NextIa)123456b)6c)654321d)0答案：A16)下列程序的执行结果为_____。DimintsumAsIntegerDimIAsIntegerintsum=0ForI=20.2To5Step-4.7intsum=intsum+INextIPrintintsu