全国计算机二级考试vb语言考试试题.docVIP

全国计算机二级考试VB语言考试试题 　　 　　为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是搜索整理的全国计算机等级考试VB语言考试试题，供参考练习，预祝考生们考出自己理想的成绩! 　　 　　全国计算机二级考试VB语言考试试题 　　 　　1．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： 　　 　　PrivateSubCommand1_Click() 　　 　　DimnumAsInteger 　　 　　num=1 　　 　　DoUntilnum6 　　 　　Printnum; 　　 　　num=num+2.4 　　 　　Loop 　　 　　EndSub 　　 　　程序运行后，单击命令按钮，则窗体上显示的内容是 　　 　　（A）13.45.8（B）135（C）147（D）无数据输出 　　 　　2．有如下函数： 　　 　　FunctionFa(xAsInteger)AsLong 　　 　　DimpAsLong,iAsInteger 　　 　　p=1 　　 　　Fori=1Tox 　　 　　p=p*i 　　 　　Nexti 　　 　　Fa=p 　　 　　EndFunction 　　 　　调用它的事件过程如下： 　　 　　PrivateSubCommand1_Click() 　　 　　i=Val(InputBox(“请输入数据”)) 　　 　　a=Fa((i))‘实参i用圆括号括起，则强制为值传递 　　 　　Printa 　　 　　EndSub 　　 　　若输入数据6，则程序运行结果为（【73】） 　　 　　（A）60（B）120（C）600（D）720 　　 　　3．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： 　　 　　PrivateSubCommand1_Click() 　　 　　DimaAsInteger,sAsInteger 　　 　　a=8 　　 　　s=1 　　 　　Do 　　 　　s=s+a 　　 　　a=a－1 　　 　　LoopWhilea=0 　　 　　Prints;a 　　 　　EndSub 　　 　　程序运行后，单击命令按钮，则窗体上显示的内容是 　　 　　（A）79（B）340（C）97（D）死循环 　　 　　4．下列程序的执行结果为（【74】） 　　 　　DimIntSumAsInteger,iAsInteger 　　 　　IntSum=0 　　 　　Fori=30.2To1Step-5.3 　　 　　IntSum=IntSum+i 　　 　　Nexti 　　 　　PrintIntSum 　　 　　（A）106（B）105（C）102（D）101 　　 　　5．在窗体上画一个命令按钮，然后编写如下事件过程，该过程执行结果为（【75】） 　　 　　OptionBase1 　　 　　PrivateSubCommand1_Click() 　　 　　DimaAsVariant,sAsInteger 　　 　　a=Array(2,4,6,8) 　　 　　j=1 　　 　　Fori=1To4Step1 　　 　　s=s+a(i)*j 　　 　　j=j*10 　　 　　Nexti 　　 　　Prints 　　 　　EndSub 　　 　　（A）0（B）1110（C）2468（D）8642 　　 　　设有如下通用过程： 　　 　　PublicFunctionf(xAsInteger) 　　 　　DimyAsInteger 　　 　　x=20 　　 　　y=2 　　 　　f=x*y 　　 　　EndFunction 　　 　　6．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： 　　 　　PrivateSubCommand1_Click() 　　 　　StaticxAsInteger 　　 　　x=10 　　 　　y=5 　　 　　y=f(x) 　　 　　Printx;y 　　 　　EndSub 　　 　　程序运行后，如果单击命令按钮，则在窗体上显示的内容是 　　 　　（A）105（B）205（C）2040（D）1040 　　 　　7．对窗体编写如下代码： 　　 　　OptionBase1 　　 　　PrivateSubForm_KeyPress(KeyAsciiAsInteger) 　　 　　a=Array(123,86,57,248,32) 　　 　　m1=a(1) 　　 　　m2=1 　　 　　IfKeyAscii=13Then 　　 　　Fori=2