1、VB 机试-试卷 80 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.请根据以下各小题的要求设计 VsualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上用名称为 Shapel 的形状控件画一个长、宽均为 1200 的正方形。请设置适当的属性满足以下要求：窗体的标题为“正方形”，窗体最小化按钮不可用：正方形的边框为虚线(线型不限)。运行后的窗体如图 1-7l 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sit1frm。（分数：2.0
2、0）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.(1)在名称为 Forml 的窗体中画一个名称为 Ll 的标签，其标题为“0”，BorderStyle 属性为 l；再添加一个名称为 Timerl 的计时器。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，每隔一秒钟标签中的数字加 l。如图 1-223 所示的是程序刚启动时的情况。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt3vbp，窗体文件名为 sjl3frm。(2)在考生文件夹下有一个工程文件 sjt4vbp，要求程序运行后，如果多次单击列表框中的项，则
3、可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项(如图 1-224 所示)。要求：修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改后的程序以原来的文件名存盘。 （分数：2.00）_三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_6.在考生目录下有一个工程文件 sjt5vbp。窗体中已经给出了所有控件。其功能是：单击“显示”命令按钮，则把考生目录下的 in5txt 文件中的所有字符放入 Textl(可多行显示)，如图 1-108 所示；如果
4、单击“统计”命令按钮，则统计文本框中字母 A、B、C、D 各自出现的次数，并依次放到窗体变量an、bn、cn、血之中(放在其他变量中将无成绩)；如果单击“保存”命令按钮，则把统计结果存入考生文件夹下的 out5txt 文件中。文件中已给出了“显示”和“保存”按钮的 Click 事件过程。请编写“统计”按钮 Click 事件过程。要求：统计每个字母出现的次数时，不区分大小写。注意：不能修改已经给出的程序部分；在结束程序运行之前，必须单击“保存”按钮，把结果存入 out3txt 文件，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2.00）_VB 机试-试卷 80 答案解析(总分：12.
5、00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_解析：2.请根据以下各小题的要求设计 VsualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上用名称为 Shapel 的形状控件画一个长、宽均为 1200 的正方形。请设置适当的属性满足以下要求：窗体的标题为“正方形”，窗体最小化按钮不可用：正方形的边框为虚线(线型不限)。运行后的窗体如图 1-7l 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sit1frm。（分数：2.00）_正确答案：(正确答案：第 1 小题
6、【操作步骤】 步骤 1新建一个“标准 EXE”工程，在窗体 Forml 中加入一个形状控件，其相关属性设置如表 2-36 所示。 步骤 2：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 l：新建一个“标准 EXE”工程，如表 2-37 在窗体中画出控件并设置其相关属性。 )解析：解析：第 1 小题 形状控件(Shape)提供了显示一些规则图形的简易方法。通过设置形状控件Shape 属性值，可显示 6 种图形：O 一矩形、l 一正方形、2 一椭圆、3 一圆、4 一圆角矩形、5 一圆角正方形。Width 属性用于设置形状的宽度，当形状为圆时即为圆的直径。窗体的标题由其 Cap
7、tion 属性设置，窗体的 MaxButton 属性、MinButton 属性决定其标题栏是否显示最大化、最小化按钮，True 表示显示，False 表示不显示。 本题只需按要求建立程序界面并设置窗体和形状控件相关属性即可。 第 2 小题 本题需在命令按钮的单击事件过程中，通过修改标签的 FontName 属性值达到修改文本的字体效果。二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_解析：4.(1)在名称为 Forml 的窗体中画一个名称为 Ll 的标签，其标题为“0”，BorderStyle 属性为 l；再添加一个名称为 Timerl 的计时器。请设置适当的
8、控件属性，并编写适当的事件过程，使得在运行时，每隔一秒钟标签中的数字加 l。如图 1-223 所示的是程序刚启动时的情况。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt3vbp，窗体文件名为 sjl3frm。(2)在考生文件夹下有一个工程文件 sjt4vbp，要求程序运行后，如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项(如图 1-224 所示)。要求：修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改后的程序
9、以原来的文件名存盘。 （分数：2.00）_正确答案：(正确答案：第 l 小题 【操作步骤】 步骤 l：新建一个“标准 EXE”工程，如表 2-13l 在窗体中画出控件并设置其相关属性。 )解析：解析：第 l 小题 可借助计时器来完成有规律性时间间隔执行的任务。本题计时器工作时，为使标签中的数每隔 1 秒加 1，需将计时器的 Interval 属性值设置为 1000 毫秒，在命令按钮的单击事件过程中通过语句 TimcrlEnabled=True 启动计时器，在计时器的 Timer 事件过程中通过语句 L1=Ll+1 实现加1。 第 2 小题 本题原程序设计思路：在“显示”按钮的单击事件过程中，使
10、用 For 循环语句逐一判断列表框中的各项是否被选中，If 语句的条件表达式为：L1Selected,(i)=True，用 Print 方法将选中的列表项显示在窗体上。为与列表框的项目索引号保持一致，循环变量的初始值应为 0，终值应为L1ListCount-1。为使列表框在运行时可以多选，应将其 MultiSelect 属性值设置为 1-simple。三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在考生目录下有一个工程文件 sjt5vbp。窗体中已经给出了所有控件。其功能是：单击“显示”命令按钮，则把考生目录下的 in5txt 文件中的所有字符放入
11、 Textl(可多行显示)，如图 1-108 所示；如果单击“统计”命令按钮，则统计文本框中字母 A、B、C、D 各自出现的次数，并依次放到窗体变量an、bn、cn、血之中(放在其他变量中将无成绩)；如果单击“保存”命令按钮，则把统计结果存入考生文件夹下的 out5txt 文件中。文件中已给出了“显示”和“保存”按钮的 Click 事件过程。请编写“统计”按钮 Click 事件过程。要求：统计每个字母出现的次数时，不区分大小写。注意：不能修改已经给出的程序部分；在结束程序运行之前，必须单击“保存”按钮，把结果存入 out3txt 文件，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2
12、.00）_正确答案：(正确答案： 【操作步骤】 步骤 1：打开考生文件中的本题工程文件 sjt5vbp，在代码编辑窗口的指定位置编写以下代码： 参考代码： n=Len(Textl) For k=l To n ch=Mid(Textl，k，1) If UCase(ch)=“A“Then an=an+1 End If If UCase(ch)=“B“Then bn=bn+1 End If If UCase(ch)=“C“Then cn=cn+1 End 工 f If UCase(ch)=“D“Then dn=dn+1 End If Next k Textl=an&“&bn&“&cn&“&dn 步骤2：按要求将文件保存至考生文件夹中。 步骤 3：按键键运行程序，先单击“显示”按钮，接着单击“统计”按钮，最后单击“保存”按钮。)解析：解析：“统计”按钮的单击事件过程设计思路：利用 For 循环语句和 Mid()函数将文本框中的字符逐一取出，通过 Select Case 语句分别判断其是否为字母 A、B、C 或 D，并分别统计到对应的四个窗体变量中。
