全国计算机二级考试VB语言考试试题.docx

全国计算机二级考试VB语言考试试题

全国计算机二级考试VB语言考试试题为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是小编搜索整理的全国计算机等级考试VB语言考试试题，供参考练习，预祝考生们考出自己理想的成绩!全国计算机二级考试VB语言考试试题1．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnum>6Printnum;num=num+2.4LoopEndSub程序运行后，单击命令按钮，则窗体上显示的内容是（A）13.45.8（B）135（C）147（D）无数据输出2．有如下函数：FunctionFacn(xAsInteger)AsLongDimpAsLong,iAsIntegerp=1Fori=1Toxp=p*iNextiFacn=pEndFunction调用它的.事件过程如下：PrivateSubCommand1_Click()i=Val(InputBox(“请输入数据”))a=Facn((i))‘实参i用圆括号括起，则强制为值传递PrintaEndSub若输入数据6，则程序运行结果为（【73】）（A）60（B）120（C）600（D）7203．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimaAsInteger,sAsIntegera=8s=1Dos=s+aa=a－1LoopWhilea<=0Prints;aEndSub程序运行后，单击命令按钮，则窗体上显示的内容是（A）79（B）340（C）97（D）死循环4．下列程序的执行结果为（【74】）DimIntSumAsInteger,iAsIntegerIntSum=0Fori=30.2To1Step-5.3IntSum=IntSum+iNextiPrintIntSum（A）106（B）105（C）102（D）1015．在窗体上画一个命令按钮，然后编写如下事件过程，该过程执行结果为（【75】）OptionBase1PrivateSubCommand1_Click()DimaAsVariant,sAsIntegera=Array(2,4,6,8)j=1Fori=1To4Step1s=s+a(i)*jj=j*10NextiPrintsEndSub（A）0（B）1110（C）2468（D）8642设有如下通用过程：PublicFunctionf(xAsInteger)DimyAsIntegerx=20y=2f=x*yEndFunction6．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()StaticxAsIntegerx=10y=5y=f(x)Printx;yEndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（A）105（B）205（C）2040（D）10407．对窗体编写如下代码：OptionBase1PrivateSubForm_KeyPress(KeyAsciiAsInteger)a=Array(123,86,57,248,32)m1=a(1)m2=1IfKeyAscii=13ThenFori=2To5Ifa(i)>m1Thenm1=a(i)m2=iEndIfNextiEndIfPrintm1,m2EndSub程序运行后，按回车键，输出结果为（【76】）（A）325（B）2484（C）321（D）2485设有如下通用过程：PublicSubFun(a(),ByValxAsInteger)Fori=1To5x=x+a(i)NextEndSub8．在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程：PrivateSubCommand1_Click()Dimarr(5)AsVariantFori=1To5arr(i)=iNextn=10CallFun(arr(),n)Text1.Text=nEndSub程序运行后，单击命令按钮，则在文本框中显示的内容是（A）10（B）15（C）25（D）249．阅读程序：FunctionFunc(aAsInteger)b=1StaticcAsIntegerb=b+1c=c+1Func=a+b+cEndFunctionPrivateSubCommand1_Click()DimaAsIntegera=3Fori=1to3PrintFunc(a)NextiEndSub运行上面的程序，单击命令按钮后，输出结果为（【77】）（A）6（B）6（C）6（D）67681386102