2010年11月等级考试题(笔试)
- 格式：doc
- 大小：96.50 KB
- 文档页数：9
二级Visual Basic笔试试题(A卷)(100分)2010年11月13日注意事项：1．请将一、二、三题的答案涂在答题卡上2．请将四、五、六题的答案做在答题纸上一、单项选择题(每小题1分，共25分)1．在VB中，以下变量类型表示数值范围最大的是( )。
(A)长整型Long (B)整型Integer(C)单精度型Single (D)字节型Byte2．表达式2^4 mod 34＼3^2的运算结果为( )。
(A)4 (B)3 (C)2 (D)13．下面数组声明语句中，正确的是( )。
(A)Dim a[3,4]As Integer (B)Dim a(3,4)As Integer(C)Dim a(n,n)As Integer (D)Dim a(3 4)As Integer4．用于设置粗体字的属性是( )。
(A)FontItalic (B)FontName (C)FontBold (D)FontSize5．下列函数表达式中，返回值为数值类型的是( )。
(A)Chr(49) (B)Left(“visual”，3)(C)String(3,”basic”) (D)Len(Text1.Text)6．语句Me.Print “ggg”;Spc(2);”ttt”的执行结果是在窗体上输出( )。
(A)ggg tit (B)gggm (C)”ggg”;”ttt”(D)ggg Spc(2) ttt7．设有说明语句：Option Base 1: Dim arr(-3 to 3,10)，则数组arr中元素个数为( )。
(A)60 (B)70 (C)80 (D)908．函数表达式Val(“”)的返回值为( )。
(A)98absl00 (B)98 (C)100 (D)09．以下属性和方法中，( )可以重新定义窗体的坐标系。
(A)DrawStyle (B)DrawWidth (C)DrawMode (D)Scale10．增加列表框中数据项，应该使用的方法是( )。
(A)Clear (B)AddItem (C)Remove (D)Refresh11．计时器Timer支持的唯一事件是( )。
(A)Change (B)Timer (C)Load (D)Scroll12．在MouseDown事件过程中，参数Button的值为1表示按下的鼠标按键是( )。
(A)鼠标左键(B)鼠标右键(C)同时按下鼠标左右键(D)未按鼠标按键13．在按下Shift键的同时，在一个控件上按下鼠标左键不放，并拖动鼠标，在事件过程MouseMove(Button, Shift, X, Y)中有效的语句是( )。
(A) If Button=0 And Shift=0 Then(B) If Button=0 And Shift=1 Then(C) If Button=1 And Shift=0 Then(D) If Button=1 And Shift=1 Then14．在窗体代码窗口中的通用(General)段用Dim语句定义一个变量( )。
(A) 该变量只在本窗体的通用(General)段中有效(B) 该变量在本窗体中的所有函数或过程中都有效(C) 该变量在本窗体和其他模块中的所有函数或过程中有效(D) 该变量在本工程中的所有函数或过程中都有效15．消息框MsgBox函数有五个参数，其中必不可少的参数是( )。
(A)设置标题栏上的提示信息Title(B)设置对话框中显示的命令按钮数目和形式Button(C)设置提示信息Prompt(D)设置帮助文件HelpFile16．一元二次方程ax2+bx+c=0有实根的条件是：a<>0且b2-4ac≥0，在VB程序中表示该条件的逻辑表达式是( )。
(A) a<>0 And b*b-4*a*c≥0(B) a<>0 Or b*b-4*a*c≥0(C) a<>0 And b*b-4*a*c>=0(D) a<>0 Or b*b-4*a*c>=017．单选按钮(OptionButton)被选中时，其Value属性的值是( )。
(A)Ture (B)False (C)0 (D)118．当运行VB程序时，系统在窗体加载时将自动执行窗体的( )事件过程。
(A)Load (B)Click (C)UnLoad (D)GotFocus19．Visual Basic是一种面向对象的可视化程序设计语言，采取了( )的编程机制。
(A)事件驱动(B)按过程顺序执行(C)从主程序开始执行(D)按模块顺序执行20．下面程序段中，能找出两个数(x和y)中较大的数并保存在变量Max中，其中不正确的是( )。
(A) Max=IIf(x>Y, X, Y)(B) If X>Y Then Max=X Else Max=Y(C) Max=X ：If Y>=X Then Max=Y(D) If Y>=X Then Y=Max21．在循环体中退出循环的语句是( )。
(A)Exit If (B)Exit For (C)Exit Sub (D)Exit Function22．有字符串A=”Visual Basic”，能得到”Basic”子字符串在A中位置的函数表达式是( )。
(A)Len(A) (B)Right(A, 6)(C)Instr(A, “Basic”) (D)Mid(A, 8, 5)23．在文本框中输入的数据，其默认的数据类型是( )。
(A)Integer (B)Single (C)String (D)Double24．在过程调用中，可以选用的参数传递方式是( )。
(A)ByName (B)ByVal (C)ByLength (D)BySize25．以顺序输入模式打开文件”Text.Dat"的语句是( )。
(A)Open “Text.Dat” For Output As #1(B)Open “Text.Dat” For Input As #2(C)Open “Text.Dat” For Binary As #3(D)Open “Text.Dat” For Random As #4 Len=16二．多项选择题(每小题1分，共5分)(下面各小题有2个或2个以上正确答案，请选出全部正确答案，错选或漏选均不得分) 1．在文本框Text1中输入字符，将输入的字符转换成大写显示在标签(Lable1)中，下列语句正确的有( )。
(A)Label1=UCase(Text1) (B)Text1=UCase(Label1)(C)s=Text1.text : Label1.Caption=UCase(s)(D)Text1.text=S : Label1.Caption=UCase(s)(E)Label1.Caption=UCase(s) : s=Text1.text2．下列表达式中，返回值为2的有( )。
(A)5 Mod 3 (B)5.2/3.7 (C)5\2(D)Sqr(4) (E)Val(Mid(“2010上海世博会”,1,1))3．使用滚动条时，若规定取值范围为10～100，必须要设置的属性值是()。
(A)LargeChange (B)SmallChange (C)Value(D)Max (E)Min4．在VB程序中，下列属于合法常量的有( )。
(A)#10/21/2010# (B)MouseDown(C)3.14159 (D) False (E)”上海世博会”5．VB提供的ActiveX控件公用对话框CommonDialog可用于创建的标准界面对话框有( )。
(A) 实现打开文件的操作(B) 实现保存文件的操作(C) 实现打印操作(D) 选择系统颜色(E) 选择字符的字体、字型和字号三．判断分析题(正确的选择√，错误的选×，每小题1分，共10分)1．在程序中未加声明而引用的变量，其默认的数据类型为Integer。
2．窗体的Resize事件在程序启动运行过程中可以自动发生。
3．VB语言中的数组分为变量数组和控件数组两类。
4．VB程序中只能使用工具箱中提供的控件对象。
5．标签控件Label中显示的内容在运行时可以通过键盘直接修改。
6．在程序运行期间，将Index属性设置为0，可以将定时器(Timer)暂时关闭。
7．窗体的Caption属性在应用程序运行期间不可更改。
8．当MultiLine属性为False时，文本框(TextBox)在任何情况下都不会出现滚动条。
9．窗体Form、控件PictureBox和Frame具有容器功能，可将其他控件放置在其中。
10．语句Const X=2.55将变量X的值定义为2.55。
四、程序填空题(每空2分，共20分)1．在文本框Textl中输入一个数值，在文本框Text2中输入另一个数值，按“交换”命令按钮Commandl则交换显示在文本框Textl和Text2中的这两个数值。
Private Sub Command1_Click()Dim A,B,CA=Val(textl.Text)B=Val(Text2.Text)①A=B②Text1.Text=Str(A)Text2.Text=Str(B)End Sub1 x>02．下面程序的功能是：计算x的符号值函数sgn(x)= 0 x=0Private Sub Form_click() -1 x<0X=V al(InputBox(“请输入X的值：”))If X>0 ThenY=1③X=0 ThenY=0ElseY=-1End IfMsgBox ④End Sub3．程序功能是：计算从0开始的n个自然数之和，找出满足总和s<10000的最大的自然数个数n，并在窗体上输出n和S。
Private Sub Form_click0n=0 : s=0Don = n + 1s =s + nLoop ⑤s<=10000Print “从0开始的”; ⑥;”个自然数之和=”; s - nEnd Sub4．单击命令按钮Command1，在窗体上显示10个数值范围为1到100的随机整数，并指出其中的最大值和最小值。
Private Sub Command1_Click()Max=0 : Min=100For k=1 T0 10X=Fix(Rnd*101+1)If ⑦Then Max=XLf ⑧Then Min=XPrint X;Next kPrintPrint ”最大值=” ; Max , ”最小值=” ; MinEnd Sub5．下面的程序用于统计一维数组a中包含的峰值个数，并在窗体上输出统计结果(对于一维数组a来说，若元素a(i)的值大于它的前后相邻元素的值，则a(i)为一个峰值)。
