1、VB 机试-试卷 20 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.请根据以下各小题的要求设计 VisualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画一个名称为 Pic 的图片框，通过属性窗口将考生文件夹下的文件 Tul-1jpg 添加到图片框，然后编写适当的事件过程。运行程序时，单击窗体，在图片框中显示“VB 等级考试”，如图 1-21 所示。注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjtlvbp，窗体文件
2、名为 sjt1frm。(2)在名称为 Forml 的窗体上画一个名称为 Commandl 的命令按钮，标题为“命令按钮”。然后建立一个菜单，标题为“控件”，名称为 menu，包含两个子菜单项，一个是“显示命令按钮”，名称为 subMenul；另一个是“隐藏命令按钮”，名称为 subMenu2，如图 1-22 所示。编写适当的事件过程，使得程序运行时，如果选择“显示命令按钮”菜单命令，则显示命令按钮控件；而如果选择“隐藏命令按钮”菜单命令，则隐藏命令按钮控件。注意：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sit2vbp，窗体文件名为sjt2f
3、rm。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.(1)在考生文件夹下有一个工程文件 sjt3vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮，分别统计输入字符串中大写字母、小写字母及数字字符的个数，并将统计结果分别显示在标签控件数组 x 中，如图 1-56 所示。在给出的窗体文件中已经添加了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 （分数：2.00）_三、综合应用题(总题数：2，分数：4
4、.00)5.综合应用题（）（分数：2.00）_6.在考生文件夹下有一个工程文件 sjt5vbp，界面如图 1-137 所示，其功能如下：单击“读数据”按钮，则把考生文件夹下文件 in5dat 中的 12 组整数(其中每组含有 10 个数，共计 120 个整数)读到数组a 中；单击“计算”按钮，则对每组数求平均值，并将所求各组数的平均值截尾取整后存入数组 s 中；单击“显示”按钮，则将所求各组数的平均值显示在文本框 Textl 中：单击“存盘”按钮则把计算结果存盘。在给出的窗体文件中已经有了全部控件，且“读数据”、“显示”和“存盘”按钮的 Click 事件过程已经给出，请为“计算”按钮编写适当的
5、事件过程以实现上述功能。注意：不得修改已经存在的程序，在结束程序运行之前，必须用“存盘”按钮存储计算结果，否则无成绩。最后，程序按原文件名存盘。（分数：2.00）_VB 机试-试卷 20 答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_解析：2.请根据以下各小题的要求设计 VisualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画一个名称为 Pic 的图片框，通过属性窗口将考生文件夹下的文件 Tul-1jpg 添加到图片框，然后编写适当的事件过程。运行程序时，单击窗体，在图片框中
6、显示“VB 等级考试”，如图 1-21 所示。注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjtlvbp，窗体文件名为 sjt1frm。(2)在名称为 Forml 的窗体上画一个名称为 Commandl 的命令按钮，标题为“命令按钮”。然后建立一个菜单，标题为“控件”，名称为 menu，包含两个子菜单项，一个是“显示命令按钮”，名称为 subMenul；另一个是“隐藏命令按钮”，名称为 subMenu2，如图 1-22 所示。编写适当的事件过程，使得程序运行时，如果选择“显示命令按钮”菜单命令，则显示命令按钮控件；而如果选择“隐藏命令按钮”
7、菜单命令，则隐藏命令按钮控件。注意：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sit2vbp，窗体文件名为sjt2frm。 （分数：2.00）_正确答案：(正确答案： 第 1 小题 【操作步骤】 步骤 l：新建一个“标准 EXE”工程，在窗体 Forml 中画一个名称为 Pie 的图片框，并设置其 Picture 属性为 Tul-lJpg。 步骤 2：双击窗体打开代码编辑窗口，在窗体的 Click 事件过程中输入代码。 参考代码： PriVate Sub Form_Click() PicPrint“VB 等级考试“ End Sub 步骤 3:
8、按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，在窗体 Forml 中画一个名称为 Commandl，Caption 属性为“命令按钮”的命令按钮。 步骤 2：选择，【工具】【菜单编辑器】命令，打开菜单设计器，如表 2-13 中的设置建立菜单项。)解析：解析： 第 1 小题 本题只需按要求在窗体及框架中画出控件，并设置其相应属性，然后在窗体的单击事件中调用图片框的 Print 方法显示文本。 第 2 小题 菜单中所包含的每一个菜单项都可看成是一个命令按钮，程序运行时，选择某菜单项将触发其 Click 事件。 要实现本题中的功能。应在“显示命
9、令按钮”菜单项的 Click 事件过程中，令命令按钮的 Visible 属性为 True，在“隐藏命令按钮”菜单项的 Click事件过程中，令命令按钮的 Visible 属性为 False。二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_解析：4.(1)在考生文件夹下有一个工程文件 sjt3vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮，分别统计输入字符串中大写字母、小写字母及数字字符的个数，并将统计结果分别显示在标签控件数组 x 中，如图 1-56 所示。在给出的窗体文件中已经添加了全部控件，但程序不完整。要求：去掉程序中的注
10、释符，把程序中的?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案： 第 l 小题 【操作步骤】 步骤 l：打开考生文件中的本题工程文件 sjt3vbp，在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： n=Len(TextlText) b=Asc(Mild(s，i，1) Select Case b For i=0 To 2 x(i)=a(i) 步骤 2：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：打开考生文件中的本题工程文件sjt4vbp，通过 L
11、istl 列表框的 List 属性添加四个项目：文本框、标签、命令按钮、单选按钮。 步骤2：在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： FOr i=0 To LaListCount-1 LbAddItem LaList(i) Next LaClear 步骤 3：按要求将文件保存至考生文件夹中。)解析：解析： 第 l 小题 RTfim$(字符串)函数的作用是：去掉“字符串”右边的空白字符。 本题原程序在 For 循环体中(其中循环终值应为文本框的字符长度，即 n=Len(1bxtlText)，用 Mid 函数逐一取出文本框中的每个字符，并用 Asc 函数返回
12、其 ASCII 码。若取出字符的 ASCII 码在 4857 之间，则记录数字个数的数组变量 a(0)增 1；若 ASCII 码在 6590 之间，则记录大写字母个数的数组变量 a(1)增 1；若ASCII 码在 97122 之间，则记录小写字母个数的数组变量 a(2)增 1。 第 2 小题 列表框的 Clear 方法用于清除列表框中的所有项目。 本题列表框中列表项的移动功能，是通过调用 remove 过程来实现的，在remove 过程中通过 For 循环(循环变量终值为 LaListCount-1)将列表框 La 中的各项逐一添加到列表框Lb 中，全部项目添加完成后，用列表框的 Clear
13、方法清除该列表框中的所有项目。三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在考生文件夹下有一个工程文件 sjt5vbp，界面如图 1-137 所示，其功能如下：单击“读数据”按钮，则把考生文件夹下文件 in5dat 中的 12 组整数(其中每组含有 10 个数，共计 120 个整数)读到数组a 中；单击“计算”按钮，则对每组数求平均值，并将所求各组数的平均值截尾取整后存入数组 s 中；单击“显示”按钮，则将所求各组数的平均值显示在文本框 Textl 中：单击“存盘”按钮则把计算结果存盘。在给出的窗体文件中已经有了全部控件，且“读数据”、“显示”和
14、“存盘”按钮的 Click 事件过程已经给出，请为“计算”按钮编写适当的事件过程以实现上述功能。注意：不得修改已经存在的程序，在结束程序运行之前，必须用“存盘”按钮存储计算结果，否则无成绩。最后，程序按原文件名存盘。（分数：2.00）_正确答案：(正确答案： 【操作步骤】 步骤 1：打开考生文件中的本题工程文件 sjt5,vbp，在代码编辑窗口，编辑“计算”按钮单击事件的内容。 参考代码： For i=1 To 12 Sum=a(i，1) For j=2 To 10 Sum=Sum+a(i，j) Next j s(i)=Int(Sum10) Next i 步骤 2：按要求将文件保存至考生文件夹中。 步骤 3：按F5键运行程序，先单击“读数据”按钮，接着单击“计算”按钮，然后单击“显示”按钮查看结果，最后单击“存盘”按钮保存结果。)解析：解析：本题可利用一个嵌套的 For 循环来完成计算工作：在外循环(循环变量的取值为 112)体中，先初始设置记录每行累加和的变量 Sum 的初值为每行的第一个数，接着通过内循环(循环变量的取值为210)逐一完成 Sum 与该行其他数据的累加工作。内循环结束后，用表达式 s(i)=Im(Sum10)保存每行的平均值。
