资源描述：
《Vb历年试题分析》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、考点1、变量、表达式及函数历年试题：2008年9月（12）、（13）、（14）、（15）、（19）答案：（12）D、（13）C、（14）B、（15）D、（19）A2008年3月（12）、（13）、（15）(12)在VisualBasic中，表达式3*25mod3的值是（）A）1B)0C)3D)出现错误提示（13）在以下选项中，不合法的VisualBasic的变量名是（）A）a5bB)_xyzc)a_bD)andif(15)现有语句：Y=IIF（X>0，Xmod3,0）设X=10，则Y的值是（）A）0B）1C）3D）语句错误答案：（12）A、（13）B、（15）B2007年9月（1
2、4）（14）执行以下程序后输出的是PrivateSubCommand1_Click()Ch$=”AABCDEFGH”PrintMid(Righ(ch$,6),Len(left(ch$,4)),2)EndSubA)CDEFGHB)ABCDC)FGD)AB答案：（14）C2007年4月（11）、（12）（11）下面可以正确定义两个整型变量和一个字符串变量的语句是（）A）Dimn,mAsInterger,sAsStringB)Dima%,b$,cAsStringC)DimaAsInteger,b,cAsStringD)Dimx%,yAsinteger,zAsString（12）下列表达式
3、中不能判断x是否为偶数的是（）。A）x/2=int(x/2)B)xmod2=0C)Fix(x/2)=x/2D)x2=0答案：（11）D、（12）D2006年9月（13）、（15）、（16）（13）设a=2,b=3,c=4,下列表达式的值是（）。Nota<=cOR4*c=b^2Andb<>a+cA)-1B)1C)TrueD)False答案：D考点及难点2、控制结构历年试题：2008年9月2008年4月2007年9月（27）下面程序执行时，在窗体上显示的是PrivateSubCommand1_Click()Dima(10)Fork=1To10a(k)=11–kNextkPrinta(
4、a(3)a(7)Moda(5))EndSubA）3B）5C）7D)9（30）下面程序的输出结果是PrivateSubCommand1_Click()ch$=”ABCDEF”procchPrintchEndSubPrivateSubproc(chAsString)S=””Fork=Len(ch)To1Step-1s=s&Mid(ch,k,1)Nextkch=sEndSubA）ABCDEFB）FEDCBAC）AD）F（31）某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下：FunctionMaxValue(a()AsInteger)AsIntegerDimmax%m
5、ax=1Fork=2To10Ifa(k)>a(max)Thenmax=kEndIfNextkMaxValue=maxEndFunction程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是A）语句max=1应改为max=a(1)B）语句Fork=2To10应改为Fork=1To10C）If语句中的条件a(k)>a(max)应改为a(k)>maxD）语句MaxValue=max应改为MaxValue=a(max)（32）在窗体上画一个名称为Command1的命令按钮，并编写以下程序：PrivateSubCommand1_Click()Dimn%,b,tt=1:
6、b=1:n=2Dob=b*nt=t+bn=n+1LoopUntiln>9PrinttEndSub此程序计算并输出一个表达式的值，该表达式是A）9！B）10！C）1！+2！+…+9！D）1！+2！+…+10！（34）某人设计了下面的函数fun，功能是返回参数a中数值的位数Functionfun(aAsInteger)AsIntegerDimn%n=1Whilea10>=0n=n+1a=a10Wendfun=nEndFunction在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是A）把语句n=1改为n=0B）把循环条件a10>=0改为a10>0C）把语
7、句a=a10改为a=aMod10D）把语句fun=n改为fun=a
