高三选考提升训练七1.下列VB表达式的值一定是0的是（）A.Len(“-20”)+20B.Int(Rnd*2)*2Mod4C.Abs((Rnd-Rnd)*2)D.9\3*72．有如下VB程序段DimcAsInteger,a(0To5)AsIntegerFori=1To5a(i)=iNextic=0Fori=1To5x=Int(Rnd*5+1)Ifa(xMod5)=i+2Thenc=c+1Ifc=xThenExitFori=i-1Nexti运行该程序后，变量c的值不可能是（）A.1B.2C.3D.43.有如下程序段:Dims(1To81)AsInteger,iAsInteger,jAsInteger,cAsInteger,tempAsIntegerc=0:s(1)=0Fori=1To9Forj=1Toitemp=s(j*i)s(j*i)=j*iIftemp<>s(j*i)Ands(j*i)Mod9=0Thenc=c+1NextjNexti该程序段运行后，变量C的值为（）A.9B.10C.11D.124.有如下VB程序段：Dima(1To100)AsIntegerDimb(1To100)AsIntegerDimcAsIntegera(1)=0:a(2)=2:b(1)=1:b(2)=2:c=0Fori=2To6a(i+1)=2*a(i)-a(i-1)b(i+1)=b(i)^2/b(i-1)c=c+a(i+1)+b(i+1)NextiLabel1.Caption=Str(c)该程序运行后，Label1中显示的内容是（）A．46B．88C．164D．76中存储的一批正整数，以两个数一组，每组中两个数均比前面一组a(2*n)～a(1)数组元素5.的两个数要大。现用对分查找的思想，设计一个在数组a中查找数据key的程序，如果找到key，在标签Label1上显示“yes”，否则显示“no”。key=Val(Text1.Text)i=1:j=n*2:flag=FalseDoWhilei+1<=jAndNotflagm=(i+j)\2If①Thenm=m-1Ifa(m)=keyOra(m+1)=keyThenflag=TrueElseIfa(m)>keyThen②Else③EndIfLoopIfa(i)=keyOra(j)=keyThenflag=TrueIfflagThenLabel1.Caption=yesElseLabel1.Caption=o划线处的代码正确的是()A.①mMod2=1②j=m-1③i=m+2B.①mMod2=0②j=m-1③i=m+2C.①mMod2=1②j=m-2③i=m+2D.①mMod2=0②j=m-2③i=m+26.有如下VB程序段：i=1:j=nkey=Val(Text1.Text)DoWhilei<=jm=Fix((i+j)/2+0.5)Ifa(m)>keyThenj=m-1Elsei=m+1EndIfLoopText2.Text=Str(n-i+1)数组元素a(1)到a(n)已按升序排列（元素可能重复），运行该程序段后，以下说法正确的是A．在文本框Text2中输出大于或等于key的数据元素个数在文本框Text2中输出小于或等于key的数据元素个数B.在文本框Text2中输出大于key的数据元素个数C.在文本框Text2中输出小于key的数据元素个数D.有如下VB程序段7.Constn=8Dima(1Ton)AsIntegerFori=1Tona(i)=Int(Rnd*20)Nextix=n\2Fori=xTo2Step-1Forj=1Toi-1Ifa(j)<a(i)Thent=a(j):a(j)=a(i):a(i)=tEndIfNextjNextii=nDoWhilei>x+1k=iForj=i-1Tox+1Step-1Ifa(j)>a(k)Thenk=jNextjIfk<>iThent=a(k):a(k)=a(i):a(i)=tEndIfi=i-1Loop执行完这段代码后，数组a中各个元素的值可能的是（）A．2,8,9,11,16,16,7,3B．19,19,18,12,9,8,6,6C．20,17,10,10,5,11,13,16D．14,11,10,5,0,6,15,15有如下VB程序段8.PrivateSubCommand1_Click()Consts1=efg??尠愦極?攫⑧浙桦履：s3=\Fori=1ToLen(s2)Ifbeing(Mid(s2,i,1),s1)Thens3=s3+Str(i)+,EndIfNextiText1.Text=s3EndSubFunctionbeing(xAsString,yAsString)AsBooleanbeing=FalseFori=1ToLen(y)Ifx=Mid(y,i,1)Thenbeing=True：ExitFunctionEndIfNextiEndFunction执行后文本Text1中显示的内容是（）A．4,5,6,9,10,B．5,8,9,13,15,C．2,1,3,3,1,D．4,5,6,13,15,小王创作了一个以“重阳节”为主题的的多媒体作品，他先用Photoshop制作图片素材，9.制作动画。请回答下列问题。Flash然后用．a9题图第下列说法正确的是当前Photoshop部分界面如第9题图a所示，（多选，）（1填字母：A.选择“枫叶”图层，可用“自由变换”命令调整枫叶的大小/B.当前画布中没有显示“重阳”图层的内容/C.可以隐藏“山”图层的“外发光”的图层样式/D.把当前PSD文档保存为JPG格式，JPG文件大小约为703.1KB）第9题图b（2）观察第9题图b，“菊花”图层呈现动画可能是（单选，填字母：A.由两束菊花逐渐变成如图所示的一束菊花/B.“菊花”由小变大的同时，水平翻转/C.由文字“菊”逐渐变成一束菊花）（3）如图所示“人”图层第50帧人物部分属性如第9题图c所示，选中第50帧上的实例，（选填：能/不能）调整该实例大小。若要使人物直到动画最后才出现，不改变其它动画效果前提下，可进行的操作是第9题图c（4）“声音”图层设置的声音同步方式是“事件”，为了使...