《二级VisualBasic笔试试题册》A卷

201002二级VisualBasic笔试试题（A卷）第1页共8页全国高等学校（重庆考区）非计算机专业计算机等级考试二级VisualBasic笔试试题册（A卷）考试时间：2010年11月13日上午：9:00——11:00考生必读：1．考生严格遵守考场规则。考生拿到试卷后应首先将自己的所在学校名称、考场地点、姓名、准考证号填涂在答题卡和答题纸规定的位置上。2．考生得到监考人员指令后方可作答。3．考生在答题前务必认真阅读题目要求，按要求作答。客观题的答案（选择题和判断题）必须用2B铅笔填涂在答题卡的响应位置上，且必须注明考生卷类别（A卷或B卷）。否则答案无效。4．注意字迹清楚，保持卷面整洁。5．考生时间为120分钟。考生结束时，把试题册，答题卡，答题纸放在桌上，不得带走。监考人员收齐点清后，考生才可离开考场。………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………….…………….本试卷版权所有，任何单位或个人不得复制、出版和存留，违者必究重庆市教育委员会2010年11月201002二级VisualBasic笔试试题（A卷）第2页共8页二级VisualBasic笔试试题册（A卷）（100分）注意事项：1.请将一、二、三题的答案涂在答题卡上2..请将四、五、六题的答案做在答题纸上一、单项选择题（每小题1分，共25分）1.在VB中，以下变量类型表示数值范围最大的是（A）。(A)长整型Long(B)整形Integer(C)单精度Single(D)字节型Byte2.表达式2^4mode34\3^2的运算结果为（D）。(A)4(B)3(C)2(D)13.下面数组声明语句中，正确的是（B）。(A)Dima[3,4]AsInteger(B)Dima(3,4)AsInteger(C)Dima(n,n)AsInteger(D)Dima(34)AsInteger4.用于设置粗体字的属性是（B）。(A)Fontltalic(B)FontName(C)FontBold(D)FontSize5.下列函数表达式中，返回值为数值类型的是（B）。(A)Char(49)(B)Left(“visual”,3)(C)String(3,“basic”)(D)Len(Text1.text)6.语句Me.Print“ggg”;Spc(2)“ttt”的执行结果是在窗体上输出（D）(A)gggttt(B)gggttt(C)“ggg”;”ttt”(D)gggSpc(2)ttt7.设有说明句：optionbase1:Dimarr(-3to3,10)则数组的arr中元素个数为（A）(A)60(B)70(C)80(D)908.函数表达式Val(“”)的返回值为（A）。(A)98abs100(B)98(C)100(D)09.以下属性和方法中，（B）可以重新定义窗体的坐标系。(A)DrawStyle(B)DrawWidth(C)DrawMode(D)Scale10.增加列表框中数据项，应该使用的方法是（D）。(A)Clear(B)Addltem(C)Remove(D)ReFresh11.计时器Timer支持的唯一事件是（C）。(A)Change(B)Timer(C)Load(D)Scroll12.在MouseDown事件过程中，参数Button的值为1,表示按下的鼠标按键是（A）。(A)鼠标左键(B)鼠标右键(C)同时按下鼠标左右键(D)未按鼠标按键13.在按下Shift键的同时，在一个空间上按下鼠标左键不放，并拖动鼠标，在事件过程MouseMove(Button,Shift,X,Y)中有效的语句是（B）。(A)IfButton=0AndShift=0Then(B)IfButton=0AndShift=1Then(C)IfButton=1AndShift=0Then(D)IfButton=1AndShift=1Then14.在窗体代码窗口中的通用（General）段用Dim语句定义一个变量(C)（A）该变量只在本窗体的通用（General）段中有效（B）该变量在本窗体中的所有函数或过程中都有效201002二级VisualBasic笔试试题（A卷）第3页共8页（C）该变量在本窗体和其他模块中的所有函数或过程中有效（D）该变量在本工程中的所有函数或过程中都有效15.消息框MsgBox函数有五个参数，其中必不可少的参数有（B）（A）设置标题栏上的提示信息Title（B）设置对话框中显示的命令按钮数目和形式Button（C）设置提示信息Prompt（D）设置帮助文件HelpFile16.一元二次方程ax2+bx+c=0有实根的条件是：a≠0且b2-4ac≥0，在VB程序中表示该条件的逻辑表达式是（C）（A）a0Andb*b-4*a*c≥0（B）a0Orb*b-4*a*c≥0（C）a0Andb*b-4*a*c=0（D）a0Orb*b-4*a*c=017.单选按钮（OptionButton）被选中时，其Value属性的值是（B）(A)Ture（B）False(C)0（D）118.当运行VB程序时，系统在窗体加载时将自动执行窗体的（A）事件过程（A）Load（B）Click（C）Unload(D)GoFocus19.VisualBasic是一种面向对象的可视化程序设计语言，采取了（A）的编程机制（A）事件驱动（B）按过程顺序执行（C）从主程序开始执行（D）按模块顺序执行20.下面程序段中，能找出两个数（x和y）中较大的数并保存在变量Max中，其中不正确的是（A）（A）Max=IIf(xy,x,y)（B）IfxyThenMax=xElseMax=y（C）Max=x:Ify=xThenMax=y（D）Ify=xTheny=Max21.在循环体中退出循环的语句是（D）（A）ExitIf（B）ExitFor（C）ExitSub（D）ExitFunction22.有字符串A=”VisualBasic”，能得到”Basic”子字符串在A中位置的函数表达式是（B）(A)Len（A）(B)Right（A，6）(C)Instr（A，Basic）(D)Mid（A，8,5）23在文本框中输入的数据，其默认的数据类型（B）（A）Integer（B）Single（C）String（D）Double24.在过程调用中，可以选用的参数传递方式是（D）(A)ByName(B)ByVal(C)ByLength(D)BySize25.以顺序输入模式打开文件“Text.Dat”的语句是（B）（A）Open”Text.Dat”ForOutPutAs#1（B）Open”Text.Dat”ForInPutAs#2（C）Open”Text.Dat”ForBinaryAs#3（D）Open”Text.Dat”ForRandomAs#4Len=16二.多项选择题（每小题1分，共5分）（下面各小题有2个或2个以上正确答案，请选出全部正确答案，错选或漏选均不得分）1.在文本框Text1中输入字符，将输入的字符转化成大写显示在标签（Lable1）中，下列语句正确的有()(A)Lable1=UCase(Text1)(B)Text1=UCase(Lable1)201002二级VisualBasic笔试试题（A卷）第4页共8页(C)s=Text1.Text(D)Text1.Text=sLabel1.Caption=UCase(s)Label1.Caption=UCase(s)(E)Label1.Caption=UCase(s)s=Text1.Text2.下列表达式中，返回值玩味2的有（）（A）5Mod3（B）5.2/3.7（C）5\2（D）Sqr(4)（E）Val(Mid(“2010上海世博会“，1,1))3.使用滚动条时，若规定取值范围为10～100，必须要设置的属性值是（ACDE）(A)Largehang(B)SmallChang(C)Value(D)Max(E)”上海世博会”4.在VB程序中，下列属于合法常量的有（BCDE）(A)#10/21/2010#(B)MouseDown(C)3.14159(D)False(E)”上海世博会”5.VB提供的ActiveX控件公用对话框CommonDialog可用于创建的标准界面对话框有（ABCE）（A）实现打开文件的操作（B）实现保存文件的操作（C）实现打印操作（D）选择系统颜色（E）选择字符的字体、字形和字号三、判断分析题（正确的选择√，错误的选择×，每小题1分，共10分）1.在程序中未加声明而引用的变量，其默认的数据类型为Lnteger.。(√)2.窗体的Resize事件在程序启动运行过程中可以自动发生。（√）3.VB语言中的数组分为变量数组和控件数组数组两类。（×）4.VB程序中只能使用工具箱中提供的控件对象。（×）5.标签控件Labe中显示的内容在运行时可以通过键盘直接修改。（×）6.在程序运行期间，将Index属性设置为0，可以将定时器（Timer）暂时关闭。（√）7.窗体的Caption属性在应用出现运行期间不可更改。（√）8.当MultiLine属性为False时，文本框（TextBox）在任何情况下都不会出现滚动条。（√）9.窗体Form、控件PictureBox和Frame具有容器功能，可将其他民控件放置在其中。（×）10.语句ConstX＝2.55将变量X的值定义为2.55。（√）201002二级VisualBasic笔试试题（A卷）第5页共8页四、程序填空题（每空2分，共20分）1.在文本框Text1中输入一个数值，在文本框Text2中输入另一个数值，按“交换”命令按钮Command1则交换显示在文本框Text1和Text２中的这两个数值。PrivateSubCommand1_Click()DimA,B,CA=Val(Text1.Text)B=Val(Text2.Text)________①__AthenMax___A=B________②___BElseMax_____Text1.Text=Str(A)Text2.Text=Str(B)EndSub2.下面程序的功能是：计算X的符号值函数sgn（x）={PrivateSubForm_Click()x=Val(InputBox(“请输入x的值：”))Ifx0Theny=1_____③__Max___x=0Theny=0Elsey=-1EndIfMsgBox______④__ReFresh____EndSub3.程序功能是：计算从0开始的n个自然数之和，找出满足总和s10000的最大的自然数个数n,并在窗体上输出n和s。PrivateSubForm_Clickn=0:s=0Don=n+1s=s+nLoop______⑤_thenIf_____s=10000Print“从0开始的”;____⑥___Max____,”个自然数之和＝”；s-nEndSub4.单击命令按钮Command1,在窗体上显示10个数值范围为1到100的随机整数，并指出其中的最大值和最小值。PrivateSubCommand1_Click()Max=0:Min=100ForK=1To10x=Fix(Rnd*101+1)If______⑦___10____ThenMax=x10-1X0X=0X0201002二级VisualBasic笔试试题（A卷）第6页共8页If______⑧____1_ThenMin=xPrintx;NextkPrintPrint“最大值＝”;Max,”最小值＝”;MinEndSub5.下面的程序用于统计一维数组a中包含的峰值个数，并在窗体上输出统计结果（对于一维数组a来说，若元素a(i)的值大于它的前后相邻元素的值，则a(i)为一个峰值）。PrivateSubForm_Click()a=Array(77,91,20,57,16,80,77,38)n=0Fori=1ToUBound(a)-_