1、VB 笔试模拟试卷 209及答案与解析 1 在窗体上画一个命令按钮和两个标签，其名称分别为 Command1、 Label1和Label2，然后编写如下事件过程： Private Sub Command1_Click() a=0 For i=1 T0 10 a=a+1 b=0 For j=1 To 10 a=a+1 b=b+2 Next j Next i Label1.Caption=Str(a) Label2.Caption=Str(b) End Sub 程序运行后，单击命令按钮，在标签 Label1和 Label2中显示的内容分别是 ( )。 （ A） 10和 20 （ B） 20和 11
2、0 （ C） 200和 110 （ D） 110和 20 2 下列程序运行时，两次单击窗体后，显示的结果是 ( )。 Private Sub Form_Click() Dim b As Integer Static c As Integer b=b+2 c=c+2 Print “b=“；b;“c=“;c End Sub （ A） b=2 c=2 b=2 c=2 （ B） b=2 c=2 b=4 c=4 （ C） b=2 c=2 b=2 c=4 （ D） b=2 c=2 b=4 c=2 3 假定有下面的过程： Function Func(a As Integer,b As Integer)As
3、Integer Static m As Integer,i As Integer m=0 i=2 i=i+m+1 m=i+a+b Func=m End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command 1_Click() Dim k As Integer， m As Integer Dim p As Integer k=4 m=1 p=Func(k， m) Print p； p=Func(k， m) Print p End Sub 程序运行后，单击命令按钮，输出结果为 ( )。 （ A） 8 17 （ B） 8 16 （ C） 8 20
4、（ D） 8 8 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） $*$* （ B） *$*$*$*$ （ C） *$*$ （ D） $*$*$*$* 5 窗
5、体上有一个命令按钮和一个列表框 (Sorted属性为 True)，执行下列过程后的输出结果是 ( )。 Private Sub Command1_Click() List1.AddItem“China“ List1.AddItem“Great“ List1.AddItem“Is“,1 List1.AddItem“!“,3 Print List1.List(2) End Sub （ A） China （ B） Great （ C） Is （ D） ! 6 设有如下程序： Private Sub Command1_Click() Dim sum As Double， x As Double sum
6、=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过 For循环计算一个表达式的值，这个表达式是 ( )。 （ A） 1+1/2+2/3+3/4+4/5 （ B） 1+1/2+2/3+3/4 （ C） 1/2+2/3+3/4+4/5 （ D） 1+1/2+1/3+1/4+1/5 7 单击一次命令按钮之后，下列程序段的执行结果为 ( )。 Pubic Sub Proc(a()As Integer) Static i As Integer Do a(i)=a(i)+a(i+1) i=i+1 Loop While i2 End Su
7、b Private Sub Command1_Click() Dim m As Integer,i As Integer,x(10)As Integer For i=0 To 4:x(i)=i+1:Next i For i=1 To 2:CallProc(x():Next i For i=0 To 4:Print x(i);Next i End Sub （ A） 3 4 7 5 6 （ B） 3 5 7 4 5 （ C） 1 2 3 4 5 （ D） 1 2 3 5 7 8 在窗体上画一个命令按钮 (其 Name属性为 Command1)，然后编写如下代码： Option Base 1 Pri
8、vate Sub Command1_Click() Dim a s=0 a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*J j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是( )。 （ A） 4321 （ B） 1234 （ C） 34 （ D） 12 9 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=1234 c1=Trim(Str(c) For i=1 To 4 Print_ Next End S
9、ub 程序运行后，单击命令按钮，要求在窗体上显示如下内容 1 12 123 1234 则在下划线处应填入的内容为 ( )。 （ A） Right(c1,i) （ B） Left(c1,i) （ C） Mid(c1,i,1) （ D） Mid(c1,i,i) 10 定义含有 10个元素的单精度实型一维数组正确的语句是 ( )。 （ A） Dim a(9)as Single （ B） Option Base 1:Dim a(9) （ C） Dim a#(9) （ D） Dim a(10)As Integer 11 使用语句 Dim A As Integer声明数组 A之后，以下说法正确的是 ( )
10、。 （ A） A数组中所有元素值为 0 （ B） A数组中的所有元素值不确定 （ C） A数组中的所有元素值为 Empty （ D）执行 EraseA后， A数组中的所有元素值为 0 12 假定窗体有一个标签，名为 Label1，为了使该标签透明并且没有边框，正确的属性设置为 ( )。 （ A） Label1.BackStyle=0 Label1.BorderStyle=0 （ B） Label1.BackStyle=1 Label1.BorderStyle=1 （ C） Label1.BackStyle=True Label1.BorderStyle=True （ D） Label1.Bac
11、kStyle=False Label1.BorderStyle=False 13 下面的程序运行结果是 ( )。 Private Sub Form_Click() i=0 Do i=i+1 if i 10 then Exit Do Loop Until i 10 Print i End Sub （ A） 0 （ B） 1 （ C） 10 （ D） 11 14 如果在 C盘当前文件夹下已存在名称为 studata.dat的顺序文件，那么执行语句 Open“c:studata.dat“For Append As #1之后，将 ( )。 （ A）删除文件中原有内容 （ B）保留文件中原有内容，并在文
12、件尾添加新内容 （ C）保留文件中原有内容，并在文件头添加新内容 （ D）以上均不对 15 在菜单编辑器中建立 1个名称为 Menu0的菜单项，将其 “可见 ”属性设置为False，并建立其若干子菜单，然后编写如下过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Buaon=1 Then PopupMenu Menu0 End If End Sub 则以下叙述中错误的是 ( )。 （ A）该过程的作用是弹出一个菜单 （ B）单击鼠标右键时弹出菜单 （ C）
13、Menu0是在菜单编辑器中定义的弹出菜单的名称 （ D）参数 X、 Y指明鼠标当前位置的坐标 16 下面 4个语句中，能打印显示 20*30字样的是 ( ) （ A） Print“20*30“ （ B） Prin 20*30 （ C） Print Chr$(20)+“*“+Chr$(30) （ D） Print Val(“20“)*VaL(“30“) 17 确定复选框是否选中，可访问的属性是（ ）。 （ A） Value （ B） Checked （ C） Selected （ D） Caption 18 下列说法中正确的是（ ）。 （ A）对象属性只能在 “属性窗口 ”中设置 （ B）一个新
14、的工程可以在 “工程窗口 ”中建立 （ C）必须先建立一个工程，才能开始设计应用程序 （ D）只能在 “代码窗口 ”中编写 程序代码 19 不能打开属性窗口的操作是（ ）。 （ A）单击工具栏中的 “属性窗口 ”按钮 （ B）选取 “视图 ”菜单中的 “属性窗口 ”子菜单项 （ C）在对象上单击右键，从弹出的快捷菜单中选择 “属性窗口 ”选项 （ D）选取 “工程 ”菜单中的 “属性窗口 ”子菜单项 20 下列叙述中正确的是（ ）。 （ A）软件测试应该由程序开发者来完成 （ B）程序经调试后一般不需要再测试 （ C）软件维护只包括对程序代码的维护 （ D）以上三种说法都不对 21 窗体文件中
15、的信息是（ ）和其他信息 。 （ A）窗体的形状及其特征 （ B）窗体中控件的形状及其特性 （ C）窗体及其控件的属性 （ D）运行窗体的代码 22 下面关于 Visual Basic6.0工具栏的说法不正确的是（ ）。 （ A）工具栏的位置可以任意改变 （ B）工具栏一定在菜单栏的下方 （ C）工具栏可以显示或隐藏 （ D） Visual Basic有多个工具栏 23 为了用键盘打开菜单和执行菜单命令，第一步应按的键是（ ）。 （ A）功能键 F10或 Alt键 （ B） Shift+功能键 F4 （ C） Ctrl或功能键 F8 （ D） Ctrl+Alt键 24 下列 4项对 Input
16、Box 函数的使用说明，不正确的是（ ）。 （ A）每执行一次 InputBox函数，只能输入一个值 （ B）函数值必须赋给一个变量 （ C） InputBox函数的 Prompt参数不能缺省 （ D）若单击 InputBox函数产生的对话框中的 “取消 ”按钮，将不会返回函数值 25 InputBox函数返回值的类型是（ ）。 （ A）数值 （ B）字符串 （ C）数值或字符串 (视输入的数据而定 ) （ D）变体 26 下列说法正确的是（ ）。 （ A）任何时候都可以使用标准工具栏的 “菜单编辑器 ”按钮打开菜单编辑器 （ B）只有当代码窗口为活动窗口时，才能打开菜单编辑器 （ C）只有当
17、某个窗体为活动窗体时，才能打开菜单编辑器 （ D）任何时候都可以使用 “工具 ”菜单下的 “菜单编辑器 ”命令，打开菜单编辑器 27 要从自定义对话框 Form2中退出，可以在该对话框的 “退出 ”按钮 Click事件过程中使用（ ）语句。 （ A） Form2.Unload （ B） UnloadForm2 （ C） Hide.Form2 （ D） Form2.Hide 28 下列叙述中正确的是（ ）。 （ A） Visual Basic与 Basic没有什么不同 （ B） Visual Basic与 Basic的编程机制不同 （ C） Visual Basic是过程设计语言 （ D） Vi
18、sual Basic与 Basic两种之间没有什么联系 29 假设变量 bool_x 是一个布尔型 (逻辑型 )的变量，则下面正确的赋值语句是（ ）。 （ A） bool_x=“False“ （ B） bool_x=.False. （ C） bool_x=#False# （ D） bool_x=False 30 在下面各关系中，当 X取小数或负数时都能成立的式子是（ ）。 （ A） Int(X) =Abs(X) （ B） Int(X)=Abs(x) （ C） Int(X) Abs(X) （ D） Int(X) Abs(X) 31 MsgBox函数用于显示提示信息，关于函数返回值的说明正确的是（
19、 ）。 （ A）函数的返回值是提示信息的数据类型 （ B）函数的返回值是提示信息的数据长度 （ C）函数的返回值是整数，指示按下哪个按钮 （ D）函数的返 回值是符号常量，指示按下哪个按钮 32 下面程序的功能是统计字符串中 “i“的个数，请填空。 Sub COU() Dim n As Integer a$=“Beijing University of Technology“ n=Len(a$) For i=1 To n b$=Mid$(a$,i,1) If _ Then x=x+1 Next Print “x=“;x End Sub 33 软件设计 模块化的目的是 _ 34 有一个过程如下：
20、 Sub Sub1(m As Integer， total As Long) Dim i AS Integer total=1 For i=1 To m total=total*i Next End Sub 调用它的事件过程如下： Private Sub Command1_Click() Dim tot As Long， a As Integer a=Val(InputBox(“请输入数据 “) Call Subl(a,tot) Print tot End Sub 则输入数据 5，运行结果为 _。 35 用 Line Input语句从顺序文件读出数据时，每次读出一行数据。一行是指遇到_分隔符，
21、即认为一行的结束。 36 执行下面的程序段后，变量 S的值为 _。 S=5 For i=2.6 To 4.9 Step 0.6 S=S+1 Next i 37 首先执行循环体，然后再进行条件判断 ，决定是否结束循环的循环语句是：_。 38 要对文本框中已有的内容进行编辑，按下键盘上的按键，但不起作用，原因是设置了 _。 39 假定有一个名为 pic2.gif的图形文件，要在运行期间把该文件装入一个图片框(Picture1)，应执行的语句是 _。 40 在菜单中，唯一能够识别的事件是 _。 41 在用 Open语句打开文件时，如果省略 “For方式 ”，则打开的文件的存在方式是_。 42 数据库
22、设计分为以下 6个设计阶段：需求分析阶段、 _、逻辑设计阶段、物理设计阶段、实施阶段以及数据库运行和维护阶段。 43 _(黑箱或白箱 )测试方法完全不考虑程序的内部结构和内部特征。 44 数据结构分为线性结构和非线性结构，线性表、栈和队列都属于 _。 45 按 “先进后出 ”原则组织数据的数据结构是 _。 46 软件危机出现于 20世纪 60年代末，为了解决软件危机，人们提出了 _的原理来设计软件，这就是软件工程诞生的基础。 VB 笔试模拟试卷 209答案与解析 1 【正确答案】 D 2 【正确答 案】 C 3 【正确答案】 D 4 【正确答案】 C 5 【正确答案】 B 6 【正确答案】 C
23、 7 【正确答案】 B 8 【正确答案】 B 9 【正确答案】 B 10 【正确答案】 A 11 【正确答案】 D 12 【正确答案】 A 13 【正确答案】 D 14 【正确答案】 B 15 【正确答案】 B 16 【正确答案】 A 17 【正确答案】 A 18 【正确答案】 C 19 【正确答案】 D 20 【正确答案】 D 21 【 正确答案】 C 22 【正确答案】 B 23 【正确答案】 A 24 【正确答案】 D 25 【正确答案】 B 26 【正确答案】 C 27 【正确答案】 B 28 【正确答案】 B 29 【正确答案】 D 30 【正确答案】 D 31 【正确答案】 C 3
24、2 【正确答案】 b$ =“i“ 【试题解析】 命题目的 考查考生对 If 条件语句的应用情况。 解题要点 该语句的作用是判断每个字母是否为 i，如果是则计数，否则不计数。 错解分析 If语句是判断每个条件是否成立，第一次碰到条件成立的表达式，执行其后面的语句后退出 If语句。 考点链接 Visual Basic基础知识。 33 【正确答案】 str1=24 str2=720 【试题解析】 命题目的 考查考生对定义数组和调用函数的掌握情况。 解题要点 程序首先调用循环语句为数组 a、 b 赋值，其中 a(i)=i;b(i)=i，且数组a的上下界分别为 1和 4，数组 b 的上下界分别为 2和
25、6；接着将数组 a作为参数调用 YAG过程，在 YAG过程中，定义了两个变量 t及 i， i作 为循环语句 For的变量，它的初始值和终值分别为数组的上下界，循环体为 t=t * a(i)，即将 a(i)的值乘以 t，然后再赋给 t，当循环结束后，程序返回的就是数组 a中的各元素的积。同理，程序将数组 b 作为参数传递给 YAG过程后返回数组 b 中各元素的积，运行程序结束后，输出结果为： strX=24 str2=720。 考点链接 数组定义、函数调用。 34 【正确答案】 120 【试题解析】 命题目的 考查考生对过程中参数传递方式的掌握情况。 解题要点 本题的难点是实参与形参的传递问题
26、。 total按 ByRef参数传递。子过程的功能是计算 n!，题中输入 5，因此 5!=120。 错解分析 参数按传值方式传递时，不改变实参中的值；按传地址的方式传递时，实参和形参指向的内容被改变。 考点链接 参数传递方式的概念和应用。 35 【正确答案】 Enter 【试题解析】 命题目的 考查考生对文件读写操作的掌握情况。 解题要点 Line Input#语句一次只从文件中读出一个字符，直到遇到回车符(chr(13)或回车一换行符 (Chr(13)+chr(10)为止。回车一换行符将被跳过，而不会被附加到字符串上。 考点链接 文件的读写操作。 36 【正确答案】 9 【试题解析】 命题目
27、的 考查考生对循环语句的掌握。 解题要点 程序首先赋初值 S 为 5，接着一个循环语句 for i=2.6 To 4.9，步长为0.6，所以可以判断循环次数为 4次：循环第一次 i=2.6 S=5+1=6；循环第二次S=6+1=7，依次类推当 i=4时； S=8+1=9。 考点链接 循环语句的使用。 37 【正确答案】 Do-loop 【试题解析 】 命题目的 考查考生对几种循环使用的区分。 解题要点 本题考查的是 Do-loop 结构的循环语句，不管是否满足条件，都要先执行一次。 考点链接 循环语句的使用。 38 【正确答案】 Locked 【试题解析】 命题目的 考查文本框的 Lock 属
28、性。 解题要点 文本框控件 Locked 属性用于设置是否锁定，如设置为 true，则不能编辑该文本框。 考点链接 内部常见控件的属性设置。 39 【正确答案】 Picture1.Picture=LoadPicture(“pic2.gif“) 【试题解析】 命题目的 查询图片框的属性和方法。 解题要点 图片框 Picture属性用于静态设置控件中要显示的图片。 LoadPicture函数可将图形载入到 PictureBox控件。 考点链接 内部控件的使用。 40 【正确答案】 Click事件 【试题解析】 命题目的 考查考生对菜单事件的掌握情况。 解题要点 由于我们对菜单项的操作只有单击，因此
29、菜单项唯一识别的事件就是Click事件。 考点链接 使用菜单编辑 器制作菜单。 41 【正确答案】 随机存取方式 【试题解析】 命题目的 考查考生对随机文件的读写操作的掌握情况。 解题要点 如果使用 Open 语句打开文件而又未使用 For指定打开方式，则默认的方式为 Random，即随机模式。 考点链接 随机文件的读写操作。 42 【正确答案】 概念设计阶段 【试题解析】 命题目的 本题考查了数据库设计概述。 解题要点 数据库设计分为以下 6个设计阶段：需求分析阶段、概念设计阶段、逻辑设计阶段、物理设计阶段、实施阶段 及数据库运行和维护阶段。 考点链接 数据库设计的生命周期。 43 【正确答案】 黑箱 【试题解析】 命题目的 本题考查了软件测试中的黑箱测试。 解题要点 黑箱测试是根据程序规格说明所规定的功能来设计测试用例，它不考虑程序的内部结构和处理过程。常用的黑箱测试技术分为等价类划分、边界分析、错误猜测以及因果图等。 考点链接 白箱测试。 44 【正确答案】 线性结构 45 【正确答案】 栈 46 【正确答案】 软件工程学
