2012年重庆计算机二级vb试题

二级VisualBasic笔试模拟试题第1页共11页二级VisualBasic笔试模拟试题（共100分）注意事项：1.请将一、二、三题的答案填涂在答题卡上2.请将四、五、六题的答案做在答题纸上一、单项选择题（每小题1分，共25分）1．用于设置粗体字的属性是（d）。（A）FontItalic（B）FontName（C）FontBold（D）FontSize2．语句Me.Printthe;Spc(2);sun执行后在窗体上输出的结果是（a）。（A）thesun（B）thesun（C）the;sun（D）theSpc(2)sun3．设有说明语句：OptionBase1:Dimarr(-3to3,10)，则数组arr中元素个数为（b）。（A）60（B）70（C）80（D）904．以下属性与方法中，（c）可以重新定义窗体的坐标系。（A）DrawStyle（B）DrawWidth（C）DrawMode（D）Scale5．当运行VB程序时，系统在窗体加载时将自动执行窗体的（a）事件过程。（A）Load（B）Click（C）UnLoad（D）GotFocus6．VisualBasic是一种面向对象的可视化程序设计语言，采取了（a）的编程机制。（A）事件驱动（B）按过程顺序执行（C）从主程序开始执行（D）按模块顺序执行7．下列程序段中，不能把x和y中的较大者赋予变量Max的是（d）。（A）Max=IIf(xy,x,y)（B）IfxyThenMax=xElseMax=y（C）Ifx=yThenMax=xElseMax=y（D）Ifx=yThenMax=yElseMax=x8．在文本框中输入的数据，其默认的数据类型是（b）。（A）Integer（B）Single（C）String（D）Double9．下列程序执行后，窗体上输出的计算结果是（c）。PrivateSubCommand1_Click()DimaAsString,bAsIntegera=21：b=35：c=a+bPrintcEndSub（A）21（B）35（C）56（D）213510．要求每0.5秒触发一次Timer事件，定时器Timer1的Interval属性应被设置为（a）。二级VisualBasic笔试模拟试题第2页共11页（A）0.5（B）5（C）50（D）50011．VB程序调试期间，若程序陷入死循环，可以中断循环，终止程序运行的按键是（c）。（A）Esc（B）Pause（C）Ctrl+End（D）Ctrl+Break12．下列关于数组定义的语句中，概念正确的语句是（b）。（A）一维数组的下标只能从0或1开始。（B）使用语句Dima(-10,10)AsDouble，可以定义一个拥有21个元素的数组。（C）使用语句Dima(n)AsInteger，可以定义一个拥有n个元素的数组。（D）使用语句OptionBase0:Dimb(4,6)AsSingle定义的数组b拥有24个元素。13．下列函数表达式中，返回值最大的是（a）。（A）Len(d:\background.jpg)（B）Val(d:\background.jpg)（C）Month(now)（D）WeekDay(now)14．将焦点移到某个名为Object的控件，所使用的方法是（d）。（A）Object.SetFocus（B）Object.Visible（C）Object.Refresh（D）Object.GetFocus15．与VB符号常量vbCrLf等价的表达式是（c）。（A）Chr(13)（B）Chr(10)（C）Chr(13)+Chr(10)（D）Chr(10)+Chr(13)16．单选按钮OptionButton的Value属性的数据类型是（a）。（A）布尔型(Boolean)（B）单精度型(Single)（C）整型(Integer)（D）字符串型(String)17．下列程序运行后，单击命令按钮Command1，则在窗体上显示的内容是（b）。OptionBase0PrivateSubCommand1_Click()DimweekAsVariantweek=Array(星期一,星期二,星期三,星期四,星期五,星期六,星期日)Printweek(3)EndSub（A）星期二（B）星期三（C）星期四（D）星期五18．在VB程序设计阶段，当双击窗体上的某个控件时，所打开的窗口是（c）。二级VisualBasic笔试模拟试题第3页共11页（A）工程资源管理器窗口（B）工具箱窗口（C）代码窗口（D）属性窗口19．下述程序段的功能是（c）。PrivateSubForm_KeyPress(KeyAsciiAsInteger)c=KeyAsciiIfc=97Andc=122ThenPrintChr(c)EndSub（A）在窗体上显示键盘输入的可见字符（B）在窗体上显示键盘输入的数字和标点符号（C）在窗体上显示键盘输入的小写字母（D）在窗体上显示键盘输入的大写字母20．在VB程序运行期间改变窗体的大小，将触发的事件是（cc）。（A）Deactivate（B）LinkOpen（C）Resize（D）Terminate21．复选框控件(CheckBox)被选中时，图标形式为，此时Check1.Value的属性值是（c）。（A）3（B）2（C）1（D）022．在窗体上绘图时，为了坐标定位计算方便，希望将窗体工作区左上角的坐标设置为(-5,3)，窗体工作区右下角的坐标设置为(5,-3)。能实现此功能的语句是（a）。（A）Me.Scale(5,-3)–(-5,3)（B）Me.Scale(-5,-3)–(5,3)（C）Me.Scale(-5,3)–(5,-3)（D）Me.Scale(-5,-3)–(5,-3)23．在下图所示程序中，为“打开文件”菜单选项mnFileOpen设置快捷键（又称为热键），应设置属性mnFileOpen.Caption=（b）。（A）打开文件(&O)（B）打开文件(@O)（C）打开文件(*O)（D）打开文件(#O)24．在VB程序中，使用Append方式打开一个数据文件后，文件指针指向的是（c）。（A）文件头（B）文件尾（C）文件中的一个随机位置（D）文件中由用户特别指定的一个位置25．能在窗体上绘出下图所示折线图形的程序段是（d）。二级VisualBasic笔试模拟试题第4页共11页(A)PrivateSubForm_Click()d=3.14159/180X1=Me.ScaleWidth/4Y1=Me.ScaleHeight/4PSet(X1,Y1)Fori=0To360Step20X2=400*Cos(i*d)Y2=400*Sin(i*d)Line-Step(X1,Y1)NextiEndSub(B)PrivateSubForm_Click()d=3.14159/180X1=Me.ScaleWidth/4Y1=Me.ScaleHeight/4PSet(X1,Y1)Fori=0To360Step40X2=400*Cos(i*d)Y2=400*Sin(i*d)Line-Step(X1,Y1)NextiEndSub(C)PrivateSubForm_Click()d=3.14159/180X1=Me.ScaleWidth/4Y1=Me.ScaleHeight/4PSet(X1,Y1)Fori=0To360Step20X2=400*Cos(i*d)Y2=400*Sin(i*d)Line-Step(X2,Y2)NextiEndSub(D)PrivateSubForm_Click()d=3.14159/180X1=Me.ScaleWidth/4Y1=Me.ScaleHeight/4PSet(X1,Y1)Fori=0To360Step40X2=400*Cos(i*d)Y2=400*Sin(i*d)Line-Step(X2,Y2)NextiEndSub二、多项选择题（每小题1分，共5分）1．下列语句可将图片框Picture1的背景颜色设为红色的有（bcd）。。（A）Picture1.Backcolor=Red（B）Picture1.Backcolor=vbRed（C）Picture1.Backcolor=RGB(255,0,0)（D）Picture1.Backcolor=&HFF0000（E）Picture1.Backcolor=&HFF二级VisualBasic笔试模拟试题第5页共11页2．在VB集成开发环境中，若非经过特别引用，否则在默认状态下不可能出现在工具箱中的控件是（bcde）。（A）（B）（C）（D）（E）3．下列方法中，能在图片框（PictureBox）上调用执行的包括（acd）。（A）Print（B）Cls（C）Hide（D）Show（E）Line4．下列计量单位中，可以用来确定窗体和其它控件大小的有（abe）。（A）Twip（B）Point（C）Pixel（D）Character（E）Inch5．可以将双精度类型变量X(X0)中的数值精确到小数点后面2位数的函数表达式有（abd）。（A）Round(x,2)（B）Int(100*x+0.5)/100（C）Fix(100*x+0.5)/100（D）Int(x+0.5)（E）Fix(x+0.5)三、判断分析题（每小题1分，共10分）1．ExitFor语句可以退出所有类型的循环结构。2．程序中语句position=InStr(str1,and)执行过后，若字符串变量str1中不包含子串and，则position的值为0。3．在程序运行期间，如果将定时器(Timer)的Index属性设置为0，可以使定时器停止暂时关闭。4．语句x=Rnd–Rnd执行之后，变量x的值必定为0。5．如果变量n为大于1的整数，下列语句执行结束之后，变量i的值为n。Fori=1TonPrintiNexti6．VisualBasic程序源代码允许在一行上书写多个语句，只要用冒号(“:”)将这些语句分隔开来即可。7．如果设置标签控件(Label1)的属性Label1.AutoSize=True，则程序运行期间Label1的宽度会随着Label1.Caption属性赋予的字符数目而自动改变。8．程序设计时在同一框架(Frame)中画出的多个单选按钮控件(OptionButton)，程序运行期间最多只允许其中之一被选中。9．在程序设计阶段设置了窗体的Font属性之后，添加到窗体上的任何控件都将自动继承窗体的Font属性。10．在VisualBasic算术表达式中，“\”运算符与”*”、”/”运算符具有相同的优先级。四、程序填空题（每空2分，共20分）1．下面程序的功能是：计算x的符号值000101xxxy二级VisualBasic笔试模拟试题第6页共11页PrivateSubForm_Click()x=Val(InputBox(请输入x的值：))Ifx0Theny=1①x=0Theny=0②y=-1EndIfPrintx&的符号值=&yEndSub2．程序希望实现的功能是：产生20个取值范围在[500，800]之间，并且能被5整除的随机整数，每10个数排成一行，在窗体上显示输出。PrivateSubForm_Click()n=0DoWhilen20x=Int(Rnd*301+500)If③=0Thenn=n+1Printx;If④=0ThenPrintEndIfLoopEndSub3．下列程序运行后，希望实现的功能是：生成如图格式的5×5方阵。PrivateSubForm_Click()Fori=1To5Forj=1To5二级VisualBasic笔试模拟试题第7页共11页Picture1.Print⑤(i=j,*,@);NextjPicture1.⑥NextiEndSub4．下列程序拟用于统计指定的字符串在文本框Text2内输入短文中出现的次数，并将统计结果显示在窗体右上角的标签控件Label1中。PrivateSubCommand1_Click(