【计算机类职业资格】国家二级VB机试（上机操作）-试卷35及答案解析.doc

《【计算机类职业资格】国家二级VB机试（上机操作）-试卷35及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】国家二级VB机试（上机操作）-试卷35及答案解析.doc（3页珍藏版）》请在麦多课文档分享上搜索。

1、国家二级 VB 机试（上机操作）-试卷 35 及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画一个名称为 Pic 的图片框，通过属性窗口将考生文件夹下的文件 Tul 一 1jpg 添加到图片框，然后编写适当的事件过程。运行程序时，单击窗体，在图片框中显示“VB 等级考试”，如图 3-111 所示。 注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sitlvbp，窗体文件名为

2、sjtl.frm。(2)在名称为 Forml 的窗体上画一个名称为 Commandl 的命令按钮，标题为“命令按钮”。然后建立一个菜单，标题为“控件”，名称为 menu，包含两个子菜单项，一个是“显示命令按钮”，名称为 subMenul；另一个是“隐藏命令按钮”，名称为 subMenu2，如图 3112所示。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在名称为 Forml 的窗体上画一个名称为 Ll 的标签，标题为“口令”；画两个文本框，名称分别为Text1、Text2，都没有初始内容；再画三个命令按钮，名称分别为 C1、C2、C3，标题分别为“显示口令”、“隐

3、藏口令”、“复制口令”，在开始运行时，向 Textl 中输入的所有字符，都显示“*”，单击“显示口令”按钮后，在 Textl 中显示所有字符，再单击“隐藏口令”后，Text1 中的字符不变，但显示的都是“?”，单击“复制口令”后，把 Text1 中的实际内容复制到 Text2 中，如图 313 所示。 要求：在属性窗口中，把窗体的标题改为“口令窗口”。建立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使用变量。存盘时，工程文件名为 sit3vbp，窗体文件名为 sit3frm。(2)在名称为 Forml 的窗体上画一个名称为 P1 的图片框，并利用属性窗口把考生目录中的图标文

4、件Openico 放到图片框中；再画一个通用对话框控件，名称为 CDl1，利用属性窗口设置相应属性，即打开对话框时：标题为“打开文件”，文件类型为“Word 文档”，初始目录为 C 盘根目录。再编写适当的事件过程，使得在运行时，单击 P1 图片框，可以打开上述对话框。运行后的窗体如图 314 所示。（分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.考生文件夹下有工程文件 sjt5vbp。程序运行时，外观如图 3187 所示，单击“显示数据”按钮，则将考生文件夹下 in5dat 文件的内容读入到 5 行 40 列的二维数组 a 中，并按 5 行显示在 Textl 文本框内；单击

5、“统计“按钮，则计算每行中小于 50 的数之和，及这些数的平均值(平均值保留 2 位小数，是否四舍五入不限)，并将它们(共 10 个值)分别显示在 Labell 数组及 Text2 数组中。单击“保存”按钮，则保存计算结果。“显示数据”和“保存”按钮的 Click 事件过程已经给出，请编写“统计”按钮的 Click事件过程实现上述功能。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须用“统计”进行统计，且必须单击“保存”按钮保存结果，否则无成绩。最后，程序按原文件名存盘。（分数：2.00）_国家二级 VB 机试（上机操作）-试卷 35 答案解析(总分：6.00，做题时

6、间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画一个名称为 Pic 的图片框，通过属性窗口将考生文件夹下的文件 Tul 一 1jpg 添加到图片框，然后编写适当的事件过程。运行程序时，单击窗体，在图片框中显示“VB 等级考试”，如图 3-111 所示。 注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sitlvbp，窗体文件名为 sjtl.frm。(2)在名称为 Forml 的窗体上画一个名称为 Comman

7、dl 的命令按钮，标题为“命令按钮”。然后建立一个菜单，标题为“控件”，名称为 menu，包含两个子菜单项，一个是“显示命令按钮”，名称为 subMenul；另一个是“隐藏命令按钮”，名称为 subMenu2，如图 3112所示。 （分数：2.00）_正确答案：(正确答案：第 l 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，在窗体 Forml 中画一个名称为 Pic 的图片框，并设置其 Picture 属性为 Tul.1jpg。 步骤 2：双击窗体打开代码编辑窗口，在窗体的 Click 事件过程中输入代码。 参考代码： Private Sub Form Click() PicP

8、rint”VB 等级考试 End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，按要求画出控件并设置属性。 步骤 2：选择【工具】【菜单编辑器】命令，打开菜单设计器，按要求建立菜单项。 步骤 3：打开代码编辑窗口，编写菜单命令的单击事件过程。 参考代码：Private Sub subMenul Click() CommandlVisible=True End Sub Private Sub s1JbMenu2 Click() CommandlVisible=False End Sub 步骤 4：按要求将文件保存至考生文件

9、夹中。)解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在名称为 Forml 的窗体上画一个名称为 Ll 的标签，标题为“口令”；画两个文本框，名称分别为Text1、Text2，都没有初始内容；再画三个命令按钮，名称分别为 C1、C2、C3，标题分别为“显示口令”、“隐藏口令”、“复制口令”，在开始运行时，向 Textl 中输入的所有字符，都显示“*”，单击“显示口令”按钮后，在 Textl 中显示所有字符，再单击“隐藏口令”后，Text1 中的字符不变，但显示的都是“?”，单击“复制口令”后，把 Text1 中的实际内容复制到 Text2 中，如图 313 所示。 要求：在属性窗

10、口中，把窗体的标题改为“口令窗口”。建立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使用变量。存盘时，工程文件名为 sit3vbp，窗体文件名为 sit3frm。(2)在名称为 Forml 的窗体上画一个名称为 P1 的图片框，并利用属性窗口把考生目录中的图标文件Openico 放到图片框中；再画一个通用对话框控件，名称为 CDl1，利用属性窗口设置相应属性，即打开对话框时：标题为“打开文件”，文件类型为“Word 文档”，初始目录为 C 盘根目录。再编写适当的事件过程，使得在运行时，单击 P1 图片框，可以打开上述对话框。运行后的窗体如图 314 所示。（分数：2.00）

11、_正确答案：(正确答案：第 1 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，如表 47 在窗体中画出控件并设置其相关属性。 步骤 2：在代码编辑窗口，分别编写三个按钮的单击事件过程。 参考代码： Private Sub C1 C1ick() TextlPaSswordChar=“” End Sub Private Sub C2 Click() TextlPaSswordChar=“?” End Sub Private Sub C3 Click() C3ParentText2Text=TextlText End Sub Private Sub Form Load() Text1P

12、aSSWOrdChar=“*” End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，如表 48 在窗体中画出控件并设置其相关属性。 )解析：三、综合应用题(总题数：1，分数：2.00)3.考生文件夹下有工程文件 sjt5vbp。程序运行时，外观如图 3187 所示，单击“显示数据”按钮，则将考生文件夹下 in5dat 文件的内容读入到 5 行 40 列的二维数组 a 中，并按 5 行显示在 Textl 文本框内；单击“统计“按钮，则计算每行中小于 50 的数之和，及这些数的平均值(平均值保留 2 位小数，是否四舍五入不

13、限)，并将它们(共 10 个值)分别显示在 Labell 数组及 Text2 数组中。单击“保存”按钮，则保存计算结果。“显示数据”和“保存”按钮的 Click 事件过程已经给出，请编写“统计”按钮的 Click事件过程实现上述功能。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须用“统计”进行统计，且必须单击“保存”按钮保存结果，否则无成绩。最后，程序按原文件名存盘。（分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt5vbp，打开代码编辑窗口，在指定位置编写以下代码： 参考代码： For i=1 To 5 Sum=0 Counter=0 For j=1 To 4 0 If a(i，j)50 Then Sum=Sum+a(i，j) Counter=Counter+1 End If Next Avg=SumCounter Labell(i 一1)Caption=Sum Text2(i 一 1)Text=Int(Avg*i00)100 Next 步骤 2：按F5键运行程序，先单击“显示数据”按钮，接着单击“统计”按钮，然后单击“保存”按钮保存结果。 步骤 3：按要求将文件保存至考生文件夹中。)解析：