[计算机类试卷]VB笔试模拟试卷288及答案与解析.doc

1、VB 笔试模拟试卷 288及答案与解析 1 如果准备读文件，打开顺序文件 “text.dat“的正确语句是 （ A） Open“text.dat”For Write As #1 （ B） Open“text.dat”For Binary As #1 （ C） Open“text.dat”For Input As #1 （ D） Open“text.dat”For Random As #1 2 数据结构主要研究的是数据的逻辑结构、数据的运算和 ( )。 （ A）数据的方法 （ B）数据的存储结构 （ C）数据的对象 （ D）数据的逻辑存储 3 在结构化方法中，用数据流程图 (DFD)作为描述工具

2、的软件开发阶段是 ( )。 （ A）逻辑设计 （ B）需求分析 （ C）详细设计 （ D）物理设计 4 程序的基本控制结构是 ( )。 （ A） Do-Loop结构、 Do-Loop While结构和 For-Next结构 （ B）子程序结构，自定义函数结构 （ C）顺序结构，选择结构和循环结构 （ D）单行结构，多行结构和多分支结构 5 在窗体上绘制一个名称为 Label1的标签，然后编写如 下事件过程： Private Sub Form_Click() Dim arr(10,10)As Integer Dim i As Integer,j As Integer For i =2 To 4

3、For j =2 To 4 arr(i,j)=i*j Next j Next i Label1.Caption=Str(arr(2,2)+arr(3,3) End Sub 程序运行后，单击窗体， 在标签中显示的内容是 ( )。 （ A） 12 （ B） 13 （ C） 14 （ D） 15 6 下列叙述中正确的是 （ A）用 E-R图能够表示实体集间一对一的联系、一对多的联系和多对多的联系 （ B）用 E-R图只能表示实体集之间一对一的联系 （ C）用 E-R图只能表示实体集之间一对多的联系 （ D）用 E-R图表示的概念数据模型只能转换为关系数据模型 7 要使窗体显示时无标题栏和边框，应设置

4、窗体的 _属性。 （ A） ControlBox （ B） BorderStyle （ C） MaxButton （ D） BackStyle 8 用链表表示线性表的优点是 _。 （ A）便于插入和删除操作 （ B）数据元素的物理顺序与逻辑顺序相同 （ C）花费的存储空间较顺序存储少 （ D）便于随机存取 9 在数据库管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是 （ A）数据库系统阶段 （ B）文件系统阶段 （ C）人工管理阶段 （ D）数据项管理 10 在面向对象方法中，一个对象请求另一个对象为其服务的方式是通过发送 （ A）调用语句 （

5、 B）命令 （ C）口令 （ D）消息 11 设 a=6,则执行 x=IIF(a5,-1,0) 后 ,x的值为 （ A） 5 （ B） 6 （ C） 0 （ D） -1 12 向顺序文件 Temp.txt中写入 1， 2， 3这 3个数。在程序中加入以下语句的哪一项可以使程序功能完整。 Private Sub Command1_Click() Open “c:Temp.txt“， Output As#1 For i=0 To 3 Next Close #1 End Sub （ A） Print #1， Temp.txt （ B） Get #1， i （ C） Print #1， i （ D）

6、Unit #1， i 13 在窗体上画一个命令按钮 (名称为 Command1)，然后编写如下事件过程： Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后，单击命令按钮，输出的结果是 _。 （ A） a=11 （ B） a=b+c （ C） a= （ D） False 14 下列程序段的执行结果 为 _。 K=0 For I=1 To 3 A=IIK Print A; Next I （ A） 1 1 1 （ B） 1 4 9 （ C） 0 0 0 （ D） 1 2 3 15 单击命令按钮执行下列程序，其输出结果是 (

7、)。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=3 b=4 c=5 Print SecProc(c, b,a)End Sub Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y)+x End Fu

8、nction （ A） 20 （ B） 22 （ C） 28 （ D） 30 16 Sub过程与 Function过程最根本的区别是 ( )。 （ A） Sub过程可以使用 Call语句或直接使用过程名调用，而 Function过程不可以 （ B） Function过程可以有参数， Sub过程不能有参数 （ C）两种过程参数的传递方式不同 （ D） Sub过程的过程名不能有返回值，而 Function过程能通过过程名返回值 17 下列 ( )事件过程可以将打开文件对话框的标题改变为 “new Caption”。 （ A） Private Sub Command1_CliCk() CommonD

9、ialog1.DialogTitle=“new Caption“ CommonDialog1.ShowFont End Sub （ B） Private Sub Command1_Click() CommonDialog1.DialogTitle=“new Caption“ CommonDialog1.ShowOpen End Sub （ C） Private Sub Command1_Click() CommonDialog1.DialogTitle=“new Caption“ CommonDialog1.Show Help End Sub （ D） Private Sub Command1

10、_Click() CommonDialog1.DialogTitle=“new Caption“ CommonDialog1.ShowColor End Sub 18 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮，然后编写 如下事件过程： Private Sub Command1_Click() Text1.Text =“Visual“ Me.Text1 = “Basic“ Text1 = “Program“ End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是 （ A） Visual （ B） Basic （ C） Program （ D）出

11、错 19 设一个 工程由两个窗体组成，其名称分别为 Form1和 Form2，在 Form1上有一个名称为 Command1的命令按钮。窗体 Form1的程序代码如下： Private Sub Command1_Click() Dim a ks Integer a=10 Call g(Form2, ) End Sub private Sub g(f As Form, x As Integer) Y=Iif(x 10, 100, -100) f. Show f. Caption=Y End Sub 运行以上程序，正确的结果是 _。 （ A） Form1的 Caption 属性值为 100 （ B

12、） Form2的 Caption属性值为 -100 （ C） Form1的 Caption属性值为 -100 （ D） Form2的 Caption 属性值为 100 20 在窗体上画一个命令按钮 (其名称为 Conlmand1)，然后编写如下事件过程：Private Sub Command1_Click() For i=1 To 4 If i=1 Then x=i If i =4 Then x=x+1 Print x Next iEnd Sub 程序运行后，单击命令按钮，其输出结果为_。 （ A） 1 2 3 4 （ B） 2 3 4 5 （ C） 2 3 4 4 （ D） 3 4 5 6

13、21 在 Visual Basic中，要使一个窗体不可见，但不从内存中释放，应使用的语句是 ( ) （ A） Show （ B） Hide （ C） Load （ D） UnLoad 22 一个工程中包含两 个名称分别为 Form1、 Form2的窗体，一个名称为 Func的标准模块。假定在 Form1和 Func中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub Fun1() End Sub Func中定义的过程： Public Sub Fun2() End Sub 若要在窗体 For2g调用 Porm1和 Func中分别建立的自定义过程，则调用格式正确

14、的是 ( ) （ A） Call Form1. Funl() Func Fun2() （ B） Call Form1. Fun1() Call Fun2() （ C） Form1. Fun1() Func. Fun2() （ D） Fun1() Fun2() 23 下面的数组声明语句中正确的是 （ A） Dim gg1,5 As String （ B） Dim gg1 To 5,1 To 5 As String （ C） Dim gg1 To 5 As String （ D） Dim gg1:5,1:5 As String 24 执行如下两条语句后，窗体上显示的是 _。 a=8.4326 Pr

15、int Format(a,“$00,00.00“) （ A） 0,008.43 （ B） $8.43 （ C） 8.43 （ D） $0,008.43 25 Visual Basic集成的主窗口中不包括 （ A）属性窗口 （ B）标题栏 （ C）菜单栏 （ D）工具栏 26 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() X=0 Do Until x=-1 a=InputBox(“请输入 A的值 “) a=Val(A)b=InputBox(“请输入 B的值 “) b=Val(B)x=InputBox(“请输入 x的值 “) x=Val(

16、x) a=a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入 5、 4、 3、 2、 1、 -1，则输出结果为 _。 （ A） 2 （ B） 3 （ C） 14 （ D） 15 27 运行以下程序后，输出的结果是 for i=1 to 3 cls print“ i=“,i； Next （ A） 123 （ B） 3 （ C） i=1i=2i=3 （ D） i=3 28 下列 ( )可返回一个值。 （ A）事件过程 （ B）通用过程 （ C） Function过程 （ D）属性过程 29 下列不能打开菜单编辑器的操作是 （ A）按组合键 Ctr

17、l+E （ B）单击工具栏中的 “菜单编辑器 ”按钮 （ C） 执行 “工具 ”菜单中的 “菜单编辑器 ”命令 （ D）按组合键 Shift+Alt+M 30 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) X=0 n=Input Box(“) For i=1 To n For j=1 To i K=X+1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入 3，则在窗体上显示的内容是 （ A） 3 （ B） 4 （ C） 5 （ D） 6 31 在窗体上画一个名称

18、为 Drive1的驱动器列表框，一个名称为 Dir1的目录列表框。当改变当前驱动器时， 目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是 _。 （ A） Drive1_Change （ B） Drive1_Click （ C） Dir1_Click （ D） Dir1_Change 32 在 Visual Basic中传递参数的方法有 _方式。 （ A）一种 （ B）两种 （ C）三种 （ D）四种 33 在 Visual Basic种，要使标签的标题栏靠右显示，则将其 Alignment属性设置为 （ A） 0 （ B） 2 （ C） 1 （ D） 3 3

19、4 设一个工程由两个窗体组成，其名称分别为 Form1和 Form2，在 Form1上有一个名称为 Command1的命令按钮。窗体 Form1的程序代码如下： Private Sub Command1_Click( ) Dim a As Integer a=10 Call g(Form2， A ) End Sub Private Sub g(f As Form， x As Integer) y=IIf(x10， 000， -100) f Show f Caption=y End Sub运行以上程序，正确的结果是 （ A） Form1的 Capdon 属性值为 100 （ B） Form2的

20、Caption属性值为 -100 （ C） Form1的 Caption属性值为 -100 （ D） Form2的 Capdon 属性值为 100 35 设工程中有 2个窗体： Forml、 Form2， Forml为启动窗体。 Form2中有菜单，其结构如表。要求在程序运行时，在 Forml的文本框 Tcxtl中输入口令并按同车键 (回车键的 ASCII码为 13)后，隐藏 Forml，显示 Form2。若口令为 “Teacher”，所有菜单项都可见；否则看不到 “成绩录入 ”菜单项。为此某人在 Form1窗体文件中编写如下程序： Private Sub Text1_KeyPress(Key

21、Ascii As Integer)IfKeyAscii=13 ThenIf Text1 Text=“Teacher”ThenForm2 input Visible=TrueElseForm2 input Visible=FalseEnd ifEnd ffForml HideForm2 ShowEnd Sub菜单结构程序运行时发现刚输入口令时就隐藏了 Forml，显示了 Form2，程序需要修改。下面修改方案中正确的是 （ A）把 Forml中 Textl文本框及相关程序放到 Form2窗体中 （ B）把 Forml Hide、 Form2 Show两行移到 2个 End If之间 （ C）把

22、IfKeyAscii=13 Then改为 IfKey Ascii=“Teacher”Then （ D）把 2个 Form2 input Visible中的 “Form2 ”删去 36 单元测试又称模块测试，一般采用【 】测试。 37 面向对象的程序设计方法中涉及的对象是系统中用来描述客观事物的一个【 】。 38 数据库设计分为以下 6个设计阶段 ：需求分析阶段、【 】、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。 39 关系模型允许定义 3类数据约束，它们是【 】约束、参照完整性约束以及用户定义的完整性约束。 40 在面向对象方法中，信息隐蔽是通过对象的【 】性来实现的。 41 用户

23、可以用 _语句定义自己的数据类型。 42 下面的程序执行时，将把当前目录下的顺序文件 smtext1 txt的内容读入内存，并在文本框 Text1中显示出来。请填空。 Private Sub Commandl_Click() Dim inData As String Text1 Text=“” Open“ smtext1 txt”_As#1 Do While_ Input#1， inData Text1 Text=Text1 Text Load 和 UnLoad 是针对内存而言的， Load 是加载程序到内存， UnLoad 是从内存中卸载，释放内存。因此，本题的正确答案为 B 项。 22 【

24、正确答案】 B 【试题解析】 本题主要考查过程的调用。调用不同窗体中定义的过程时，必须注明窗体名，故该题中的调用格式应为 Call Forml Funl()。但可以直接调用标准模块中定义的过程。故题中的调用格式为 Call Fun2 ()。选项 B 正确。 23 【正确答案】 C 【 试题解析】 在默认情况下无论是一维还是二维或更多维的数目其缺省下标都从。开始，但有时为了方便，用户可以自定义数组的上下界，那就得用关键字 To来设置。例如： d(1 To 6)，其含义就是一个名为 d，上界为 6，下界为 1的数组。 24 【正确答案】 D 【试题解析】 Format(a,“$00,00.00“)

25、表示显示 a为以 “$”开头的，带 2位小数 (不足 2位部 0)，整数部分为 4位 (不足 4位补 0，且 2位之间用 “， ”分隔 )的字符。 25 【正确答案】 A 【试题解析】 在 Visual Basic集成 的主窗口又称为设计窗口，它由标题栏、菜单栏、工具栏等几部分组成；标题栏是位于屏幕的顶部的水平条，它显示应用程序的名字，启动 Visual Basic后，标题栏中出现的信息是 “工程 1-Microsoft Visual Basic设计 ”；菜单栏位于标题栏之下，提供了开发、调试应用程序的工具，包括“文件 ”菜单、 “编辑 ”菜单、 “试图 ”菜单、 “工程 ”菜单等；工具栏位于

26、菜单栏的下面，它以图标形式提供了部分常用命令的功能；属性窗口不在主窗口的范围之内。注意： 学习时对 Visual Basic集成开发环境不重视，知识了解 不全面。注意： Visual Basic 集成开发环境组成结构。 26 【正确答案】 A 【试题解析】 本题需要注意的是每次循环开始的时候三个变量都被重新赋了一次值，所以最后的结果仅仅是 2+1+(-)。所以最终的输出是 2。 27 【正确答案】 D 【试题解析】 cls 语句的功能是清除窗体或其他对象上的所有输出，因此，本题中开始输出的 i =1 和 i=2都被清除，只剩下 i=3。答案为选项 D。 28 【正确答案】 C 【试题解析】 事

27、件过程是在发生某一个事件时调用的，它没有返回值；通用过 程主要是用来执行一个程序段，也没有返回值； Function 过程的作用一般是完成某种运算，最后把运算的结果作为函数的返回值返回。 29 【正确答案】 D 【试题解析】 菜单编辑器的打开方式有三种，一为使用热键 Ctrl+E;二可以使用访问键 ,即首先按 Alt键激活菜单，然后按 T 键选择 “工具 ”菜单，此时打开 “工具菜单 ”便可以使用方向键进行选择；三便是用鼠标选择。本题答案 B与 C的表达的意思一致， A用了快捷键。 D不能打开任何菜单与功能。 30 【正确答案】 D 【试题解析】 当输入 3时， For i执 行三次，对应的

28、For j循环执行一次、二次、三次， For j每执行一次， x都加 1，故最终结果为 6，选 D。 31 【正确答案】 A 【试题解析】 驱动器列表框用来显示用户系统中有效磁盘驱动器的列表。在程序运行时，该控件的 Drive属性可以返回或设置程序运行时所选择的驱动器。 目录列表框用来显示当前驱动器上的目录结构。在程序运行时，该控件的 Path 属性可以返回或设置当前路径。当驱动器列表框中当前所选中的驱动器发生变化时， Drive属性也将相应变化，从而触发驱动器列表框的 Change事件，因此可以在驱 动器列表框的 Change事件中加入如下的语句： Dir1.Path=Drive1.Driv

29、e 该语句的作用是将目录列表框的 Path 属性设置为改变后的当前驱动器路径，从而使目录列表框中的目录结构随当前所选择的驱动器的变化而相应的变化。 32 【正确答案】 B 【试题解析】 在 VB中传递参数的方式有按值传递 By Val和按地址传递 ByRef两种。 33 【正确答案】 C 【试题解析】 本题考查的是标签的 Alignment属性的设置。 Alignment属性用来设置标签中标题的位置，可将其 设置为 0， 1， 2，作用如下： 0：标题靠左显示 (默认 )。 1：标题靠右显示。 2：标题居中显示。 34 【正确答案】 B 【试题解析】 此题单击命令按钮后将调用 g()函数，观察

30、该函数，是显示窗体 f，并且将该窗体的标题设置为 y，而 y的值要通过 IIf语句来判断，此题中第一个实参为 Form2，将 x=10带人判断语句为结果为 -100，因此执行命令后 Form2的标题为 -100，所以选项 B正确。 35 【正确答案】 B 【试题解析】 左原程序中，只要触发文本框控件的 keyPress 事件 。则会执行隐藏 Form1，显示 Form2语句。所以将 Form Hide和 Form2 Show 两行移到两个 End if之间，在每次输入口令之后，只要不按回车键就不会执行程序，按下后程序会检验是否口令为 “Teacher”，是则 “成绩录入 ”可见，否则不可见，之

31、后执行Form1 Hide和 Form2 Show。 36 【正确答案】 白盒法 【试题解析】 单元测试又称模块测试，一般采用白盒法。白盒测试方法即把程序看成一个透明的白盒子，完全了解程序的结构和处理过程，按照程序内部的逻辑路径测试程序，检查程序中的 每条路径是否都能按预定要求工作。 37 【正确答案】 实体 【试题解析】 面向对象的程序设计方法中涉及的对象是系统中用来描述客观事物的一个实体，是构成系统的一个基本单位，它由一组表示其静态特征的属性和它可执行的一组操作组成。 38 【正确答案】 blank 【试题解析】 数据库设计分为以下 6个设计阶段：需求分析阶段、概念设计阶段、逻辑设计阶段、

32、物理设计阶段、实施阶段及数据库运行和维护阶段。 39 【正确答案】 实体完整性 【试题解析】 关系模型允许定义 3类数据约束，它们是实体完 整性约束、参照完整性约束以及用户定义的完整性约束，其中前两种完整性约束是关系数据库所必需遵守的规则。对于用户定义的完整性约束，则由关系数据库系统提供完整性约束语言，用户利用该语言写出约束条件，运行时由系统自动检查。 40 【正确答案】 封装 【试题解析】 软件工程的基本原则包括抽象、信息隐蔽、模块化、局部化、确定性、一致性、完备性和可验证性。信息隐蔽是指采用封装技术，将程序模块的实现细节隐藏起来，使模块接口尽量简单。 41 【正确答案】 Type 【试题解

33、析】 用户可以用 Type语句来定 义数据类型，格式是： Type 数据类型名 数据类型元素名 As 类型名 数据类型元素名 As 类型名 EndType 其中 “数据类型名 ”是要定义的数据类型的名字，其命名规则和变量的命名规则相同； “数据类型元素名 ”也遵守相同的规则，且不能是数组名； “类型名 ”可以是任何基本数据类型，也可以是用户定义的类型。 42 【正确答案】 Input (NotEOF(1) 【试题解析】 本题考查文件的操作。程序首先要以读文件的方式 (Input)打开文件，题中说明这是个顺序文件，那么如果文件指针没有到文件尾 (EOF(1)盼值为False)，就要从文件中读出数

34、据，所以循环条件应以是否到文件尾为依据，判断是否继续循环。 43 【正确答案】 3 44 【正确答案】 北京 shanghai 45 【正确答案】 3 46 【正确答案】 Unload,Show或 Show 1 【试题解析】 Unload语句、 Show方法 Unload 语句用来将指定窗体从内存中清除。 格式： Unload窗体名称 Show方法用来显示一个窗体。 格式：窗体名称 .Show模式 参数 “模式 ”用来确定显示窗体的状态，可以 取值 0或 1。 取值为 0(0值是缺省值 )则窗体是 “无模式 ”窗体，当该窗体显示出来时，不但可以对该窗体进行操作，还可以对其他显示出来的窗体进行操

35、作；取值为 1则窗体是“模式 ”窗体，当该窗体显示出来时，只能对该窗体进行操作，只有当该窗体关闭后，才能对其他窗体进行操作。 47 【正确答案】 12 【试题解析】 用 Redim语句重定义数组的维数时，原有维数内的内容将被破坏。除非用 Redim Preserve来重新定义维数。本题中由于输入值 x 4，动态数组在被重定义为包含 4个元素的数组后 (即 Redim arry(3)，此时 arry(3)=3)，重新被定义为包含 5个元素的数组，而重定义时并未用 Preserve关键字。故此时arry(3)=0(实际上 my(0)、 arry(1)、 arty(2)的值也都为 0，即 Integ

36、er 类型变量的初始值 )。 48 【正确答案】 Ctrl 【试题解析】 按住 Ctrl键然后连续单击控件可以将它们连续选中。 49 【正确答案】 blank 【试题解析】 在 Visual Basic中， AddItem方法可以用来在列表框 (或组合框 )中插入一行文本，其格式为： ListBoxl. AddItem字符， 拒插入的索引值 RemoveItem方法可以用来在列表框 (或组合框 )中删除一行文本，其语法为：ListBoxl.RemoveItem 删除的索引值 50 【正确答案】 4 【试题解析】 此题实际上是从左自右逐个提取 a$中的字符，判断是不是等于“n”，统计其中 “n，的个数。