VB对口升学循环结构及数组练习

《VB对口升学循环结构及数组练习》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB循环结构及数组练习一、单选题1.执行以下程序段后，i的值为（）Fori=1To10Step2y=y+iNextiA）10B）11C）12D）252.假定有如下语句：PrivateSubCommand1_Click()Counter=0Fori=1To4Forj=6To1Step-2Counter=Counter+1NextjNextiLabel1.Caption=Str(Counter)EndSub程序运行后，结果为（）A）11B）12C）16D）203.假定有如下语句：PrivateSubComm

2、and1_Click()Fori=1To4Ifi=1Thenx=iIfi<=4Thenx=x+1Printx;EndSub程序运行后，结果为A）1234B）2345C）2344D）34564.哪个程序段不能分别正确显示1!、2!、3!、4!的值（）8A）Fori=1To4n=1Forj=1Toin=n*jNextjPrintnNextiB）Fori=1To4Forj=1Toin=1n=n*jNextjPrintnNextiC）n=1Forj=1To4n=n*jPrintnNextjD）n=1:j=1Do

3、Whilej<=4n=n*jPrintnj=j+1Loop85.编写如下的事件过程：PrivateSubCommand1_Click()Fori=1To4Forj=0Toi8PrintChr$(65+i);NextjPrintNextiEndSub程序运行后，在窗体上显示的内容是（）A）BBB）AC）BD）AACCCBBCCBBBDDDDCCCDDDCCCCEEEEEDDDDEEEEDDDDD6.编写如下的事件过程：PrivateSubCommand1_Click()Dimx,nAsIntegerx=1

4、n=0DoWhilex<20x=x*3n=n+1LoopText1.Text=Str(x)Text2.Text=Str(n)EndSub运行程序后，在2个文本框中显示的值分别是（）A）20和1B）27和3C）195和3D）600和47.编写如下的事件过程：PrivateSubCommand1_Click()Dimi,nAsIntegerFori=0To50i=i+3n=n+1Ifi>10ThenExitForNextText1.Text=Str(n)EndSub运行后，文本框中显示的值是（）A）2B）3

5、C）4D）58.编写如下的事件过程：PrivateSubCommand1_Click()c=1234c1=Trim(Str(c))Fori=1To4Print________NextEndSub运行程序后，窗体上显示如下1121231234则应该在________处填写的表达式是（）A）Right(c1,n)B）Left(c1,i)C）Mid(c1,n,1)D）Mid(c1,n,n)89.编写如下的事件过程：PrivateSubCommand1_Click()n=Val(Text1.text)Fori=

6、2TonForj=2ToSqr(i)IfiModj=0ThenExitForNextjIfj>Sqr(i)ThenPrintiNextiEndSub该事件过程的功能是：（）A）输出n以内的奇数B）输出n以内的偶数C）输出n以内的素数D）输出n以内能被j整数的数10.编写如下的事件过程：Fori=1To3Forj=5to1Step-1Printi*jNextj,i则语句Printi*j的执行次数是（A）A）15B）16C）17D）1811.以下程序段输出结果为（）x=1y=4DoUntily>4x=x*y

7、y=y+1LoopPrintxA）1B）4C）8D）2012.执行下面的程序段后，x的值为（）x=5Fori=1To20Step2x=x+i5NextiA）21B）22C）23D）2413.编写如下的事件过程：PrivateSubCommand1_Click()Fori=1To4x=4Forj=1To3x=3Fork=1To2x=x+6NextkNextjNextiPrintxEndSub程序运行后，输出结果是（）8A）7B）15C）157D）53814.有如下的程序段：Fori=1To3Forj=1

8、Toia=a+1NextjNexti执行上面程序后，a的值为（）A）3B）9C）6D）2115.阅读程序PrivateSubForm_Click()x=50Fori=1To4y=InputBox(“请输入1个整数”)y=Val(y)IfyMod5=0Thena=a+yx=yElsea=a+xEndIfNextiPrintaEndSub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（A）A）100B）50C）1