[计算机类试卷]国家二级（VB）机试模拟试卷1及答案与解析.doc

1、国家二级（ VB）机试模拟试卷 1及答案与解析 一、选择题 1 在结构化方法中，用数据流程图 (DFD)作为描述工具的软件开发阶段是 ( )。 （ A）逻辑设计 （ B）需求分析 （ C）详细设计 （ D）物理设计 2 对序线性表 (23， 29， 34， 55， 60， 70， 78)用二分法查找值为 60的元素时，需要比较次数为 ( )。 （ A） 1 （ B） 2 （ C） 3 （ D） 4 3 下列描述中，正确的是 ( )。 （ A）线性链表是线性表的链式存储结构 （ B）栈与队列是非线性结构 （ C）双向链表是非线性结构 （ D）只有根结点的二叉树是线性结构 4 开发大型软件时，产生

2、困难的根本原因是 ( )。 （ A）大型系统的复杂性 （ B）人员知识不足 （ C）客观世界千变万化 （ D）时间紧、任务重 5 两个或两个以上的模块之间关联的紧密程度称为 ( )。 （ A）耦合度 （ B）内聚度 （ C）复杂度 （ D）连接度 6 下列关于线性表的叙述中，不正确的是 ( )。 （ A）线性表可以是空表 （ B）线性表是一种线性结构 （ C）线性表的所有结点有且仅有一个 前件和后件 （ D）线性表是由 n个元素组成的一个有限序列 7 设有如下关系表： 则下列操作正确的是 ( )。 （ A） T=R/S （ B） T=RS （ C） T=RS （ D） T=R S 8 以下描述

3、中，不是线性表顺序存储结构特征的是 ( )。 （ A）可随机访问 （ B）需要连续的存储空间 （ C）不便于插入和删除 （ D）逻辑相邻的数据物理位置上不相邻 9 在三级模式之间引入两层映像，其主要功能之一是 ( )。 （ A）使数据与程序具有较高的独立性 （ B）使系统具有较高的 通道能力 （ C）保持数据与程序的一致性 （ D）提高存储空间的利用率 10 下列方法中，属于白盒法设计测试用例的方法的是 ( )。 （ A）错误推测 （ B）因果图 （ C）基本路径测试 （ D）边界值分析 11 假定 Picturel和 Textl分别为图片框和文本框的名称，下列不正确的语句是( )。 （ A）

4、 Print 25 （ B） Picture1 Print 25 （ C） Text Print 25 （ D） Debug Print 25 12 为了在运行时能显示窗体左上角的 控制框 (系统菜单 )，可以设置以下哪个属性的值为 True( )。 （ A） ControlBox （ B） MinButton （ C） MaxButton （ D） BorderStyle 13 设有以下函数过程 Private Function Fun(a( ) As Integer,b As String)As Integer End Function 若已有变量声明： Dim x(5)As Intege

5、r， n As Integer， ch As String 则下面正 确的过程调用语句是( )。 （ A） x(0)=Fun(x， ”ch”) （ B） n=Fun(n， ch) （ C） Call Fun x,”ch” （ D） n=Fun(x(5)， ch) 14 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_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 运行程序后，单击 命令按钮，输出结果是 (

6、 )。 （ A） 7 （ B） 15 （ C） 157 （ D） 538 15 下列叙述中有错误的是 ( )。 （ A）变量名的第一个字符必须是字母 （ B）变量名的长度不超过 255个字符 （ C）变量名可以包含小数点或者内嵌的类型声明字符 （ D）变量名不能使用关键字 16 在用 Open语句打开文件时，如果省略 ”For方式 ”，则打开的文件的存取方式是( )。 （ A）顺序输入方式 （ B）顺序输出方式 （ C）随机存取方式 （ D）二进制方式 17 下列是 VisualBasic中所允许的形式数是 ( )。 （ A） 25 74 （ B） 3 457E-100 （ C） 368 （

7、D） 1 87E+50 18 指令 ”Circle(1500， 1200)， 10000 5”将会绘制出的图形为 ( )。 （ A）圆 （ B）正方形 （ C）椭圆 （ D）圆弧 19 在表达式 2+3*45-Sin(x+1) 2中，首先进行的运算是 ( )。 （ A） 45 （ B） 3*4 （ C） x+l （ D） sin( ) 20 在窗体上有一个名 为 Commandl的命令按钮，并有如下事件过程： Private Sub Command l_Click( ) a$=“Swallows Mod Genulled” b$=Right(a$， 8)： c$=Mid(a$， 1， 8) M

8、sgBox a$， b$， c$， 1 End Sub 程序执行时，单击命令按钮，则在弹出的消息框的标题栏中显示的是 ( )。 （ A） Swallows Mod Genulled （ B） Genulled （ C） Swallows （ D） 1 21 在文本框控件中，将 Text的内容全部显示为用户所定义的字符的属性是 ( )。 （ A） PasswordChar （ B）需要编程来实现 （ C） Password （ D）以上都不是 22 下列关于控件焦点的叙述中正确的是 ( )。 （ A）标签控件不能接收焦点事件 （ B）如果将文本框控件中 TabStop属性值设为 False，则该

9、文本框将不能接收焦点事件 （ C）窗体控件不能接收焦点事件 （ D）不能通过程序代码设置焦点属性 23 为了使名称为 Commandl的命令按钮右移 200，应使用的语句是 ( )。 （ A） Commandl Move-200 （ B） Commandl Move 200 （ C） Commandl Left=Commandl Left+200 （ D） Commandl Left=Commandl Lett-200 24 在窗体上画一个名为 Checkl的复选框，如果在窗体启动事件中编写语句 ”Checkl Enabled=False”，则运行后复选框的状态为 ( )。 （ A）选中状态

10、（ B）未选中状态 （ C） 0 （ D）灰色 25 在窗体上有一个名称为 Listl的列 表框和一个名称为 Commandl的命令按钮，并编写有如下事件过程： Private Sub Form_Load( ) List 1 AddItern”Item l”： List 1 Addltem”Item2”： Listl Addltem”Item3” End Sub Private Sub Command l_Click( ) List 1 List(List 1 ListCount=“New Item” End Sub 程序执行时，单击命令按钮，其结果为 ( )。 （ A）把字符串 ”New I

11、tem”添加到列表框中，但位置不能确定 （ B）把列表框中原有的最后一项改为 ”New Item” （ C）把字符串 ”New Item”添加到列表框的最后 (即 “Item3”的后面 ) （ D）把字符串 ”New Item”插入到列表框的最前面 (即 “Iteml”的前面 ) 26 设窗体上有 1个垂直滚动条，已经通过属性窗口把它的 Max属性设置为 1，Min属性设置为 100。下面叙述中正确的是 ( )。 （ A）程序运行时，若使滚动块向左移动，滚动条的 Value属性值就减少 （ B）由于滚动条的 Max值小于 Min值，程序运行时滚动条的长度会缩为一点，滚动块无法移动 （ C）程序

12、运行时，若使滚动块向左移动，滚动条的 Value属性值就增加 （ D）由于滚动条的 Max属性值小于 Min属性值，程序会出错 27 当用 ( )方式打开文件时，如果对文件进行写操作，则写入的数据附加到原文件的后面。 （ A） Output （ B） Append （ C） Input （ D） Random 28 设有下列语句： x=5 Ifx 0 Theny=1 y=5 程序运行后，则下列叙述中正确的是 ( )。 （ A）变量 y的值是 1 （ B）变量 y的值是 5 （ C）变量 x的值是 5变量 y的值是 1 （ D）变量 y的值不能确定 29 下面的程序运行时，单击窗体后，窗体上显示

13、的结果是 ( )。 Private Sub Form_Click( ) Dim a(1 To 6)As Integer Dim min1， i， j， n， t， k a(1)=8： a(2)=6： a(3)=9： a(4)=3： a(5)=2： a(6)=7 n=6 For i=1 To n-1 min 1=i Forj=i+1 To n If a(j) a(min1)Then mini=j Next j t=a(i)： a(i)=a(min1)： a(min1)=t Next i For i=1 To n Print a(i) Next i End Sub （ A） 9 8 7 6 3 2

14、 （ B） 2 3 6 7 8 9 （ C） 9 8 7 6 3 （ D） 2 3 6 7 8 30 下列程序运行后，单击窗体，在窗体上显示： 1， 1+2， 1+2+3， 1+2+3+4，1+2+3+4+5的和。在横线处应填写 ( )。 Private Sub Form_Click( ) Dim i As Integer,tt As Integer For i=1 To 5 tt=Sum(i)： Print”tt=“； tt， Nexti End Sub Private Function Sum(_) _ j=j+n Sum=j End Function （ A） n As Integer

15、j As Integer （ B） n As Integer Static j As Integer （ C） ByVal n As Integer j As Integer （ D） ByVal n As Integer Static j As Integer 31 有如下函数： Function fun(a As Integer， n As Integer)As Integer Dim m As Integer While a =n a=a-n： m=m+1 Wend fun=m EndFunction 该函数的返回值是 ( )。 （ A） a乘以 n的乘积 （ B） a加 n的和 （ C

16、） a减 n的差 （ D） a除以 n的商 (不含小数部分 ) 32 下面程序运行后，语句 ”Print i”执行的次数是 ( )。 Private Sub Form_Click( ) Dim i As Integer,j As Integer i=0 Do i=i+1 Forj=10 To 1 Step-3 i=i+j Print i Nextj Loop While i 50 End Sub （ A） 4 （ B） 8 （ C） 12 （ D） 16 33 标准模块中有如下程序代码： Public x As Integer， Y As Integer Sub TempSub( ) x=10

17、： y=20 End Sub 在窗体上有 1个命令按钮，并有如下事件过程： Private Sub Commandl_Click( ) Dim x As Integer Call TempSub x=x+100： y=y+100 Print x； y End Sub 运行程序后单击命令按钮，窗体上显示的是 ( ) （ A） 110 100 （ B） 100 100 （ C） 100 120 （ D） 110 120 34 在窗体上有一个名称为 Check1的复选框数组 (含 4 个复选框 )，还有一个名称为Textl的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的

18、文字罗列在文本框中 (如图 l所示 )。下面能实现此功能的事件过程是( )。 （ A） Pfivme Sub Checkl_Click(Index As Integer) Textl Text=“ Fork=0To 3 If Check l(k) Value=1 Then Textl Text=Textl Text& Checkl(k) Caption&”“双引号中是空格 End If Next k End Sub （ B） Private Sub Checkl_Click(Index As Integer) For k=0 To 3 If Check l(k) Value=1 Then Te

19、xtl Text=Textl Text& Checkl(k) Caption&”“双引号中是空格 End If Next k End Sub （ C） Private Sub Checkl_Click(Index As Integer) Textl Text=“ Fork=0To 3 If Checkl(Index) Value=1 Then Textl Text=Textl Text& Checkl(Index) Caption&”“双引号中是空格 EndIf Nextk End Sub （ D） Privme Sub Checkl_Click(index As Integer) Textl

20、 Text=“ For k=0 To 3 IfCheckl(k) Value=1 Then Textl Text=Textl Text& Checkl(k) Caption&”“双引号中是空格 ExitFor EndIf Nextk End Sub 35 在 E盘当前目录文件夹下建立一个名为 ”Student txt”的随机文件，要求用InputBox函数输入 5个学生的姓名 (SmName)、年级 (StuGrade)和年龄 (StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序 ( )。 Private Type student StuName As Strin

21、g*10 StuGrade As String*1 0 StuAge As Integer End Type Private SUb Form_Click( ) Dim S As student Open”cAstudent txt”For Random As #1 Len= Len(s) For i=1 To 5 s StuName=InputBox(“请输入姓名 ”) s StuGrade=InputBox(“请输入年级号 ”) s StuAge=Val(InputBox(“请输入年龄 ”) Nexti Close#1 End Sub （ A） Print#1， s （ B） Print#

22、1， i （ C） Put#1， s （ D） Put#1， i 36 单击命令按钮执行以下程序，则输出结果为 ( )。 Private Sub Commandl_Click( ) Dim x As Integer,y As Integer x=14： y=48 Call Proc(x， y) Print x； y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10： m=m Mod 10 End Sub （ A） 4 8 （ B） 14 8 （ C） 14 48 （ D） 4 48 37 VB中有 3个键盘事

23、件： KeyPress、 KeyDown、 KeyUp，若光标在 Textl文本框中，则每输入一个字母 ( )。 （ A）只触发 KeyUp事件 （ B）这 3个事件都会触发 （ C）只触发 KeyDown、 KeyPress事件 （ D）不触发其中任何一个事件 38 关于菜单设计，下列叙述中错误的是 ( )。 （ A）弹出式菜单也在菜单编辑器中定义 （ B）在菜单的标题栏中， “&”所引导的字母指明了访问该菜单项的访问键 （ C）程序运行过程中，可以重新设置菜单的 Visible属性 （ D）在同一窗体的菜单项中，不允许出现标题相同的菜单项 39 设工程中有 2个窗体： Forml、 For

24、m2， Forml为启动窗体。 Form2中有菜单，其结构如表。要求在程序运行时，在 Forml的文本框 Textl中输入口令并按回车键 (回车键的 ASC 码为 13)后，隐藏 Forml，显示 Form2。若口令为 ”XSLNCER”，所有菜单项都可见：否则看不到 ”成绩录入 ”菜单项。为此，某人在 Forml窗体文件中 编写如下程序： Private Sub Textl_KeyPress(KeyAscii As Integer)If KeyAscii=1 3 ThenIf Texl Text=“XSLNCER”ThenForm2 input Visible=TrueElseForm2 i

25、nput Visible=FalseEnd If End IfForml HideForm2 ShowEnd Sub程序运行时发现刚输入口令时就隐藏了 Forml，显示了 Form2，程序需要修改。下面修改方案中正确的是 ( )。 （ A）把 2个 Form2 input Visible中的 ”Form2”删去 （ B）把 Forml中 Textl文本框及相关程序放到 Form2窗体中 （ C）把 IfKeyAsii=13 Then改为 IfKeyAscii=“XSLNCER”Then （ D）把 Forml Hide、 Form2 Show两行移动到 2个 EndIf之问 40 在窗体上有一

26、个名称为 Drivel的驱动器列表框，一个名称为 Dirl的目录列表框，一个名称为 Filel的文件列表框，两个名称分别为 Labell、 Label2的标签 (标题分别为空白和 ”共有文件 ”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签 Labell中显示当前文件夹中文件的数量。下列能够正确实现上述功能的程序是 ( )。 （ A） Private Sub Dirl_change( ) Filel Path=Dirl Path End Sub Private Sub Drivel_Change( ) Dirl Path=Drive 1 Drive Label

27、1 Caption=File 1 ListCount End Sub （ B） Private Sub Dirl_Change( ) File 1 Path=Dirl Path End Sub Private Sub DriveI_Change( ) Dirl Path=Drivel Drive Label 1 Caption=File 1 List End Sub （ C） Private Sub Dirl change( ) Filel Path=Dirl Path Label 1 Caption=File 1 ListCount End Sub Private Sub Drivel_ch

28、ange( ) Dirl Path=Drive 1 Drive Labell Caption=Filel ListCount End Sub （ D） Private Sub Dirl_Change( ) Fiiel Path=Dirl Path Labell Caption=Filel List End Sub Private SUb Drivel_Change( ) Dirl Path=Drive 1 Drive Label 1 Caption=File 1 List End Sub 二、基本操作题 41 (1)请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码

29、 )。在名称为 Forml的窗体上画一个名称为 Picturel的图片框 (PictureBox)，高、宽均为1000。在图片框内再画一个有边框的名称为 Imagel的图像框 (Image)。并通过属性窗口把考生目录下的图标文件 POINTll(香蕉图标 )装入图像框 Imagel中，如图2 26所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtl vbp，窗体文件名为 sjtl frm。 (2)在名称为 Forml的窗体上画一个名称为Commandl、标题为 ”保存文件 ”的命令按钮，再画一个名称为 CommonDialogl的通用对话框。要求： 通过属性窗口设置适当的属性，使得

30、运行时对话框的标题为 ”保存文件 ”，且默认文件名为 out2； 运行时单击 ”保存文件 ”按钮，则以 ”保存对话框 ”方式打开该通用对话框。如图 2 27所示。注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为sjt2 vbp，窗体文件名为 sjt2 frm。 三、简单应用题 42 (1)在考生文件夹下有一个工程文件 sjt3 vbp，请在名称为 Forml的窗体上画一个名称为 Textl的文本框和一个名称为 Cl、标题为 ”转换 ”的命令按钮，如图 2-8所示。在程序运行时，单击 ”转换 ”按钮，可以把。 Textl中的大写字母转换为小写

31、，把小写字母转换为大写。窗体文件中已经给出了 ”转换 ”按钮的 Click事件过程，但不完整，请去掉程序中的注释符，把程序中的 ?改为正确的内容。注意：不能修改程序中的其他部分，最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件sjt4 vbp，其功能是 ： 单击 ”读数据 ”命令按钮，把考生文件夹下 in4 dat文件中已按升序方式排列的 60个数读入数组 A，并显示在 Textl中： 单击 ”输入 ”按钮，弹出一个输入对话框，接收用户输入的任意一个整数；单击 ”插入 ”按钮，将输入的数插入 A数组中合适的位置，使其仍保持 A数组的升序排列，最后将 A数组的内容重新显示在

32、 Textl中。在窗体文件中已经给出了全部控件 (如图 2-9所示 )和程序，但程序不完整，要求去掉程序中的注释符，把程序中的 ?改为正确的内容。本程序只考虑插入一个整数的情况。注意：不得修改已经存在的内容和控件属性，最后将 修改后的文件按原文件名存盘。 四、综合应用题 43 在考生文件夹下有一个工程文件 sjt5 vbp。其窗体中有一个名称为 Textl的文本框数组，下标从 0开始。程序运行时，单击 ”产生随机数 ”按钮，就会产生 10个3位数的随机数，并放入 Textl数组中，如图 2-25(a)所示；单击 ”重排数据 ”按钮，将把 Textl中的奇数移到前面，偶数移到后面，如图 2-25

33、(b)所示。文件中已经给出了所有控件和部分程序。要求：请去掉程序中的注释符，把程序中的 ?改为正确的内容，使其能正确运行，不能修改程序的其他部分和控件属性。最 后把修改后的文件按原文件名存盘。提示：在 ”重排数据 ”按钮的事件过程中有对其算法的文字描述，请仔细阅读。 国家二级（ VB）机试模拟试卷 1答案与解析 一、选择题 1 【正确答案】 B 【试题解析】 软件开发阶段包括需求分析、总体设计、详细设计、编码和测试五个阶段。其中需求分析阶段常用的工具是数据流图和数据字典。 2 【正确答案】 C 【试题解析】 根据二分法查找法需要两次： 首先将 60与表中间的元素 55进行比较，由于 60大于

34、55，所以在线性表的后半部分查找。 第二次比较的元素是后半部分的中间元素，将 60与表中间的元素 70进行比较，由于 60小于 70，所以在线性表的前半部分查找。 第三次比较的元素是前半部分的中间元素，即 60，这时两者相等，即查找成功。 3 【正确答案】 A 【试题解析】 根据数据结构中各数据元素之间前后关系的复杂程度，一般将数据结构分为两大类型：线性结构与非线性结构。如果一个非空的数据结构满足下列两个条件： 有且只有一个根结点； 每个结点最多有一个前件，也最多有一个后件。则称该数据结构为线性结构，又称线性表。所以线性表、栈与队列、线性链表都是线性结构， 而二叉树是非线性结构。 4 【正确答

35、案】 A 【试题解析】 随着计算机软件规模的扩大，软件本身的复杂性不断增加，研制周期显著变长，正确性难以保证，软件开发费用上涨，生产效率急剧下降，从而出现了人们难以控制软件发展的局面，即所谓的 ”软件危机 ”。 5 【正确答案】 A 【试题解析】 耦合度是模块间互相连接的紧密程度的度量；内聚度是一个模块内部各个元素间彼此结合的紧密程度的度量。 6 【正确答案】 C 【试题解析】 线性表是一种线性结构，由 n(n0)个元素组成，所以线性 表可以是空表。但是在线性表中，第一个结点没有前件，最后一个结点没有后件，其他结点有且只有一个前件和后件，所以选项 C是错误的。 7 【正确答案】 C 【试题解析

36、】 T就是关系 R中有的，同时 S中也有的有序组 (4、 5、 6)，即交运算 ()。 8 【正确答案】 D 【试题解析】 线性表的顺序存储是用一片连续的空间来存放数据元素，其特点是逻辑上相邻的元素在物理位置上也相邻。数据元素之间逻辑上的先后关系自动隐含在物理位置的相邻元素之中，因此不需要另外开辟空间来保存元素之间的关系。 9 【正确 答案】 A 【试题解析】 数据库管理系统在数据库的三级模式之间提供了两层映像，保证了数据库中数据的较高的逻辑独立性和物理独立性。 10 【正确答案】 C 【试题解析】 白盒测试方法也称为结构测试或逻辑测试，主要方法有逻辑覆盖测试、基本路径测试等。 11 【正确答

37、案】 C 【试题解析】 Print方法可以在窗体上显示文本字符串和表达式值，并可在其他图形对象或打印机上输出信息。也可以在立即窗口输出信息。但不能在文本框控件上输出信息，因此选项 C不正确。 12 【正确答案】 A 【试题解析】 考查窗体的常见属性。窗体中 ControlBox属性用来控制是否显示控制菜单，属性值为 False时不显示控制菜单。属性 MinButton和 MaxButton控制是否显示最大化和最小化按钮，属性 BorderStyle则是设置窗体的边界样式。 13 【正确答案】 A 【试题解析】 在过程定义时如果将其形参定义为数组，则在调用该过程时所赋予的对应实参必须为数组名，而

38、不能是普通变量、数组元素等。 Sub子过程可以使用 Call关键字来调用，但是 Function函数过程不可以使用 Call关键字调用， 同时函数过程有一个返回值，可以将其赋值给其他变量或者数组元素。 14 【正确答案】 B 【试题解析】 题目中是 3个 For语句嵌套循环，在第二个循环中每次都给 X赋值为 3，因此前面两个外循环可以忽略不及，只考虑最里层的循环即可，一次循环后的结果就是最后答案。即运行两次循环，当 k=1时， X=X+6=3+6=9；当 K=2时， X=X+6=9+6=15。 15 【正确答案】 C 【试题解析】 考查变量命名。变量命名规则为以字母开头，后面可跟汉字、字母、数

39、字或下划线，长度小于等于 255个字符，不能使用 VB中的关键字。 16 【正确答案】 C 【试题解析】 Open语句打开文件时的格式为： Open文件说明 For方式 Access存取类型 锁定 As#文件号 Len=记录长度 其中， ”方式 ”可以是： Output指定顺序输出方式、 Input指定顺序输入方式、Append指定顺序输出方式，它与 Output不同的是，当用 Append方式打开文件时，文件指针被定位在文件末尾，如果文件执行写操作，则写入的数据附加在原来文件的后面。 Random指定随机存取方式，也是默认方式。 17 【正确答案 】 C 【试题解析】 考查 VB中的数据表示

40、。 VB中的实数可以分为单精度和双精度，单精度指数形式为 n； nEm，表示数据的最大值为 3 402823E38；实际在使用的时候， ”不能同时出现。 18 【正确答案】 C 【试题解析】 考查绘图方法。 Circle可以用来绘制圆、椭圆以及圆弧。具体的使用格式为： ”对象 Circle(x， y)，半径，颜色，起始角，终止角，长短轴比例 ”；圆弧和扇形通过起始角和终止角来控制；椭圆通过长短轴比例来设置，比例为 1或默认为圆。 19 【正确答案】 C 【试题解析】 考查表达式的优先级。题目中表达式的优先级最高的是函数调用，先进行函数运算，接下来由高到低依次为算术运算符、字符运算符、关系运算符

41、、逻辑运算符。算术运算符的优先级从高创低为： ( )-， *， +-，因此首先进行的运算是 (x+1)。 20 【正确答案】 C 【试题解析】 考查 MsgBox过程的。 MsgBox为提示框，在 MsgBox过程中，第1个参数是提示信息，第 2个参数是按钮和图表的类型，若省略的话要有逗号占位，第 3个参数是对话框的标题。因此标题为变量 b中的内容。 21 【正确答案 】 A 【试题解析】 考查文本框常见属性。文本框的 Passwordchar属性设置显示文本为实际内容还是规定的字符显示；文本框控件不存在 Password属性。 22 【正确答案】 A 【试题解析】 考查控件的焦点。设置控件的

42、 Tablndex属性可以改变控件的焦点的移动顺序，在窗体上绘制控件的时候， VB默认分配给控件的 Tablndex属性，第一个默认为 0，以下类推，可以在代码中更改。当控件的 Visible和 Enabled属性为真时，控件可以接受焦点，某些控件没有焦点，如标签、框架、计时器等。TabStop属性决定是否可以使用 Tab来选定对象。 23 【正确答案】 C 【试题解析】 考查控件的移动。窗体上的控件可以利用 Move方法或者 LeR属性来发生移动。 LeR属性表示控件的左边缘距容器左边缘的距离。因此命令按钮右移时 Left属性值增加。 Move方法为移动到的位置，其格式为： 对象 Move左

43、边距离 ，上边距离 ，宽度 ，高度 。 24 【正确答案】 D 【试题解析】 考查复选框的常见属性。复选框的 Enabled属性表示复选框是否可用，为 True时复选框可用：为 False时复选框为灰色的，不可以使用。 25 【正确答案】 C 【试题解析】 考查列表框的常见属性。列表框中 ListCount表示现在列表框中存在的总的项目数，列表框的所有项都存放在 List数组中，数组的下标从 0开始。题目中程序开始运行时， ListCount的值为 3，因此单击命令按钮时，执行的语句为： Listl List(3)=“New Item”，加入到所有项的后面。 26 【正确答案】 C 【试题解析

44、】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其 Max属性用于设置或 返回滚动条所能表示的最大值， Min属性用于设置或返回滚动条所能表示的最小值。默认情况下， Max的值大于 Min的值，即当滚动块向右移动时，其 Value属性值增加。如果希望滚动条显示的信息从较大数值向较小数值变化，可将 Min设置成大于 Max的值，此时当滚动块向左移动时，其 Value属性值增加。 27 【正确答案】 B 【试题解析】 考查文件的打开方式。以追加的方式打开文件时，每次写入的记录存放在文件的末尾。 28 【正确答案】 B 【试题解析】 考查选择语句。选择语句形式一般分为两种，如果

45、分 支语句 If和Then在同一行，不需要写上 EndIf语句，否则必须加上 End If语句。题目中 x的初值为 5，大于 0，因此执行 if语句， y值为 1；接下来执行赋值语句 y=5，因此 y值变为 5。 29 【正确答案】 B 【试题解析】 考查循环程序的分析。程序主要包括两条循环语句，一条为两层循环的嵌套语句，内层循环找到当前 i到 n之间的最小元素的下标，退出内循环则把最小元素放到 a(i)的位置， i从 l变化到 n-1；另外一条循环语句为输出数组中的所有元素，即把排序以后的结果输出。 30 【正确答案】 D 【试题解析】 考查参数的传递和静态局部变量。 Sum函数在窗体单击事

46、件中调用 5次并用来求和，因此每一次求和结果应当保留，所以借助静态变量实现。同时要求传递的形参变化不应影响到实参，因此采用传值调用。 31 【正确答案】 D 【试题解析】 考查函数过程的程序分析。函数体中包含了一条循环语句，循环变量 a，步长为 n， m则记录了在 a中共有多少个 n，也就是返回了 a n的商。 32 【正确答案】 C 【试题解析】 考查双重循环的分析。程序段中的循环结构为外循环 DoLoop While，内部又包括了 For循环，内循环的执行次数固定，每执行一次外循环，执行 4次内循环，每次执行完内循环后，外循环变量 i的值增加 23，因此外循环共执行了 3次。可推出内循环中

47、的语句 Print i共执行了 12次。 33 【正确答案】 C 【试题解析】 在标准模块用 Public关键字声明的全局变量，其作用域最大，可以在工程的每个模块、每个过程中使用。但当不同作用范围的变量重名时，有效范围小的变量会屏蔽有效范围大的变量。当一个全局变量与一个过程级变量重名时，当在本过程中直接使用这个变量名时，被认为是指局部变量。如果要在这个过程 中使用同名的全局变量，要使用模块名来修饰变量名。 在的事件过程中，由于变量 x被声明为过程级变量，其初始值为 0，调用过程TempSub不会改变其值，而变量 y为标准模块中声明的全局变量，调用过程TempSub后其值为 20。故最后输出结果

48、为 100和 120。 34 【正确答案】 A 【试题解析】 考查复选框控件数组。复选框的 Value属性，决定了当前复选框的状态，当 Value为 1时表示选中复选框。按照题目中的要求，首先清空文本框，接下来对复选框控件数组中的所有元素的 Value属性 筛查，判断是否选中，把 选中的复选框控件的 Caption属性值连接到文本框的字符串中。 35 【正确答案】 C 【试题解析】 考查文件操作。题目中要求以随机的方式 (Random)打开一个文件，打开文件的格式为： Open FileName For Random As#文件号 Len=记录长度 ，然后以 Put命令写入一条记录，格式为： Put#文件号， 记录号 ，变量名。若省略记录号，表示在当前记录号下写入记录型变量， ”， ”不可以省略。 36 【正确答案】 D 【试题解析】 考查参数传递。在 VB的过程调用时，参数 有两种传递方式：传址传递和传值传递。如果在过程声明时形参用 ByVal声明，说明此参数为传值调用；若用 ByRef声明，说明此参数为传址调用：如果没有说明传递类型，则默认为传址传递。由此可知题目中的实参 x为传址调用， y为传值调用，因此 n的变化影响 x，而 m变化不会影响 y。 37 【正确答案】 B