2018年计算机二级VB考试冲刺练习题及答案共3章

《2018年计算机二级VB考试冲刺练习题及答案共3章》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、计算机二级VB考试冲刺练习题及答案，共3卷，29页，欢迎学习。2018年12月计算机二级VB考试冲刺练习题及答案(1)1.以下程序段：　　PrivateSubForm_Load()　　DimNopAsInteger,OpAsString*1　　Num1=3　　Num2=2　　Nop=val(Inputbox("请输入1-4之间的整数"))　　SelectCaseNop　　Case1　　Op="+"　　Result=Num1+Num2　　Case2　　Op="-"　　Result=Num1-Num2　　Case3　　Op="×"　　Result

2、=Num1*Num2　　Case4　　Op="÷"　　Result=Num1/Num2　　EndSelect　　Label1=Num1&Op&Num2&"="&Result　　EndSub　　窗体运行后，输入2，则label1的标题显示结果为(B)(单)　　A.3+2=5　　B.3-2=1　　C.3×2=6　　D.3÷2=1.5　　2.以下程序段：　　PrivateSubForm_Load()　　DimNopAsInteger,OpAsString*1　　Num1=3　　Num2=2　　Nop=val(Inputbox("请输入1-4之间的整

3、数"))　　SelectCaseNop　　Case1　　Op="+"　　Result=Num1+Num2　　Case2　　Op="-"　　Result=Num1-Num2　　Case3　　Op="×"　　Result=Num1*Num2　　Case4　　Op="÷"　　Result=Num1/Num2　　EndSelect　　Label1=Num1&Op&Num2&"="&Result　　EndSub　　窗体运行后，输入3，则label1的标题显示结果为(C)(单)　　A.3+2=5　　B.3-2=1　　C.3×2=6　　D.3÷2=1.5　

4、　3.以下程序段：　　PrivateSubForm_Load()　　DimNopAsInteger,OpAsString*1　　Num1=3　　Num2=2　　Nop=val(Inputbox("请输入1-4之间的整数"))　　SelectCaseNop　　Case1　　Op="+"　　Result=Num1+Num2　　Case2　　Op="-"　　Result=Num1-Num2　　Case3　　Op="×"　　Result=Num1*Num2　　Case4　　Op="÷"　　Result=Num1/Num2　　EndSelect　　La

5、bel1=Num1&Op&Num2&"="&Result　　EndSub　　窗体运行后，输入4，则label1的标题显示结果为(D)(单)　　A.3+2=5　　B.3-2=1　　C.3×2=6　　D.3÷2=1.5　　4.以下程序段的作用是(A)(单)　　PrivateSubPicture1_Click()　　DimasciAsInteger,iAsInteger　　i=0　　Forasci=32To126　　Picture1.PrintTab(7*i+2);Chr(asci);"=";asci;　　i=i+1　　Ifi=7Theni=0:P

6、icture1.Print　　Nextasci　　A.打印ASCII码表，一行7个表达式　　B.打印九九乘法表，一行7个表达式　　C.打印ASCII码表，一行8个表达式　　D.以上说法都不正确　　5.我国现在人口有13亿，按人口增长0.8%计算，多少年后我国人口将超过26亿。　　PrivateSubCommand1_Click()　　Dimx,n　　x=Val(Text1)　　n=0　　DoWhile【x】<26　　x=x*(1+0.008)　　n=n+1　　Loop　　Text2=Str(n)　　EndSub　　6.以下程序的作用是(B)(

7、单)　　Fori=1To9　　Forj=1To9　　se=i&"×"&j&"="&i*j　　Picture1.PrintTab((j-1)*9+1);se;　　Nextj　　Picture1.Print　　Nexti　　A.打印ASCII码表　　B.打印九九乘法表　　C.打印加法表　　D.以上说法都不正确　　7.求自然数e的近似值，误差小于0.00001，近似公式为：e=1+1/1!+1/2!+1/3!+……+1/I!+……以下程序用来求自然数e。　　PrivateSubForm_Click()　　DimI%,n&,t!,e!　　E=0'存放

8、累加和结果　　I=0'计数器　　n=1'存放阶乘的值　　t=1'级数第I项值　　DoWhile【t>】0.00001　　e=e+t　　I=I+1　　n=n*I　　t