1、VB 笔试模拟试卷 241及答案与解析 1 下列叙述中，不属于软件需求规格说明书的作用的是 （ A）便于用户、开发人员进行理解和交流 （ B）反映出用户问题的结构，可以作为软件开发工作的基础和依据 （ C）作为确认测试和验收的依据 （ D）便于开发人员进行需求分析 2 下列叙述中错误的是 ( )。 （ A）线性表是由 n个元素组成的一个有限序列 （ B）线性表是一种线性结构 （ C）线性表的所有结点有且仅有一个前件和后件 （ D）线性表可以是空表 3 VB6.0集成开发环境可以 ( )。 （ A）编辑、调试、运行程序，但不能生成可执行程序 （ B）编辑、生成可执行程序、运行程序，但不能调试程序
2、 （ C）编辑、调试、生成可执行程序，但不能运行程序 （ D）编辑、调试、运行程序，也能生成可执行程序 4 在 Activate事件过程中，写入下面的程序： Prirate Sub Form_Activate() Dim S As String， a As String， b As String a=“*“： b=“$“ For i=1 To 4 If i/2=Int(i/2) Then S=String(Len(a)+i,b) Else S=String(Len(a)+i,a) End If Print S： Next i End Sub 运行程序后，显示的结果是 ( )。 （ A） $*$
3、* （ B） *$*$*$*$ （ C） *$*$ （ D） $*$*$*$* 5 使用文本框显示文字时，只能显示 8个字符 ，则需设定它的 _属性为 8。 （ A） Caption （ B） PasswordChar （ C） MaxLength （ D） Value 6 下面关于完全二叉树的叙述中，错误的是 _。 （ A）除了最后一层外，每一层上的结点数均达到最大值 （ B）可能缺少若干个左右叶子结点 （ C）完全二叉树一船不是满二叉树 （ D）具有结点的完全二叉树的深度为 logDo2n+1 7 如果要改变窗体的标题，需要设置窗体对象的 _ 属性。 （ A） Name （ B） Capt
4、ion （ C） BorderStyle （ D） BackColor 8 数据库的物理设计是为一个给定的逻辑结构选取一个适合应用环境的 _ 的过程，包括确定数据库在物理设备上的存储结构和存取方法。 （ A）逻辑结构 （ B）物理结构 （ C）概念结构 （ D）层次结构 9 索引属于 _。 （ A）模式 （ B）内模式 （ C）外模式 （ D）概念模式 10 栈通常采用的两种存储结构是 （ A）线性存储结构和链表存储结构 （ B）散列方式和索引方式 （ C）链表存储结构和数组 （ D）线性存储结 构和非线性存储结构 11 如果要将窗体中的某个命令按钮设置成无效状态 ,应该设置命令按钮的哪个属性
5、 （ A） Value （ B） Visible （ C） Enabled （ D） Default 12 表达式 Abs(-5)+Len(“ABCDE“)的值是 ( )。 （ A） 5ABCDE （ B） -5ABCDE （ C） 10 （ D） 0 13 在窗体上画一个名称为 Command1的命令按钮 ,然后编写如下事件过程 : Private Sub Command1_Click() For n=1 To 20 If n Mod 3 0 Then m=m+n / 3 Next Print n End Sub 程序运行后 ,如果单击命令按钮 ,则窗体上显示的内容是 （ A） 15 （ B
6、） 18 （ C） 21 （ D） 24 14 下列关于多重窗体程序的叙述中，错误的是 ( )。 （ A）用 Hide方法不但可以隐藏窗体，而且能清除内存中的窗体 （ B）在多重窗体程序中，各窗体的菜单是彼此独立的 （ C）在多重窗体程序中，可以根据需要指定启动窗体 （ D） 对于多重窗体程序，需要单独保存每个窗体 15 下列程序执行后，其输出结果为 ( )。 Dim a(5) For i=0 To 4 a(i)=i+1 m=i+1 Ifm=3 Then a(m-1)=a(i-2)Else a(m)=a(i) Ifi=2 Then a(i-1)=a(m-3) a(4)=i Print a(i)
7、； Nexti （ A） 1 1 1 4 4 （ B） 1 2 3 4 1 （ C） 1 2 1 4 4 （ D） 1 1 1 4 1 16 关系数据库系统存储与管理数据的基本形式是 _。 （ A）关系树 （ B）节点路径 （ C）二维表 （ D）程序文件 17 软件设计中，设计复审是和设计本身一样重要的环节，其主要目的和作用是_。 （ A）避免后期付出更高代价 （ B）减少测试工作量 （ C）保证软件质量 （ D）缩短软件开发周期 18 在文本框中输入字符时，通过 ( )事件过程可以得到字符的 ASCII码值。 （ A） Change （ B） GotFocus （ C） KeyPress
8、（ D） LostFocus 19 为了使列表框中的项目分为多列显示，需要设置的属性为 ( )。 （ A） Columns （ B） Style （ C） List （ D） MultiSelect 20 下列程序代码实现生成 20个 0 100之间的随机整数，存于数组中，打印数组中大于 50的数，并求这些数的和。请选择正确的程序段是 ( )，完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=_ Textl.Text=Textl.Text s; End Sub Function Fun(a() As
9、 Integer) Dim t#, i% t=1 For i=LBound(a) To UBound(a) t=t*a(i) Next Fun=t End Function 42 已知变量 boo1 Var是一个布尔型的变量，如果要给其赋值为 True，则正确的赋值语句就是 _。 43 Visual Basic中的控件分为 3类，它们是标准控件、【 】和可插入对象。 44 下列程序段的执行结果为 _。 i=4 a=5 Do i=i+1 a=a+2 Loop Until i =7 Print “A=“； a 45 在窗体上画两个组合框，其名称分别为 Combo1、 Comb02，然后画两个标签，
10、名称分别为 Label1、 Labe12。要求程序运行后，如果在某个组合框中选 择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空使程序完整。 Private Sub Comb01_Click() Call ShowItem(Combo1， Labe11) End Sub Private Sub Combo2_Click() Call ShowItem(Combo2, Labe12) End Sub Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label) _.Caption=_.Text End Sub 46 以下程序
11、的功能是：从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。请填空。 Private Sub Form_ click() Dim x， y As Single Dim z As Integer x= InputBox(“Enter a score“) Do while【 】 y=y+ x z=z+1 x= InputBox(“Enter a score“) Loop If z= 0 Then z=1 End If y=【 】 Print y End Sub 47 以下程序计算自然数 e的值，要求精确到 1015，阅读下列程序。已知 e的计算公式为： e=1+1/1
12、!+1/2! + +1/n! 。请在【 】和【 】处填上正确内容。 Private Sub Commandl_ Click() 【 】 n =0: term = 1: t = 1 do n= n +1 t=t/n 【 】 Loop while t 1.0E-15 Text1. Text = term End Sub 48 下列程序实现的功能是：当在窗体上单击时，从键盘上读入 5个学 生的学号、姓名、英语成绩并存入到文件 d： stu1.dat中，然后从文件中读出第 3个人的学号、姓名和英语成绩并显示在窗体中。 Type student No As Long Name As String * 2
13、0 English As Integer End Type Private Sub form_ Click () Dim k As student, i As Integer 【 】 Open “d:stu1. dat“ for Random As #10 Len = Reclen for i = 1 To 5 k. No= InputBox(“请输入学号 ”) k. Name = InputBox (“请输入姓名 ”) k. English= InputBox (“请输入英语成绩 ”) 【 】 Next i 【 】 Print k. No; k. Name; k. English Close
14、 #10 End Sub 49 以下程序段执行后 y的值是【 】。 x=8.6 y=int(x+0.5) print y 50 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 X=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，输出结果是【 】。 VB 笔试模拟试卷 241答案与解析 1 【正确答 案】 D 【试题解析】 软件需求规格说明书 (SRS， Software Require
15、ment Specification) 是需求分析阶段的最后成果，是软件开发中的重要文档之一。它具有以下几个方面的作用： 便于用户、开发人员进行理解和交流； 反映出用户问题的结构，可以作为软件开发工作的基础和依据； 作为确认测试和验收的依据。 2 【正确答案】 C 【试题解析】 线性表是一种线性结构，由 n(n0)个元素组成，所以线性表可以是空表。但是在线性表中，第一个结点没有前件，最后一个结点没有后件，其他 结点有且只有一个前件和后件，所以选项 C)是错误的。 3 【正确答案】 D 4 【正确答案】 C 5 【正确答案】 C 6 【正确答案】 B 【试题解析】 这里考察完全二叉树与满二又树的
16、定义及二叉树的性质。满二叉树指除最后一层外每一层上所有结点都有两个子结点的二叉树。完全二叉树指除最后一层外，每一层上的结点数均达到最大值，在最后一层上只缺少右边的若干子结点 (叶子结点 )的二叉树。因此选项 A是正确的，而选项 B 是错误的。由定义可知，满二叉树肯定是完全二叉树，而完全二又树一般不是满二叉树，因此选 项 C是正确的叙述。选项 D即二又树性质 (5)，也是正确的。 7 【正确答案】 B 【试题解析】 窗体的 Caption 属性决定了窗体对象在显示时的标题。 8 【正确答案】 B 【试题解析】 根据数据库物珲设计的概念可知：为一个给定的逻辑数据模型选取一个最合适应用要求的物理结构
17、的过程，就是数据库的物理设计。数据库的物理结构就是指数据库在物理设备上的存储结构与存取方法。 9 【正确答案】 B 【试题解析】 内模式 (Internal SchemA)又称物理模式 (Physical SchemA)，它给出了数据库物理存储结构与物理存取方法，如数据存储的文件结构、索引、集簇及hash 等存取方式与存取路径。 10 【正确答案】 A 【试题解析】 和线性表类似，栈也有两种存储方法，一是顺序栈，二是链式栈。栈的顺序存储结构是利用一组地址连续的存储单元一次存储自栈底到栈顶的数据元素，同时附设指针 top 指示栈顶元素的位置，由于栈的操作是线性表操作的特例，相对而言，链式栈的操作
18、更易于实现。注意：这 3种运算方法在各种存储结构中的应用。 11 【正确答案】 C 【试题解析】 在 Visual Basic中 ,控制控件有效性的属性是 Enabled,设置为 True,则处于有效状态 ,如果设置成 False,则处于无效状态 ,所以选项 C)是正确的 ;Visible属性是控制空间可见性的 ,有两种值 :True和 False,默认情况下是 True;如果将对象的 Visible值设为 False,窗体和控件在设计阶段仍可见 ,只有运行时才隐藏 ,所以选项B)不正确 ;Default 是决定窗体缺省命令按钮的属性 ,另外 ,一个窗体只能有一个缺省命令按钮 ,所以选项 D)
19、也不正确 ;Value属性在不同的控件中有不同的作用。 12 【正确答 案】 C 13 【正确答案】 C 【试题解析】 考查考生对 If 条件语句的应用情况。 n 从 1到 20,循环共执行 20次 ,当 n=21时 ,循环条件不成立 ,循环结束 ,最后输出 n 的值为 21。因此 ,选项 C正确。 If语句是判断每个条件是否成立 ,第一次碰到条件成立的表达式 ,执行其后面的语句后退出 If 语句。 14 【正确答案】 A 【试题解析】 Hide方法只是使窗体隐藏，但仍在内存中，因此选项 A)错误。 15 【正确答案】 C 【试题解析】 本题考查数组元素的赋值。数组 a在循环中为数据赋值，循环
20、变 量i从 0到 4，步长为 1。如果 i等于 2，则将 a(0)的值赋给 a(2)；如果 m等于 3，则将 a(0)的值赋给 a(1)。因此数组元素的值为： 1 2 1 4 4。 16 【正确答案】 C 17 【正确答案】 A 18 【正确答案】 C 【试题解析】 当文本框获得焦点，按下键盘上的某个键时，将触发文本框的KeyPress 事件。 eyPtess 事件带有一个 KeyCode参数，可以通过该参数获取按键的 ASCII码值。 19 【正确答案】 A 【试题解析】 Columns 属性返回或设置一个值，以决定 控件是水平还是垂直滚动以及如何显示列中的项目。 Columns 属性值为
21、0时，控件为垂直滚动； Columns属性等于 1时，则列表框呈多行多列显示： Columns 属性值大于 1时，为水平滚动， Columns 属性值的数量决定在控件中的可见宽度内显示列的数量。 Columns属性用来确定列表框的列数。 20 【正确答案】 A 【试题解析】 Rnd 函数用于产生一个小于 1但大于或等于 0的实数，题中要求0 100之间的随机整数，所以需要对 Rnd产生的实数进行计算处理Int(Rnd*99+1)。要处理数组中的元素，使 用 For EachNext 语句处理数组元素时， Each后只需写出数组名，不能使用小括号。 21 【正确答案】 C 【试题解析】 该程序段
22、的作用是给数组 a的每个数组元素赋值 True，具体实现的方式为：每次从数组 a的第一个元素开始判断，该元素是否为 False，如果是，则令此元素为 True，然后跳出循环，重新从数组 a的第一个元素开始判断；如果当前元素不为 False，则判断下一个元素。因此语句 j=j+1将执行1+2+3+4+5+6+7=28次，即 j=28。然后再遍历一遍数组 a的所有元素，最后结束程序段。 所以 j最终的值是： j=28+7=35。 22 【正确答案】 D 【试题解析】 Text属性用来显示文本框中输入的文本；文本框没有 Caption 属性和 Password 属性； PasswordChar属性中
23、输入的字符或占位符可以替代在文本框中输入的字符显示出来，从而达到隐藏实际输入字符的功能，该属性一般用于密码设置。 23 【正确答案】 D 【试题解析】 本题考查 For循环控制语句的嵌套。当输入 3时， For i执行三次，对应的 Forj循环执行一次，二次、三次， Forj每执行一次， x都加 1，故 最终结果为 6，选 D。 24 【正确答案】 D 【试题解析】 变量 Check 的初值为 True，变量 Counter的初值为 0。当 Counter 9时， Counter每次循环加 1，直到等于 10 时， Check 的值为 False，退出里层Do-Loop 循环。当 Check=
24、False的计算结果为 True时，退出外层 Do-Loop 循环，在窗体上打印出 Counter的值 10和 Check 的值 Ralse。 25 【正确答案】 C 【试题解析】 为了判断一个数 n是不是素数，可以将 n被 2到根号 2之间的所有整数除， 如果都除不尽，则 n就是素数，否则不是素数。本题是典型的判断素数的程序语句。故选择 C项。 26 【正确答案】 A 【试题解析】 当在文本框中输入字符时，文本框的内容发生变化，所以应把程序写在 Text1_ Change()事件中。 27 【正确答案】 C 【试题解析】 InputBox 函数的功能是显示一个对话框，该对话框能接收用户输入的
25、数据。 语法 InputBox(prompt， title， default,xpos,ytms,helpfile， context) InputBox函数的语法具有以下几个命名参数： 部分 描述 Prompt 必需的。作为对话框消息出现的字符串表达式。 prompt的最大长度大约是 1024个字符，由所用字符的宽度决定。如果 prompt包含多个行，则可在各行之间用回车符 (chr(13)、换行符 (chr(10)或回车换行符的组合 (chr(13)b(i)=i,且数组 a的上下界分别为 1和 5,接着将数组 a作为参数调用 Fun 过程 ,在 Fun 过程中 ,定义了两个变量 t及 i,i
26、作为循环语句 For的变量 ,它的初始值和终值分别为数组的上下界 ,循环体为 即将 a(i)的值乘以 t,然后再赋给 t,当循环结束后 ,程序返回的就是数组 a中的各元素的积 ,故输出结果为 :s=120。 42 【正确答案】 boo1 Var=Ture 【试题解析】 赋值运算符号为 “=”，功能是将右侧的值赋值给左侧的变量，并要求两侧的数据类型匹配，布尔类型的值有两个 True或 False，所以正确的赋值形式为：布尔型变量名 =True (或 False)。 43 【正确答案】 ActiveX控件 【试题解析】 Visual Basic 中的控件分为以下 3类：标准控件 (也称内部控件 )
27、、ActiveX控件、可插入对象。 44 【正确答案】 A=11 【试题解析】 本段程序执行如下：第 1次循环后： i=i+1=5; a=a+ 2=7：第 2次循环后： i=i+1=6； a=a+2=9；第 3次循环后： i=i+ 1=7； a=a+2=11；此时循环条件成立，退出循环。 45 【正确答案】 tmpLabel tmpCombo 【试题解析】 标签控件的 Caption属性显示标签中的内容， 组合框的 Text属性显示选择或输入的数据项的内容，要把选择的项目显示在标签中，应该是用组合框的 Text为标签的 Caption 属性赋值。用户定义的 ShowItem过程中定义了两个控件
28、型参数 (tmpCombo 和 tmpLabel)，因此，在该过程中使用 tmpCombo 和tmpLabel 来表示组合框和标签控件。 46 【正确答案】 x =0 ,y/z 【试题解析】 根据表达式的值有条件地执行一组语句。 语法 If condition Then statementsElse elsestatements 或者，可以使用块形式的语法： If condition Then statements ElseIf condition-n Then elseifstatements. Else elsestatements End If 当条件为 True时，或直到条件变为 Tr
29、ue时，重复执行一个语句块中的命令。 语法 DoWhile Untilcondition statements Exit Do statements Loop 或者可以使用下面这种语法： Do statements Exit Do statements LoopWhile Untilcondition 本题的循环首先判断输入是否大于 0，如果是则处理这个输入，否则结束循环。循环体内的第二个判断语句判断的是当前输入是否比当前的最小值小，如果是则改写当前最小值为输入值，否则结束判断语句。 47 【正确答案】 Dim t As double,term=term+ t 【试题解析】 既然要求精确到 1
30、0-15，所以要使用 Double型变量，否则小数点后8位的数据就没法保存和显示出 来。对该题，考生还必须具备一定的计算机算法知识。 48 【正确答案】 Reclen=Len(k),Put #10 i， k,Get #10， 3， k 【试题解析】 本题中定义了一个记录类型 Student，并通过一个循环读入 5条记录型数据存放到指定的文件中去，因此文件的存取方法应是随机存取方式。从打开文件的 Open 语句可以看到有一个变量 RecLen 应是写入文件中的记录长度，在该语句的前面应给该变量赋值，故 8处应填 “Reclen= Len(k)”。在循环中每读入一个记录型的变量值，应立即把该变量写
31、到文 件中去，应使用 Put语句，故在 9处应填 “Put #10， i， k”。要读出随机文件中的某条记录，可使用 Get语句，故在 10处应填 “Get #10， 3， k”。 49 【正确答案】 9 【试题解析】 返回参数的整数部分，其类型和参数相同。 语法 Int(number) 必要的 number参数是 Double或任何有效的数值表达式。如果 number包含Null，则返回 Null。 50 【正确答案】 15 【试题解析】 观察程序，由于每次执行第二层循环时 x都被重新赋值，因此 只要看当 x=3时，执行第三层循环所得到的结果就可以。 k=1， x=x+6=3+6=9 k=2,x-x+6=9+6=15 最终的输出结果是： 15。
