发布时间 : 星期一 文章VB2011期末试卷含答案更新完毕开始阅读
2011下学期高二计算机班期末考试
座号： 姓名： 成绩：
一、 选择题（每题1分 共45分）
1. 以下4种描述中，错误的是__ D __。 A. 常量在程序执行期间其值不会发生改变
B. 根据数据类型不同，常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量
C. 符号常量是用一个标识符来代表一个常数，好象是为常数取一个名字，但仍保持常数的性质
D. 符号常量的使用和变量的使用没有差别 2.下面合法的常量是___ A ____。
A. 1/2 B. 'abcd' C. 1.2*5 D. False 3. 表达式16/4-2^5*8/4 MOD 5\\2的值为___B____ A. 14 B. 4 C. 20 D. 2 4. Visual Basic日期型常量的定界符是__A_____。 A. ## B.‘’ C. () D. {} 5. 下面正确的赋值语句是___C____。
A. x+y=30 B. pi*r*r=y C. y=x+30 D. x=3y 6. \\，/，Mod，*四个算术运算符中，优先级别最低的是___C____。 A. \\ B. / C. Mod D. * 7. 下面语句中有非法调用的是___C____。 A. x=Sgn(-1) B. x=Fix(-1) C. x=Sqr(-1) D. x$=Chr$(65)
8.表达式23/5.8、23\\5.8、23 Mod 5.8的运算结果分别是___B____。
A. 3、3.9655、3 B. 3.9655、3、5 C. 4、4、5 D. 3.9655、4、3 9. 如果变量 a=2、b=\、c=\、d=5，则表达式 a
A. True B. False C. Yes D. No 10.下面不正确的赋值语句是___B____。
A. x=30-y B. y=r.r C. y=x+30 D. y=x\\3
11. 为了给x,y,z三个变量赋初值1，下面正确的赋值语句是___A____。 A. x=1∶y=1∶z=1 B. x=1,y=1,z=1 C. x=y=z=1 D. xyz=1 12. 以下4类运算符，优先级最低的是___D____。
A. 算术运算符 B. 字符运算符 C. 关系运算符 D. 逻辑运算符 13. 如果在立即窗口中依次执行下列命令： a=8 b=9
Print a>b
则输出的结果是____C___。
2013-3-30 2
A. 1 B. 0 C. False D. True 14. 下列表达式的值为真的是___C____。
A. \15. 如果变量a=2,b=3,c=4,d=5，表达式NOT a>b AND NOT d<>c的值是___B____。 A. True B. False C. 1 D. 0 16. 下列符号中，可以用作VB变量名的是___C____。 A. c? B. 3sum C. sum3 D. Len 17. 在下列表达式中，正确的日期型常量是___D____。
A. \
18.条件:1 A. X>1 AND X<=2 OR X>=10 AND X<15 B. X>1 OR X<=2 OR X>=10 OR X<15 C. X>1 OR X<=2 AND X>=10 OR X<15 D. X>1 AND X<=2 AND X>=10 AND X<15 19. 下列程序运行时，从键盘输入字符\，则输出结果是___A____。 Private Sub Form_Click() op$=InputBox(\ If op$=\ If op$=\ Print a End Sub A. -2 B. 0 C. +2 D. +0 20. 表达式Not（a+b=c-d）是___A____。 A. 逻辑表达式 B. 字符表达式 C. 算术表达式 D. 关系表达式 21. \的数据类型是___D____。 A. 整型常量 B. 浮点型常量 C. 符号常量 D. 字符串型常量 22.在下列4个表达式中，非法的表达式形式是___C____。 A. A+B=C B. 0=1 C. \23. 设 x=5，表达式 x>=10 or x<=20 的值是___A____。 A. True B. False C. 0 D. 表达式非法 24. 下列各项不是Visual Basic的基本数据类型的是___ A ____。 A. Char B. String C. Integer D. Double 25. 逻辑表达式 Not \的值为___ A ____。 A. True B. False C. 表达式有错 D. 条件不足 26. 在窗体模块的声明段中声明变量时，不能使用的关键字是___ D ____。 A. Private B. Public C. Dim D. Static 27. 在过程内部定义的局部变量，仅在声明它的___ B ____中有效。 A. 方法 B. 过程 C. 属性 D. 对象 28. 运行以下程序段后，输出结果为___ C ____。 x%=1/4 y%=11/4 PRINT x%;y% A. 0.25 0.75 B. 0 2 C. 0 3 D. 1 3 29. 窗体里有两个对象，分别是图片框Picture1和标签Label1，下面关于Print 2 2013-3-30 3 方法的使用中，错误的一条是___ D ____。 A. Picture1.Print 147 B. Print 147 C. Printer.Print 147 D. Label1.Print 147 30. 下面的___ B ____语句可以实现：先在窗体上输出大写字母A，然后在同一行的第10列输出小写字母b。 A. Print \C. Print \31. 阅读下面的程序段： n1=InputBox(\请输入第一个数：\n2=InputBox(\请输入第二个数：\Print n2-n1 当输入分别为111和222时，程序输出为___ D ____。 A. 111222 B. 222 C. 333 D. 111 32. 设a=2:b=0，则语句 Print (a=2) And (b=-2) 的输出结果是___ D ____。 A. True B. 结果不确定 C. -1 D. False 33. 以下程序段运行后，输出字符的排列顺序是___ D ____。 For i=1 To 6 If i Mod 2=0 Then Print \ Else Print \ End If Next i A. #*#*# B. ##### C. ***** D. *#*#*# 34. 用MsgBox函数显示的对话框，以下叙述正确的是___ D ____。 A. 该对话框有一个“确定”按钮 B. 该对话框有“是”，“否”两个按钮 C. 该对话框有“是”，“否”，“取消”三个按钮 D. 该对话框通过选择参数可以得到以上不同的的按钮组合 35. 与语句Dim abc%作用相同的语句是___ A ____。 A. Dim abc As Integer B. Dim abc As Long C. Dim abc As String D. Dim abc As Date 36. 要使变量x赋值为1～100间（含1，不含100）的一个随机整数，正确的语句是___ D___。 A. x=Int(100*Rnd) B. x=Int(101*Rnd) C. x=1+Int(100*Rnd) D. x=1+Int(99*Rnd) 37. 在VB中，InputBox函数的默认返回值类型为字符串，用InputBox函数输入数值型数据时，下列操作中可以有效防止程序出错的操作是___A____。 A. 在函数InputBox前面使用Val函数进行类型转换 B. 在函数InputBox前面使用Str函数进行类型转换 C. 在函数InputBox前面使用Value函数进行类型转换 D. 在函数InputBox前面使用String函数进行类型转换 38. MsgBox函数的返回值的类型是___A____。 3 2013-3-30 4 A. 整型 B. 字符串 C. 逻辑值 D. 日期型 39. 以下程序代码能执行的是___C____。 A. If a=1 Then b=0 Else c=0 End If B. If a=1 Then : B=0: ElseIf C=0 Then : D=0 C. If a = 1 Then b = 0 ElseIf c = 0 Then d = 0 End If D. If a = 1 Then b = 0 Else If c = 0 d = 0 End If 40. 循环结构 For i = 1 To 10 Step 1.5 的执行次数是___A____。 A. 7 B. 8 C. 9 D. 10 41. 当窗体被加载时运行，发生的事件是（ ） A．Load B．Unload C．Resize D．DragDrop 42. 以下程序段的运行结果是___A____。 Private Sub Form_Click() Dim s As Long, f As Long Dim n As Integer, i As Integer f = 1 n = 4 For i = 1 To n f = f * i s = s + f Next i Print \End Sub A. 33 B. 34 C. 35 D. 36 43. 以下程序段的运行结果是__C__。 Private Sub Form_Click() Dim b As Integer, k As Integer b = 1 For k = 1 To 5 b = b * k If b >= 15 Then Exit For End If Next k Print k, b End Sub 4