国家二级VB机试选择题-试卷5_真题-无答案

国家二级VB机试（选择题）-试卷5

(总分80,考试时间90分钟)

1. 选择题

1. 下列叙述中正确的是( )。

A. 有一个以上根结点的数据结构不一定是非线性结构

B. 只有一个根结点的数据结构不一定是线性结构

C. 循环链表是非线性结构

D. 双向链表是非线性结构

2. 下列叙述中正确的是( )。

A. 算法就是程序 B. 设计算法时只需要考虑数据结构的设计

C. 设计算法时只需要考虑结果的可靠性 D. 以上三种说法都不对

3. 一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为( )。

A. 16 B. 10

C. 6 D. 4

4. 在下列模式中，能够给出数据库物理存储结构与物理存取方法的是( )。

A. 外模式 B. 内模式

C. 概念模式 D. 逻辑模式

5. 软件生命周期是指( )。

A. 软件产品从提出、实现、使用维护到停止使用退役的过程

B. 软件从需求分析、设计、实现到测试完成的过程

C. 软件的开发过程

D. 软件的运行维护过程

6. 面向对象方法中，继承是指( )。

A. 一组对象所具有的相似性质 B. 一个对象具有另一个对象的性质

C. 各对象之间的共同性质 D. 类之间共享属性和操作的机制

7. 负责数据库中查询操作的数据库语言是( )。

A. 数据定义语言 B. 数据管理语言

C. 数据操纵语言 D. 数据控制语言

8. 一个教师可讲授多门课程，一门课程可由多个教师讲授。则实体教师和课程间的联系是( )。

A. 1∶1联系 B. 1∶m联系

C. m∶1联系 D. m∶n联系

9. 有三个关系R，S和T如下：则由关系R和S得到关系T的操作是( )。

A. 自然连接 B. 交

C. 投影 D. 并

10. 下列选项中属于面向对象设计方法主要特征的是( )。

A. 继承 B. 自顶向下

C. 模块化 D. 逐步求精

11. 以下变量名中合法的是( )。

A. x－2 B. 12abc

C. sum_total D. print

12. 已知a＝6，b＝15，c＝23，则语句 Print Sgn(a＋b Mod 6－ca)& a＋b 的输出结果为( )。

A. 6 B. 16

C. 31 D. 121

13. 以下叙述中错误的是( )。

A. Visual Basic 是事件驱动型可视化编程工具

B. Visual Basic应用程序不具有明显的开始和结束语句

C. Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性

D. Visual Basic中控件的某些属性只能在运行时设置

14. 设a＝2， b＝3， c＝4， d＝5， 下列表达式的值是( )。

A. True B. False

C. －1 D. 1

15. 如下关于变体类型变量的叙述中，错误的是( )。

A. 变体类型数组中只能存放同类型数据

B. 使用Array初始化的数组变量，必须是Variant类型

C. 没有声明而直接使用的变量其默认类型均是Variant

D. 在同一程序中，变体类型的变量可以被多次赋以不同类型的数据

16. 满足下列条件之一的年份是闰年：1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份，下面判断闰年的正确表达式是( )。

A. y Mod 4 And y Mod 100 Or y Mod 400

B. y Mod 4＝0 Or y Mod 1000 And y Mod 400＝0

C. y Mod 1000 And(y Mod 4＝0 Or y Mod 400＝0)

D. y Mod 4＝0 And y Mod 1000 Or y Mod 400＝0

17. 现有如下语句： x＝IIf(a＞50， Int(a3)， a Mod 2)当a＝52时，x的值是( )。

A. 0 B. 1

C. 17 D. 18

18. 设有如下数组定义语句：Dim a(－1 To 4， 3)As Integer 以下叙述中正确的是( )。

A. a数组有18个数组元素 B. a数组有20个数组元素

C. a数组有24个数组元素 D. 语法有错

19. 窗体上有1个名称为Text1的文本框，1个名称为Label1的标签。程序运行后，如果在文本框中输入信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程为( )。

A. Private Sub Label1_Click() n＝ End Sub

B. Private Sub Label1_Change() n＝ End Sub

C. Private Sub Text1_Click() n＝ End Sub

D. Private Sub Text1_Change() n＝ End Sub

20. 对窗体上名称为Command1的命令按钮，编写如下事件过程：Private Sub

Command1_Click() Move 200， 200End Sub程序运行时，单击命令按钮，则产生的操作是( )。

A. 窗体左上角移动到距屏幕左边界、上边界各200的位置

B. 窗体左上角移动到距屏幕右边界、上边界各200的位置

C. 窗体由当前位置向左、向上各移动200

D. 窗体由当前位置向右、向下各移动200

21. 在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub

Form_Load() Show ＝"" ＝"" usEnd

SubPrivate Sub Text1_Change() ＝Mid(， 6)End Sub程序运行后，如果在文本框Text1中输入ChinaBeijing，则在文本框Text2中显示的内容是( )。

A. ChinaBeijing B. China

C. Beijing D. ChinaB

22. 在窗体上画一个水平滚动条，其属性值满足Min

A. 增加一个SmallChange量

B. 减少一个SmallChange量

C. 增加一个LargeChange量

D. 减少一个LargeChange量

23. 在菜单编辑器中建立如下图所示的菜单，并为了每个菜单项编写了鼠标单击事件过程。关于此菜单，以下叙述中错误的是( )。

A. 针对此菜单进行操作，单击"斜体"菜单项时，将执行它的鼠标单击事件过程

B. 针对此菜单进行操作，单击"下划线" 菜单项时，"√"被去掉

C. 针对此菜单进行操作，单击"退出"菜单项时，不能执行对应的单击事件过程

D. 针对此菜单进行操作，单击"编辑"菜单项时，打开下拉菜单，但不执行相应的单击事件过程

24. 以下关于通用对话框的叙述中，错误的是( )。

A. 在程序运行状态下，通用对话框控件是不显示的

B. 通用对话框控件是Visual Basic的标准控件

C. 设计时，通用对话框控件的大小是固定的，不能改变

D. 在同一个程序中，一个通用对话框控件可以作为打开、保存等多种对话框

25. 窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，相应的事件过程如下：Private Sub Command1_Click() ＝"All File|*.*|Text

File|*.txt|PPT|*.ppt" Index＝2 r＝"C：" me＝"default" veEnd Sub关于上述过程，以下叙述中正确的是( )。

A. 默认过滤器为"*.ppt"

B. 指定的初始目录为"C："

C. 打开的文件对话框的标题为"default"

D. 上面事件过程实现保存文件的操作

26. 以下关于窗体的叙述中，错误的是( )。

A. Hide方法能隐藏窗体，但窗体仍在内存中

B. 使用Show方法显示窗体时，一定触发Load事件

C. 移动或放大窗体时，会触发Paint事件

D. 双击窗体时，会触发DblClick事件

27. 以下关于图片框控件的说法中，错误的是( )。

A. 可以通过Print方法在图片框中输出文本

B. 图片框控件中的图形可以在程序运行过程中被清除

C. 图片框控件中可以放置其他控件

D. 用Stretch属性可以自动调整图片框中图形的大小

28. 为了清除列表框中指定的项目，应使用的方法是( )。

A. Cls B. Clear

C. Remove D. RemoveItem

29. 定时器的Interval属性的值是一个整数，它表示的是( )。

A. 毫秒数 B. 秒数

C. 分钟数 D. 小时数

30. 阅读程序：Private Sub Form_Click() a＝0 For j＝1 To 15 a＝a＋j Mod 3

Next j Print aEnd Sub程序运行后，单击窗体，输出结果是( )。

A. 105 B. 1

C. 120 D. 15

31. 为计算1＋2＋22＋23＋24＋…＋210的值，并把结果显示在文本框Text1中，若编写如下事件过程：Private Sub Command1 Click() Dim a&，s&，k& s＝1 a＝2 For

k＝2 To 10 a＝a*2 s＝s＋a Next k ＝sEnd Sub执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是( )。

A. 把s＝1改为s＝0

B. 把For k＝2 To 10改为For k＝1 To 10

C. 交换语句s＝s＋a和a＝a * 2的顺序

D. 把For k＝2 To 10改为For k＝1 To 10、交换语句s＝s＋a和a＝a * 2的顺序

32. 标准模块中有如下程序代码：Public x As Integer，y As IntegerSub var_pub() x＝10∶y＝20End Sub在窗体上有1个命令按钮，并有如下事件过程：Private Sub Command1_Click()

Dim x As Integer Call var_pub x＝x＋100 y＝y＋100 Print x；yEnd Sub运行程序后单击命令按钮，窗体上显示的是( )。

A. 100 100 B. 100 120

C. 110 100 D. 110 120

33. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim i As Integer， n As Integer For i＝0 To 50 i＝i＋3 n＝n＋1 If i＞10 Then Exit For

Next ＝Str(n) End Sub程序运行后，单击命令按钮，在文本框中显示的值是( )。

A. 2 B. 3

C. 4 D. 5

34. 设有如下的程序段：n＝0For i＝1 To 3 For j＝1 To i For k＝j To 3n＝n＋1

Next k Next jNext i执行上面的程序段后，n的值为( )。

A. 3 B. 21

C. 9 D. 14

35. Private Function f(y As Integer) f＝y * yEnd Function运行上述程序，如下叙述中正确的是( )。

A. 程序运行出错，x变量的类型与函数参数的类型不符 B. 在窗体上显示100

C. 函数定义错，函数名f不能又作为变量名 D. 在窗体上显示10

36. 窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程：Private Sub

Text1_KeyUp(KeyCode As Integer，Shift As Integer) Print ；End Sub运行程序，并在文本框中输入"123"，则在窗体上的输出结果为( )。

A. 123 B. 112

C. 12123 D. 112123

37. 设有以下程序：Private Sub Form_Click() x＝50 For i＝1 To 4 y＝InputBox("请输入一个整数") y＝Val(y) If y Mod 5＝0 Then a＝a＋y x＝y Else a＝a＋x End If Next i

Print aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为( )。

A. 100 B. 50

C. 120 D. 70

38. 设在工程文件中有一个标准模块，其中定义了如下记录类型：Type Books Name As

String * 10 TelNum As String * 20End Type在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件中写入一条Books类型的记录。下列能够完成该操作的事件过程是( )。

A. Private Sub Command1_Click() Dim B As Books Open "" For Output As #1 ＝InputBox("输入姓名") ＝InputBox("输入电话号码") Write #1， ，

Close #1 End Sub

B. Private Sub Command1_Click() Dim B As Books Open "" For Input As #1 ＝InputBox("输入姓名") ＝InputBox("输入电话号码") Print #1， ，

Close #1 End Sub

C. Private Sub Command1_Click() Dim B As Books Open "" For Output As #1 ＝InputBox("输入姓名") ＝InputBox("输入电话号码") Write #1， B Close #1 End

Sub

D. Private Sub Command1_Click() Open "" For Input As #1 Name＝InputBox("输入姓名") TelNum＝InputBox("输入电话号码") Print #1， Name， TelNum Close #1 End Sub

39. 设工程中有2个窗体：Form1、Form2，Form1为启动窗体。Form2中有菜单，其结构如

表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为"Teacher"，所有菜单都可见；否则看不到"成绩录入"菜单项。为此，某人在Form1窗体文件中编写如下程序：Private Sub

Text11_KeyPress(KeyAscii As Integer) If KeyAscii＝13 Then If ＝"Teacher"Then e＝True Else

e＝False End If End If d

Sub程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是( )。

A. 把Form1中Text1文本框及相关程序放到Form2窗体中

B. 把、两行移到2个End If之间

C. 把If KeyAscii＝13 Then 改为 If KeyAscii＝"Teacher" Then

D. 把2个e 中的"Form2."删去

40. 在设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框：Private Sub Command1_Click() Title＝"打开文件" r＝"C：" ＝"所有文件|*.*|Word文档|*.doc|文本文件|*.txt" me＝""

＝1 If me＝""Then Print"未打开文件" Else

Print"要打开文件"& me End IfEnd Sub但实际显示的对话框中列出了C：下的所有文件和文件夹，"文件类型"一栏中显示的是"所有文件"。下面的修改方案中正确的是( )。

A. 把 ＝1 改为 ＝2

B. 把"＝"后面字符串中的"所有文件"改为"文本文件"

C. 在语句＝1的前面添加：Index＝3

D. 把me＝"" 改为 me＝"文本文件"