1、国家二级（ VB）机试模拟试卷 177及答案与解析 一、选择题 1 下列叙述中正确的是 ( )。 （ A）算法就是程序 （ B）设计算法时只需要考虑数据结构的设计 （ C）设计算法时只需要考虑结果的可靠性 （ D）以上三种说法都不对 2 下列叙述中正确的是 ( )。 （ A）有一个以上根结点的数据结构不一定是非线性结构 （ B）只有一个根结点的数据结构不一定是线性结构 （ C）循环链表是非线性结构 （ D）双向链表是非线性结构 3 下列关于二叉树的叙述中，正确的是 ( )。 （ A）叶 子结点总是比度为 2的结点少一个 （ B）叶子结点总是比度为 2的结点多一个 （ C）叶子结点数是度为 2的
2、结点数的两倍 （ D）度为 2的结点数是度为 1的结点数的两倍 4 软件生命周期中的活动不包括 ( )。 （ A）市场调研 （ B）需求分析 （ C）软件测试 （ D）软件维护 5 某系统总体结构图如下图所示： 该系统总体结构图的深度是 ( )。 （ A） 7 （ B） 6 （ C） 3 （ D） 2 6 程序调试的任务是 ( )。 （ A）设计测试用例 （ B）验证程序的正确性 （ C）发现程序中的 错误 （ D）诊断和改正程序中的错误 7 下列关于数据库设计的叙述中，正确的是 ( )。 （ A）在需求分析阶段建立数据字典 （ B）在概念设计阶段建立数据字典 （ C）在逻辑设计阶段建立数据字
3、典 （ D）在物理设计阶段建立数据字典 8 数据库系统的三级模式不包括 ( )。 （ A）概念模式 （ B）内模式 （ C）外模式 （ D）数据模式 9 有三个关系 R、 S和 T如下： 则由关系 R和 S得到关系 T的操作是 ( )。 （ A）自然连接 （ B）交 （ C）投影 （ D）并 10 下列选项 中属于面向对象设计方法主要特征的是 ( )。 （ A）继承 （ B）自顶向下 （ C）模块化 （ D）逐步求精 11 以下合法的 VB变量名是 ( )。 （ A） #_1 （ B） 123_a （ C） string （ D） x_123 12 以下关于 VB的叙述中，错误的是 ( )。
4、（ A） VB采用事件驱动方式运行 （ B） VB既能以解释方式运行，也能以编译方式运行 （ C） VB程序代码中，过程的书写顺序与执行顺序无关 （ D） VB中一个对象对应一个事件 13 有如下数据定义语句： Dim X， Y As Integer 以上语句表明 ( )。 （ A） X、 Y均是整型变量 （ B） X是整型变量， Y是变体类型变量 （ C） X是变体类型变量， Y是整型变量 （ D） X是整型变量， Y是字符型变量 14 以下关于控件数组的叙述中，正确的是 ( )。 （ A）数组中各个控件具有相同的名称 （ B）数组中可包含不同类型的控件 （ C）数组中各个控件具有相同的 I
5、ndex属性值 （ D）数组元素不同，可以响应的事件也不同 15 以下关于 VB文件的叙述中，错误的是 ( )。 （ A）标准模块文件不属于任何一个窗体 （ B）工程文件的扩展名为 frm （ C）一个工程只有一个工程文件 （ D）一个工程可以有多个窗体文件 16 设 x为一整型变量，且情况语句的开始为： Select Case x，则不符合语法规则的Case子句是 ( )。 （ A） Case Is20 （ B） Case 1 To 10 （ C） Case 050， Int(a 3)， a Mod 2) 当 a=52时， x的值是 ( )。 （ A） 0 （ B） 1 （ C） 17 （
6、D） 18 18 设有如下数组定义语句： Dim a(一 1 To 4， 3)As Integer 以下叙述中正确的是 ( )。 （ A） a数组有 18个数组元素 （ B） a数组有 20个数组元素 （ C） a数组有 24个数组元素 （ D）语法有错 19 以下叙述中错误的是 ( )。 （ A） Sub Main是定义在标准模块中的特定过程 （ B）一个工程中只能有一个 Sub Main过程 （ C） Sub Main过程不能有返回值 （ D）当工程中含有 Sub Main过程时，工程执行时一定最先执行该过程 20 关于随机文件，以下叙述中错误的是 ( )。 （ A）使用随机文件能节约空间
7、 （ B）随机文件记录中，每个字段的长度是固定的 （ C）随机文件中，每个记录的长度相等 （ D）随机文件的每个记录都有一个记录号 21 在名称为 Framel的框架中，有两个名称分别为 0p1、 op2的单选按钮，标题分别为 “单程 ”、 “往返 ”，如图所示。 以下叙述中，正确的是 ( )。 （ A）若仅把 Framel的 Enabled属 性设为 False，则 op1、 op2仍可用 （ B）对于上图， op1 Value的值为 True （ C）对于上图，执行 Op1 Value=False命令，则 “往返 ”单选按钮被选中 （ D）对于上图，执行 Op1 Value=0命令，程序出
8、错 22 以下能够设置控件焦点的方法是 ( )。 （ A） SetFocus （ B） GotFocus （ C） LostFocus （ D） TabStop 23 使用 Line控件在窗体上画一条从 (0， 0)到 (600， 700)的直线，则其相应属性的值应是 ( )。 （ A） X1=0， X2=600， Y1=0， Y2=700 （ B） Y1=0， Y2=600， Xl=0， X2=700 （ C） X1=0， X2=0， Y1=600， Y2=700 （ D） Y1=0， Y2=0， X1=600， X2=700 24 设有窗体的 Form_MouselVlove事件过程如下：
9、 Private Sub Form_MouseMove(Button As Integer， Shift As Integer， X As Single，Y A8 Single) If(Button And 3)=3 Then Print“检查按键 “ End If End Sub 关于上述过程，以下叙述中正确的是 ( )。 （ A）按下鼠标左键时，在窗体上显示 “检查按键 ” （ B）按下鼠标右键时，在窗体上显示 “检查按键 ” （ C）同时按下鼠标左、右键时，在窗体上显示 “检查按键 ” （ D）不论做何种操作，窗体上都不会显示 25 窗体上有一个名称为 CD1的通用对话框，一个名称为 C
10、ommand1的命令按钮，相应的事件过程如下： Private Sub Command1_Click() CD1 Filter=“All File |* *|Text File|* txt|PPT|* ppt“ CD1 FilterIndex=2 CD1 InitDir=“C： “ CD1 FileNarne=“default“ CD1 ShowSave End Sub 关于上述过程，以下叙述中正确的是 ( )。 （ A）默认过滤器为 “* ppt” （ B）指定的初始目录为 “C： ” （ C）打开的文件对话框的标题为 “default” （ D）上面事件过程实现保存文件的操作 26 以下关
11、于窗体的叙述中，错误的是 ( )。 （ A） Hide方法能隐藏窗体，但窗体仍在内存中 （ B）使用 Show方法显示窗体时，一定触发 Load事件 （ C）移动或放大窗体时，会触发 Paint事件 （ D）双击窗体时，会触发 DblClick事件 27 下列控件中，没有 Caption属性的是 ( )。 （ A）单选按钮 （ B）复选框 （ C）列表框 （ D）框架 28 将数据项 “Student”添加到名称为 List1的列表框中，并使其成为列表 框第一项的语句为 ( )。 （ A） List1 AddItem“Student“， 0 （ B） List1 AddItem“Student
12、“ 1 （ C） List1 AddItem 0， “Student“ （ D） List1 AddItem 1， “Student“ 29 下列针对框架控件的叙述中，错误的是 ( )。 （ A）框架是一个容器控件 （ B）框架也有 Click和 DblClick事件 （ C）框架也可以接受用户的输入 （ D）使用框架的主要目的是为了对控件进行分组 30 窗体上有一个名 为 Command1的命令按钮，并有下面的程序： Private Sub Command1_Click() Dim arr(5)As Integer For k=1 To 5 arr(k)=k Next k prog arr(
13、) For k=1 To 5 Print arr(k)； Next k End Sub Sub prog(a()As Integer) n=UBound(a) For i=n To 2 step1 For j=1 To n1 if a(j)=0 Then count(n)=count(n)+1 End If Next k m=eount(0) For k=1 To 25 If m10 Then Exit For Next Text1 Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 ( )。 （ A） 2 （ B） 3 （ C） 4 （ D） 5 34 设
14、有如下的程序段： n=0 For i=1 Tb 3 For j=1 To i For k=j To 3 n=n+1 Next k Next i Next i 执行上面的程序段后， n的值为 ( )。 （ A） 3 （ B） 21 （ C） 9 （ D） 14 35 在窗体上画一个名称为 Command1的命令按钮，一个名称为 Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() s=0 For i=1 To 15 x=2 * i一 1 If X Mod 3=0 Then s=s+1 Next i Label1 Caption=s End Sub
15、程序运行后，单击命令按钮，则标签中显示的内容是 ( )。 （ A） 1 （ B） 5 （ C） 27 （ D） 45 36 阅读程序： 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 a End Sub 程序运行后，单击窗体，在输入对话框中依次输入 15、 24、 35、 46，输出结果为 ( )。 （ A） 100 （ B） 50 （ C） 120 （ D） 70 37 在窗
16、体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim array1(10， 10)As Integer Dim i As Integer， j As Integer For i=1 To 3 For i=2 To 4 array1(i， j)=i+j Next j Next i Text1 Text=array1(2， 3)+array1(3， 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 ( )。 （ A） 15 （ B） 14 （ C） 13 （ D）
17、12 38 在窗体上画一个名称为 Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() d： 0 c=10 X=Array(10， 12， 21， 32， 24) For i=1 To 5 If x(i)c Then d=d+x(i) c=x(i) Else d=dc End If Next i Print d End Sub 程序运行后，如果单击命令按 钮，则在窗体上输出的内容为 ( )。 （ A） 89 （ B） 99 （ C） 23 （ D） 77 39 假定有以下通用过程： Function Fun(n A
18、s Integer)As Integer X=n * n Fun=x一 11 End Function 在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer For i=1 To 2 y=Fun(i) Print y； Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是 ( )。 （ A） 1 3 （ B） 10 8 （ C）一 10 7 （ D） 0 5 40 设有如下通用过程： Public Function f(x As Integer) Dim y
19、 As Integer x=20 y=2 f=x*y End Function 在窗体上画一个命 令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(X) Print x： y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ( )。 （ A） 10 5 （ B） 20 40 （ C） 20 5 （ D） 10 40 二、基本操作题 41 (1)在名称为 Form1、标题为 “输入 ”、最大 化按钮失效的窗体上画一个名称为Label1的标签控
20、件，其标题为 “输入密码 ”；再向窗体内画一个名称为 Text1的文本框控件，并清空其中的文本。程序执行时，用户在文本框中最多可输入由 6个字符组成的密码，密码字符在文本框中显示为 “*”，其画面如图所示，请设置相应属性。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1 vbp，窗体文件名为 sjt1 frm。 (2)在名称为 Form1的窗体上，画一个名称为 Shape1的形状控件，将其形状设置为圆、背景样式设置为不透明；再向窗体上画一个名称为 HScroll1的水平滚动条控件，并将滚动条所能表示的最小值设置为 0、所能表示的最大值设置为 255。 要求：编写适当的事件过程，使得
21、程序运行时，当单击水平滚动条： HScroll1两端的箭头时，能将 Shape1中的背景颜色设置为由红、绿、蓝三原色组合形成的一种颜色，其中，红色的分量值为滚动条中滚动框当前位置所表示的值，绿色、蓝色的分量值都为 0。程序运行示意图如图所示。 提示：系统库函数 RGB可将红、绿、蓝三原色组合，并返回组合后的颜色值。 注意：要求程序中不能使用变量，每个事件过程中只能写一条语句 (不得使用选择语句或循环语句 )。保存时必须存放在考生文件夹下，工程文件名为sjt2 vbp，窗体文件名为 Sjt2 frm。 三、简单应用题 42 (1)在考生文件夹中有一个工程文件 sjt3 vbp。程序的功能是输入用
22、户名和密码。程序运行时，当输入密码到文本框 Text7中时，如果 “显示密码 ”复选框没有被选中，则在文本框 Text3中同时显示 “#”(如图所示 )；如果 “显示密码 ”复选框被选中，再重新输入密码时，则在 Text3中同时显示的是密码字符本身。 在给出的窗体文件中已经添加了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序 中的 ?改为正确的内容。 注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按原文件名进行存盘。 (2)考生文件夹中有一个工程文件 sjt4 vbpc该程序的功能是：程序运行时，向文本框控件数组 Text1(有 5个文本框 )中任意输入 5个数，单击名称
23、为 Command1的命令按钮，则找出其中最小数并在标签 lblResult中显示。给出的窗体文件中已经有了全部控件，但程序不完整，其中函数 FindMin的作用是返回两个数中的较小数。要求：去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：不能修改程序的其 他部分和控件属性，最后将修改后的文件按原文件名进行存盘。 四、综合应用题 43 在窗体上画 1个文本框，名称为 Text1(multiline属性为 True)，然后再添加三个命令按钮，名称分别为 Command1、 Command2和 Command3，标题分别为 “读数 ”、 “统计 ”和 “存盘 ”，如图所示。程序的功能是：
24、单击 “读数 ”按钮，则把考生文件夹下的 in5 txt文件中的所有英文字符放入 Text1(MutiLine属性为 True)中；单击 “统计 ”按钮，找出并统计英文字母 i， j， k， 1， m， n(不区分大小写 )各自出现的次数；单击 “存盘 ”按钮，将字母 i到 n出现次数的统计结果依次存到考生目录下 的顺序文件 out5 txt中。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt5 vbp，窗体文件名保存为 sit5 frm。国家二级（ VB）机试模拟试卷 177答案与解析 一、选择题 1 【正确答案】 D 【试题解析】 算法是指解题方案的准确而完整的描述，算法不等
25、于程序，也不等于计算方法，所以 A错误。设计算法时不仅要考虑对数据对象的运算和操作，还要考虑算法的控制结构。 2 【正确答案】 B 【试题解析】 线性结构应满足：有且只有一个根结点与每个结点最多有一个前件，也最多 有一个后件，所以 B正确。所以有一个以上根结点的数据结构一定是非线性结构，所以 A错误。循环链表和双向链表都是线性结构的数据结构。 3 【正确答案】 B 【试题解析】 根据二叉树的基本性质 3：在任意一棵二义树中，度为 0的叶子结点总是比度为 2的结点多一个。所以选择 B。 4 【正确答案】 A 【试题解析】 软件生命周期可以分为软件定义、软件开发与软件运行维护三个阶段。主要活动阶段
26、是：可行性研究与计划阶段，需求分析，软件设计，软件实现，软件测试，运行和维护，所以选择 A。 5 【正确答案】 C 【试题解析】 根据总体结构图可以看出该树的深度为 3，比如： XY系统 功能 2功能 2 1，就是最深的度数的一个表现。 6 【正确答案】 D 【试题解析】 程序调试的任务是诊断和改正程序中的错误。 7 【正确答案】 A 【试题解析】 数据字典是在需求分析阶段建立，在数据库设计过程中不断修改、充实和完善的。 8 【正确答案】 D 【试题解析】 数据库系统的三级模式是概念模式、外模式和内模式，所以选择D。 9 【正确答案】 A 【试题解析】 自然连接是一种特殊的等值 连接，它要求两
27、个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，所以根据 T中元组可以判断 R和 S做的是自然连接操作。 10 【正确答案】 A 【试题解析】 面向对象基本方法的基本概念有对象、类和实例、消息、继承与多态性，所以选择 A。 11 【正确答案】 D 【试题解析】 VB中变量的命名规则为： 必须以字母或汉字开头 由字母、汉字、数字或下划线组成 不能使用 VB已经占用的关键字。 #_1中 #是类型符号，变量名中不能用 VB保留符号。故不合法。 123_a以数字开头不合法。 string是VB的关键字，也不合法。故 D选项正确。 12 【正确答案】 D 【试题解析】 VB中一
28、个对象可以对应一个或多个事件，事件可由用户或系统触发，触发后执行相应的事件过程。不过，不一定一个对象的昕有事件过程都执行，响应哪个事件过程就执行哪个。故 D选项错误。 13 【正确答案】 C 【试题解析】 用 Dim可同时定义多个变量，但变量要分别声明其数据类型，如果不声明数据类型，默认是 Variant变体型变量。 本题中，变量 X定义时没声明数据类型，所以为 Variant型变量，变量 Y是整型变量。故 C选项正确。 14 【正确答案】 A 【试题解析】 控件数组中各控件具有相同的名称，而且类型是相同的，但 Index属性值不同。数组中各控件响应的事件是相同，用 Index属性值来区分每个
29、控件。故 A选项正确， B、 C、 D选项错误。 15 【正确答案】 B 【试题解析】 T程文件的扩展名为 vbp，故 B选项错误。 16 【正确答案】 C 【试题解析】 selectCase语句中表达式的形式可以是：常量或变量；若干符合条件的值用 “， ”隔开；表达式 1 to表达式 2； Is关系表 达式。 本题中选项 A、 B和 D都符合语法规则。 选项 C中 Is关系表达式语法错误，它可以是 Is0或 Is50， 17， 0)， 5250结果为 True，所以 IIF函数返回 17，则 x值为 17，故选 C。 18 【正确答案】 C 【试题解析】 本题定义了一个二 维数组，第一维的下
30、标一 1 to 4，即为一 1， 0，1， 2， 3， 4(共 6行 )，第二维下标 3，即 0to 3(0， 1， 2， 3共 4列 )， 6*4=24二维数组有 24个数组元素。故选 C。 19 【正确答案】 D 【试题解析】 VB工程的启动对象有： Sub Main过程 (在标准模块中定义 )、窗体(在多个窗体可选一个窗体启动 )，我们可以通过在 “工程属性 ”对话框中设置启动对象来实现，设置哪个就用哪个启动。所以当工程中含有 Sub Main过程时，工程执行不一定最先执行该过程，也可以通过窗体启动。故选项 D错误。 20 【正确答案】 A 【试题解析】 随机文件中的每一行是一条记录，每
31、条记录的长度是固定的、相等的，并且都有一个记录号。 Open语句中的 Len用于指定记录长度，当指定长度小于记录实际长度时将产生错误；大于实际长度时，可以写入，但浪费空间，所以随机文件占据磁盘空间较大，故选项 A错误。 21 【正确答案】 B 【试题解析】 当 Framel的 Enabled属性设为 False后，框架 Framel变为不可用，它里面放的两个单选按钮也就变为不可用，故 A选项错误； 当 Op1 Value为 False时 ， “单程 ”和 “往返 ”单选按钮都处于未选中状态，故 C选项错误； Op1 Value的值为 0，即为 False，语句正确，没有程序错误，故 D选项说法
32、错误； 根据图可只， “单程 ”单选按钮处于选中状态， Op1 Value的值为 True，故 B选项正确。 22 【正确答案】 A 【试题解析】 G0tFoeus和 LostFocus是控件获得焦点和失去焦点时触发的两个事件； TabStop是控件的属性； SetFocus方法是控件设置、获得焦点的方法。故选 A。 23 【正确答案】 A 【试题解 析】 X1、 Y1、 X2、 Y2属性是直线的起点、终点坐标。故选 A。 24 【正确答案】 C 【试题解析】 MoseMove事件中的 Button表示鼠标所有按键的状态。用 0、 1、 2三个位表示左、右、中键，当按下某个键时。相应位是 1，
33、否则是 0。三位的二进制数也可转换为十进制数，作为 Button的值。如表：本题中当 Button值为 011或 111时， (Button And 3)=3，条件才成立，窗体上显示 “检查按键 ”。这说明只要同时按下鼠标的左右键时，在窗体上就显示 “检查按键 ”。故选 C。 25 【正确答 案】 B 【试题解析】 通用对话框的 FilterIndex属性为 1时表示默认过滤器为第 1个文件类型，为 2时表示为第 2个文件类型。 InitDir属性值指定通用对话框的初始目录。 FileName属性表示对话框中默认的文件名。 ShowSave方法表示打开另存为对话框，执行保存文件的操作。 26
34、【正确答案】 B 【试题解析】 窗体的 Load事件是把窗体装入工作区的事件，即装入内存，然后窗体才显示出来，使用 Hide方法可以使窗体隐藏，但窗体仍在内存中，使用Show方法能使窗体显示出来。当窗体被移动或 放大时，或者窗口移动时覆盖了一个窗体时，触发 Paint事件。双击窗体时会触发窗体的 DblCliek事件。 27 【正确答案】 C 【试题解析】 列表框控件没有 Caption属性。 28 【正确答案】 A 【试题解析】 List控件的 Addhem方法的语法是： Addhem(String， index)。其中 index是列表框中列表项的索引值，第一项的索引值为 0。 29 【正
35、确答案】 C 【试题解析】 框架是一个容器控件，用于将屏幕上的对象分组。框架常用的事件是 Click和 DblClick，它不接受用户输入，不能显示文本和图形，也不能与图形相连。 30 【正确答案】 B 【试题解析】 程序对数组元素赋初值为 1、 2、 3、 4、 5。 ubound函数返回数组可用的最大下标，过程 prog的功能是遍历数组对数组中的元素进行排序，由条件a(j) 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 【 试题解析】 (1)在 Text2 Change事件过程中，当向文本框 Text2中输入密码时，通过 Check1的 Value属性判断 “显示密码 ”复选框是否
36、被选中，如果没有被选中， Text3的 Password Char属性设置为 “#”，则在文本框 Text3中同时显示“#”；若 “显示密码 ”复选框被选中， Text3的 PasswordChar属性设置为 “，再重新输入密码时，则在 Text3中同时显示的是密码字符本身。 (2)默认情况下文本框里的内容 (包括数字 )都是当作字符串来处理的，如果要参与数据运算，则需先用 Val()函数将其转化为数字 (如 Val(Text1 Text)。根据题意，首先把第一个文本框的值赋给变量 x，通过循环语句和调用过程函数 FindMin，获得最小值，并显示在标签 lblResult中。函数 FindM
37、in用来返回两个数中的较小数。 四、综合应用题 43 【正确答案】 步骤 1：建立界面，并设置控件的属性。程序中用到的控件及属性见表 1和表 2。 步骤 2：分析并编写程序代码。程序提供代码 程序结束 参考答案 Option Explicit Private Sub Command1_Click() Dim a As String Dim S As Stfing Open App Path&”in5 txt”For Input As #1 Do While Not EOF(1) a=Input(1， #1) s=s&a Loop Close#1 Text1=s End Sub Private
38、Sub Command2_Click() Dim str As String Dim n1 As Integer Dim n2 As Integer Dim n3 As Integer Dim n4 As Integer Dim n5 As Integer Dim n6 As Integer Dim i As Integer For i=1 To Len(Text1) str=Mid(Text1， i， 1) Select Case str Case“i“ “I“ nl=n1+1 Case“j“， “J“ n2=n2+1 Case“k“ “K“ n3=n3+1 Case“1“ “L“ n4=n
39、4+1 Case“m“， “M“ n5=n5+1 Case“n“ “N“ n6=n6+1 End Select Next Text1=“字母 i或 I出现的次数为 “&Format(n1， “00“)&vbCrLf Text1=Text1&“字母 j或 J出现的次数为 “&Format(n2， “00“)&vbCrLf Text1=Text1&“字母 k或 K出现的次数为“&Format(n3， “00“)&vbCrLf Text1=Text1&“字母 l或 L出现的次数为“&Format(n4， “00“)&vbCrLf Text1=Text1&“字母 m或 M出现的次数为“&Format(n5， “00“)&vbCrLf Text1=Text1&“字母 n或 N出现的次数为“&Format(n6， “00“) End Sub Private Sub Command3_Cliek() Open“Out5 txt“ For Output As #1 Print #1 Text1 Texl Close 1 End Sub 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。
