微信搜索关注"91考试网"公众号,领30元,获取公务员、事业编、教师等考试资料40G!
1、 通过设置何属性可以改变所画图形的形状? A.ShapeB.IndexC.EnabledD.Height 参考答案: A 无----------------------------------------2、 在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()s=1Dos=(s+1)*(s+2)Number=Number+1LoopUntils>=30PrintNumber,sEndSub程序运行后,输出的结果是 A.23B.256C.512D.1020 参考答案: B 无----------------------------------------3、 下列程和序段的执行结果为x=Int(Rnd()+9)SelectCasexCase10Print"excellent"Case9Print"good"Case8Print"pass"CaseElsePrint"fail"EndSelect A.excellentB.goodC.passD.fail 参考答案: B 无----------------------------------------4、 下列程序段的执行结果为a=75Ifa>60ThenScore=1Ifa>70ThenScore=2Ifa>80ThenScore=3Ifa>90ThenScore=4Print"Score=";Score A.Score=1B.Score=2C.Score=3D.Score=4 参考答案: B 无----------------------------------------5、 下列程序段的执行结果为I=1x=5DoI=I+1x=x+2LoopUntilI>=7Print"I=";IPrint"x=";x A.I=4x=5B.I=7x=15C.I=6x=8D.I=7x=17 参考答案: D 无----------------------------------------6、 下面的程序的运行结果是a=1b=1Doa=a^2b=b+1LoopUntilb>5Print"k=";a;Spc(4);"b=";b+a A.k=7b=14B.k=6b=6C.k=4b=8D.k=1b=7 参考答案: D 无----------------------------------------7、 单击命令按钮,下列程序的执行结果为PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=32:y=42CallPCS(x,y)Printx;yEndSubPublicSubPCS(ByvalnAsInteger,ByValmAsInteger)n=nMod10+1m=mMod10+1EndSub A.3242B.232C.23D.123 参考答案: A 无----------------------------------------8、 下列程序的执行结果为PrivateSubCommand1_Click()Dims1AsString,s2AsStrings1="abcd"CallTransfer(s1,s2)Prints2EndSubPrivateSubTransfer(ByValxstrAsString,ystrAsString)DimtempstrAsStringi=Len(xstr)DoWhilei>=1tempstr=tempstr+Mid(xstr,i,1)i=i-1Loopystr=tempstrEndSub A.dcbaB.abdcC.abcdD.dabc 参考答案: A 无--
|