vb复习题

第一卷 客观题

第一题：是非题（共10分，每项1分）

1. ActiveX部件是可以重复使用的编程代码和数据。A A.对 B.错

2. 窗体的Enabled属性设为False时，窗体题的按钮、文本框控件就不会对用户的操作做出反应。A A.对 B.错

3. 每一个控件实质上都是一个微型程序。A A.对 B.错

4. 在程序运行过程中，变量中的值不会改变，而常量中的值会被改变。B A.对 B.错

5. 用Dim语句声明变量时，VB系统不仅为变量分配相应数据类型的内在空间，而且还为变量赋所需的初值。B A.对 B.错

6. 定义菜单项时，可以不设置分隔线的菜单项控件名称。B A.对 B.错

7. 在事件驱动的应用程序中，代码是按照预定的路径执行的。B A.对 B.错

8. 函数调用时，实际参数与形式参数在数量必须完全一致。A A.对 B.错

9. 每个菜单项都是一个控件，与其他控件一样也有自己的属性和事件。A A.对 B.错

10. 通用过程可以放在标准模块中，也可以放在窗体模块中。A A.对 B.错

第二题、 单选题（共45分，每项1.5分）

11. 要判断“命令按钮”是否被鼠标单击，应在“命令按钮”的事件中判断。C A.Chang B.KeyDown C.Click D.KeyPress 12. InputBox函数的返回值的类型为____B__。 A.数值 B.字符串 C.逻辑值 D.日期值

13. 要想在过程调用后返回两个结果，下面的过程定义语句合法的是___A___。 A.Sub Proc1(ByVal n,Byval m) B.Sub Proc1(ByVal n, m) C.Sub Proc1(n,Byval m) D.Sub Proc1(n, m)

14. 下面关于打印对话框属性的说法错误的是____C__。 A.Copies属性指定打印的份数。

B.HDC属性指定分配给打印机的句柄，用来识别对象的设备环境。

C.FromPage属性指定要打印文档的页范围。使用该属性时必须把Flags属性设置为1。

D.Max和Min属性用来显示FromPage和ToPage的范围，其中Min指定允许的起始页码，Max指定允许的最后页码。

15. 常量2.7856E-6的类型是_B_____。 A.整型 B.实型 C.字符型 D.双精度 16. Print #1，STR1$中的Print是___A___。 A.顺序文件的写语句 B.在窗体上显示的方法 C.子程序名 D.打印命令

17. 使用Public x声明一个全局的变量时，该语句应放在__D____。

A.过程中

B.窗体模块的通用声明段

C.标准模块的通用声明段

D.窗体模块或标准模块的通用声明段

18. 文本框没有__D___属性。

A.Enabled B.VisibleC.BackColor D.Caption

19. 记录长度最大可取的值是__A____字节。 A.32767 B.32768 C.65535 D.65536

20. 下面四项中，_A_____是VB中的数值变量。 A.ABC B.E+2 C."True" D.1.35E-2

21. 将数据项“China”添加到列表框（List）中成为第一项应使用＿A＿＿语句。 A.List1.AddItem”China”，0 B.List1.AddItem”China”，l C.List1.AddItem 0，”China” D.List1.AddItem 1，”China”

22. 下列不能打开菜单编辑器的操作是___D___。 A.按Ctrl+E B.单击工具栏中的“菜单编辑器”按钮 C.执行“工具”菜单中的“菜单编辑器”命令 D.按Shift + Alt + M

23. 文本框（Text1）中有选定的文本，执行 Text1.SelText=”Hello”的结果是＿A＿＿。 A.“Hello”将替换掉原来选定的文本 B.“Hello”将插入到原来选定的文本之前 C.Text1.SelLength为5 D.文本框中只有“Hello”

24. 语句Print Format("HELLO", "<")的输出结果是_B_____。 A.HELLO B.hello C.He D.he

25. 函数Int(Rnd*11)+10产生的数值的范围是____C__。 A.（0,10） B.[10,10] C.[10,20] D.(0,20)

26. 如果文本框的Enabled属性设为 False，则＿A＿＿。

A.文本框的文本将变成灰色，并且此时用户不能将光标置于文本框上

B.文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容 C.文本框的文本将变成灰色，用户仍然能改变文本框中的内容

D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容 27. 框架内的所有控件是＿＿A＿。 A.随框架一起移动、显示、消失和屏蔽 B.不随框架一起移动、显示、消失和屏蔽

C.仅随框架一起移动 D.仅随框架一起显示和消失 28. Integer类型的数据由_B_____字节组成。 A.1 B.2 C.3 D.4

29. 数学表达式x>y>z的正确VB逻辑表达式是__D____。 A.x>y And y>z C.x>y And >z D.x>y And y>z

30. 如果要使一个窗体从屏幕上和内存中完全消失，所要使用的语句是___D___。 A.Hide B.Show C.Load D.Unload 31. 在下列说法中，正确的是＿＿D＿。

A.通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上 B.在列表框中不能进行多项选择

C.在列表框中能够将项目按字母顺序从大到小排列 D.框架也有 Click和 DblClick

32. 为了把一个记录型变量的内容写入文件中指定的位置，所使用的语句的格式为__D____。

A.Get 文件号，记录号，变量名 B.Get 文件号，变量名，记录号 C.Put 文件号，变量名，记录号 D.Put 文件号，记录号，变量名

33. 按文件的组织方式分为____A__。

A.顺序文件和随机文件 B.文本文件和二进制文件 C.程序文件和数据文件 D.只读文件和读写文件

34. 以下__C____不能作为VB中的变量名。

A.Abx45 B.P1234 C.89TasFF D.xy

35. 已编译的控件部件的扩展名是＿＿A＿。

A. .OCX B. .VBP C. .EXE D. .CTL

36. 为了建立一个随机文件，其中每一条记录有多个不同数据类型的数据项组成，应使用__A____。

A.自定义类型 B.数组 C.字符串类型 D.变体类型

37. 表达式Int(23.4)+Round(-35.5)的计算结果为___C___。

A.-11 B.-12.1 C.-13 D.-12.5

38. 引用列表框（List1）最后一个数据项应使用＿B＿＿。

A. List1.List(List1.ListCount) B.List1.List(List1.ListCount-1) C.List1.List(ListCount) D.List1.List(ListCount-l) 39. 通过代码在运行时设置属性的语法格式为__B____。

A.对象名＝属性 .新值 B.对象名.属性＝新值 C.对象名.新值=属性 .新值 D.对象名.属性=属性 .新值

40. 在下面选项中，不能完成对顺序文件的读操作的是____D__。

A.LineInput#语句 B.Input#语句 C.Input（）函数 D.Get#语句 第三题、 简单程序（共15分，每项1.5分） 41. 下列程序段的运行结果。A Private Sub Form_Click() Dim Msg Hide

Msg=”选择‘确定’按钮” MsgBox Msg Show End Sub

A.隐藏窗体，按‘确定’按钮使窗体重现 B.隐藏窗体

C.显示窗体，按‘确定’按钮使窗体隐藏 D.显示窗体

42. 执行下面程序段后，变量c$的值为___D___。 a$= "Visual Basic Programming" b$= "Quick"

c$=b$ & Ucase(Mid$(a$,7,6)) & Right$(a$,12)

A.Visual BASIC Programming B.Quick Basic Programming C.QUICK Basic Programming D.Quick BASIC Programming

43. 运行下面程序后，在窗体中显示的是__D____。 Private Sub Form_Click() a$="*": b$="$" For k=1 To 3

x$=String$(Len(a$)+k,b$) Print x$; Next k Print End Sub

A.、*** ** **** B.*$*$*$ C.1*$2*$3*$ D.、$$$$$$$

A.Visual BASIC Programming B.Quick Basic Programming C.QUICK Basic Programming D.Quick BASIC Programming

43. 运行下面程序后，在窗体中显示的是__D____。 Private Sub Form_Click() a$="*": b$="$" For k=1 To 3

x$=String$(Len(a$)+k,b$) Print x$; Next k Print End Sub

A.、*** ** **** B.*$*$*$ C.1*$2*$3*$ D.、$$$$$$$$$

44. 执行下面程序段后，变量a的值为___C___。 For I=1 To 3 For j=1 To I For k=j To 3 a=a+1 Next k

Next j Next I

A.3 B.9 C.14 D.21

45. 写出如下程序运行结果。 D

Function f(m As Integer) As Integer b = 1

Static c As Integer

b = b + 1

c = c + 1

f = m * b * c

End Function

Private Sub Command1_Click()

Dim a As Integer

a = 2 sum=0

For I = 1 To 3

sum=sum+ f(a)

Next I

print sum