1、国家二级 VB机试（上机操作）模拟试卷 293及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。(1)在名称为 Form1、标题为“列表框练习”的窗体上画一个名称为 List1的列表框，表项内容依次输入 xxx、ddd、mmm 和 aaa，且以宋体 14号字显示表项内容，如图 3102(a)所示。最后设置相应属性，使运行后列表框中的表项按字母升序方式排列，如图 3102(b)所示。注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1frm，工程文件名为 sj
2、t1vbp。 (2)在名称为 Form1的窗体上，画一个名称为 Label1的标签，其标题为“计算机等级考试”，字体为宋体，字号为 12号，且能根据标题内容自动调整标签的大小。再画两个名称分别为 Command1、Command2，标题分别为“缩小”和“还原”的命令按钮(如图 3103所示)。要求：编写适当的事件过程，使得单击“缩小”按钮，Label1 中所显示的标题内容自动减小两个字号；单击“还原”按钮，Label1 所显示的标题内容的大小自动恢复到 12号。注意：存盘时，将文件保存至考生文件夹下，窗体文件名为 sjt2frm，工程文件名为 sjt2vbp。要求程序中不得使用变量，每个事件过
3、程中只能写一条语句。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)考生文件夹下的工程文件 sjt3vbp 中有一个初始内容为空、且带有垂直滚动条的文本框，其名称为 Text1：两个标题分别为“读数据”和“查找”的命令按钮，其名称分别为 Cmd1、Cmd2。请画一个标题为“查找结果”的标签 Label1，再画一个名称为 Text2，其初始内容为空的文本框，如图 3104所示。程序功能如下：单击“读数据”按钮，则将考生文件夹下 in3dat 文件中已按升序排列的 30个整数读入一维数组 a中，并同时显示在 Text1文本框内；单击“查找”按钮，将弹出输入框接收用户输入
4、的任意一个偶数，若接收的数为奇数，则提示重新输入。如果接收的偶数超出一维数组 a的数值范围，则无须进行相应查找工作，直接在 Text2内给出结果；否则，在一维数组 a中查找该数，并根据查找结果在Text2文本框内显示相应信息。命令按钮的 Click事件过程已给出，但“查找”按钮的 Click事件过程不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。(2)考生文件夹下的工程文件 sjt4vbp 中有一个初始内容为空的文本框 Text1，一个包含三个元素的文本框控件数组 Text2，两个标题分别是“读
5、数据”和“统计”的命令按钮，两个分别含有三个元素的标签控件数组 Label1和 Label2，如图 3105所示。程序功能如下：考生文件夹下 in4dat 文件中存有 20个考生的考号及数学和语文单科考试成绩。单击“读数据”按钮，可以将 in4dat 文件内容读入到 20行 3列的二维数组 a中，并同时显示在 Text1文本框内；单击“统计”按钮，则对考生数学和语文的平均分在“优秀”、“通过”和“不通过”三个分数段的人数进行统计，并将人数统计结果显示在控件数组 Text2中相应位置。其中，平均分在 85分以上(含 85分)为“优秀”，平均分在 6085 分之间(含 60分)为“通过”，平均分在
6、 60分以下为“不通过”。命令按钮的 Click事件过程已经给出，但“统计”按钮的 Click事件过程不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.考生文件夹下的工程文件 sjt5vbp 中有一个初始内容为空的文本框 Text1，两个标题分别是“读数据”和“计算”的命令按钮；请画一个标题为“各行平均数的最大值为”的标签 Label2，再画一个初始内容为空的文本框 Text2，如图 3106所示。程序功能：单击“读数据”按钮，
7、则将考生文件夹下in5dat 文件的内容读入 20行 5列的二维数组 a中，并同时显示在 Text1文本框内；单击“计算”按钮，则自动统计二维数组 a中各行的平均数，并将这些平均数中的最大值显示在 Text2文本框内。“读数据”按钮的 Click事件过程已经给出，请编写“计算”按钮的 Click事件过程实现上述功能。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须用“计算”按钮进行计算，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。 （分数：2.00）_国家二级 VB机试（上机操作）模拟试卷 293答案解析(总分：6.00，做题时间：90
8、 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。(1)在名称为 Form1、标题为“列表框练习”的窗体上画一个名称为 List1的列表框，表项内容依次输入 xxx、ddd、mmm 和 aaa，且以宋体 14号字显示表项内容，如图 3102(a)所示。最后设置相应属性，使运行后列表框中的表项按字母升序方式排列，如图 3102(b)所示。注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1frm，工程文件名为 sjt1vbp。 (2)在名称为 Form1的窗体上，画一个名称为 Label1的标签，其标
9、题为“计算机等级考试”，字体为宋体，字号为 12号，且能根据标题内容自动调整标签的大小。再画两个名称分别为 Command1、Command2，标题分别为“缩小”和“还原”的命令按钮(如图 3103所示)。要求：编写适当的事件过程，使得单击“缩小”按钮，Label1 中所显示的标题内容自动减小两个字号；单击“还原”按钮，Label1 所显示的标题内容的大小自动恢复到 12号。注意：存盘时，将文件保存至考生文件夹下，窗体文件名为 sjt2frm，工程文件名为 sjt2vbp。要求程序中不得使用变量，每个事件过程中只能写一条语句。 （分数：2.00）_正确答案：(正确答案：第 1小题 步骤 1：新
10、建一个“标准 EXE”工程，如表 462在窗体中画出控件并设置其相关属性。 步骤 2：按要求将文件保存至考生文件夹中。 第 2小题 步骤 1：新建一个“标准 EXE”工程，如表 463在窗体中画出控件并设置其相关属性。 )解析：解析：第 1小题：本题只需新建窗体和控件，然后设置相关属性即可。 第 2小题：程序运行时要改变标签的标题的字体大小，可通过修改其 FontSize属性值来实现。二、简单应用题(总题数：1，分数：2.00)2.(1)考生文件夹下的工程文件 sjt3vbp 中有一个初始内容为空、且带有垂直滚动条的文本框，其名称为 Text1：两个标题分别为“读数据”和“查找”的命令按钮，其
11、名称分别为 Cmd1、Cmd2。请画一个标题为“查找结果”的标签 Label1，再画一个名称为 Text2，其初始内容为空的文本框，如图 3104所示。程序功能如下：单击“读数据”按钮，则将考生文件夹下 in3dat 文件中已按升序排列的 30个整数读入一维数组 a中，并同时显示在 Text1文本框内；单击“查找”按钮，将弹出输入框接收用户输入的任意一个偶数，若接收的数为奇数，则提示重新输入。如果接收的偶数超出一维数组 a的数值范围，则无须进行相应查找工作，直接在 Text2内给出结果；否则，在一维数组 a中查找该数，并根据查找结果在Text2文本框内显示相应信息。命令按钮的 Click事件过
12、程已给出，但“查找”按钮的 Click事件过程不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。(2)考生文件夹下的工程文件 sjt4vbp 中有一个初始内容为空的文本框 Text1，一个包含三个元素的文本框控件数组 Text2，两个标题分别是“读数据”和“统计”的命令按钮，两个分别含有三个元素的标签控件数组 Label1和 Label2，如图 3105所示。程序功能如下：考生文件夹下 in4dat 文件中存有 20个考生的考号及数学和语文单科考试成绩。单击“读数据”按钮，可以将 in4dat 文
13、件内容读入到 20行 3列的二维数组 a中，并同时显示在 Text1文本框内；单击“统计”按钮，则对考生数学和语文的平均分在“优秀”、“通过”和“不通过”三个分数段的人数进行统计，并将人数统计结果显示在控件数组 Text2中相应位置。其中，平均分在 85分以上(含 85分)为“优秀”，平均分在 6085 分之间(含 60分)为“通过”，平均分在 60分以下为“不通过”。命令按钮的 Click事件过程已经给出，但“统计”按钮的 Click事件过程不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。 （
14、分数：2.00）_正确答案：(正确答案：第 1小题 步骤 1：打开考生文件夹下的工程文件 sjt3vbp，打开代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： If num2Fix(num2)Then If numa(1)Or numa(30)Then If a(n)=num Then If n30Then 步骤 2：按要求将文件保存至考生文件夹中。 第 2小题 步骤 1：打开考生文件夹中的本题工程文件 sjt4vbp，打开代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： Avg=(a(i，2)+a(i，3)2 Case Is=85
15、Case60To84 End Select Text2(n-1)=x(n) 步骤 2：按要求将文件保存至考生文件夹中。)解析：解析：第 1小题：在“查找”按钮的单击事件中，首先使用变量 num接收输入框的值，然后判断num是否为偶数，如果为奇数(hum2Fix(num2)则提示错误信息；由于数组 a是升序排列的，因此如果 num的值小于 a(1)或嚣大于 a(30)则意味着超出范围：接下来使用 For循环遍历整个数组，如果某次循环中数组元素等于 num的值则意味着找到，可以退出循环；当循环结束后如果 n的值大于 30则表明循环是正常结束的，没有找到这个元素。 第 2小题：本题要求编写“统计”按
16、钮的单击事件过程。程序设计思路：在一个 For循环中逐一取出存于数组 a中的各学生成绩，将同一行的两个成绩取平均值后用Select Case语句对平均值进行判断，根据成绩所属情况，使对应的 x数组元素中的数增 1，最后显示在文本框数组中。三、综合应用题(总题数：1，分数：2.00)3.考生文件夹下的工程文件 sjt5vbp 中有一个初始内容为空的文本框 Text1，两个标题分别是“读数据”和“计算”的命令按钮；请画一个标题为“各行平均数的最大值为”的标签 Label2，再画一个初始内容为空的文本框 Text2，如图 3106所示。程序功能：单击“读数据”按钮，则将考生文件夹下in5dat 文件
17、的内容读入 20行 5列的二维数组 a中，并同时显示在 Text1文本框内；单击“计算”按钮，则自动统计二维数组 a中各行的平均数，并将这些平均数中的最大值显示在 Text2文本框内。“读数据”按钮的 Click事件过程已经给出，请编写“计算”按钮的 Click事件过程实现上述功能。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须用“计算”按钮进行计算，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。 （分数：2.00）_正确答案：(正确答案：步骤 1：打开考生文件夹中的本题工程文件 sjt5vbp，在窗体 Form1中画一个标签和一个文本框， 其属性及值如表 464所示。 )解析：解析：本题可利用一个嵌套的 For循环来完成计算工作：在外循环(循环变最的取值为 120)体中，先初始设置记录每行数据之和的变量 Sum的初值为 0，接着通过内循环(循环变量的取值为 15)体完成对每行数据的累加工作。内循环结束后，用表达式 Avg=Sum5 计算出该行的平均值。如果是第一次执行外循环的循环体，则将当前 Avg的值记录在变量 Max中，否则仅在其他行 Avg值大于 Max的值时，才将其记录在变量 Max中。嵌套 For循环结束时，变量 Max的值即为每行平均数中的最大值，将其显示在文本框Text2中。
