1、国家二级 VB机试（上机操作）模拟试卷 379及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1、标题为“欢迎”的窗体上画 1个名称为 Labe11的标签，其标题内容为“欢迎使用本系统”，标题文字字体和字号分别为“宋体”、“三号”，标签大小能根据标题内容自动调整，效果如图 340所示。程序执行时，窗体的最大化按钮不可用，请设置相应属性。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frm。 (2)
2、在名称为 Form1的窗体上，画 1个名称为 Labe11的标签，其标题为“横坐标 X”，且能根据标题内容自动调整标签的大小；再画 1个名称为 Text1的文本框，其中的文字显示为空白；再画 1个名称为 Picture1的图片框，大小适中即可。 要求：编写适当的事件过程，使得程序运行时，如果鼠标在图片框中移动，则能在文本框 Text1中显示鼠标在图片框中的当前位置的横坐标，运行情况如图 341所示。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp。程序的功能是： 1)程序运行时，文件列表框显示当前文件夹中的所有扩展名为 j
3、pg的文件。 2)双击文件列表框中某个图片文件名时，能在图像框中显示出该张图片，并将该图片文件的信息(包括路径及文件名)显示到标签中，如图 342所示。 3)“下一张”命令按钮的功能：选中并显示上次选中文件的下一个图片文件(如果文件列表框中没有被选中的图片文件或上次选中的是最后一个文件名，则从第 1个图片文件始)。 在当前程序所在文件夹中，已经提供了所需要的图片文件，运行时窗体如图所示。 在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。 (2)
4、在考生文件夹下有一个工程文件sjt4vbp。程序的功能是：程序运行时，文本框中显示一篇英文短文，单击“查找”按钮时可输入查找内容，如图 343所示。 若未找到查找内容，查找结束；若找到查找内容，被找到的内容在文本框中以反相显示(即呈选中状态)，每找到一次都给出提示，并在左下角文本框中显示累计的次数，如图 344所示。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sjt5vbp。程序运行时，单击“显示数据”按钮，则将考生文件夹下in5dat 文件的内容读入一维数组 a中，并按下标顺序将数组 a各元素的值显示在 List1列表框中；单击“移动”
5、按钮，则将数组 a中的最大值移动到数组的最前面，其他数据的排列顺序不变，并将移动后的结果显示在 List2列表框中。单击“保存”按钮，则保存移动后的结果。 要求：“显示数据”和“保存”按钮的 Click事件过程已经给出，请编写“移动”按钮的 Click事件过程实现上述功能。窗体界面如图345所示。 （分数：2.00）_国家二级 VB机试（上机操作）模拟试卷 379答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1、标题为“欢迎”的窗体上画 1
6、个名称为 Labe11的标签，其标题内容为“欢迎使用本系统”，标题文字字体和字号分别为“宋体”、“三号”，标签大小能根据标题内容自动调整，效果如图 340所示。程序执行时，窗体的最大化按钮不可用，请设置相应属性。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frm。 (2)在名称为 Form1的窗体上，画 1个名称为 Labe11的标签，其标题为“横坐标 X”，且能根据标题内容自动调整标签的大小；再画 1个名称为 Text1的文本框，其中的文字显示为空白；再画 1个名称为 Picture1的图片框，大小适中即可。 要求：编写适当的事件过程，使得程序运
7、行时，如果鼠标在图片框中移动，则能在文本框 Text1中显示鼠标在图片框中的当前位置的横坐标，运行情况如图 341所示。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：新建一个“标准 EXE”工程，在窗体 Form1中 加入一个标签控件。按表 427设置其相关属性。 步骤 2：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：新建一个“标准 EXE”工程，在窗体 Form1中加入一个文本框、标签和图片框。按表428设置其相关属性。 )解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp。程序的功能是：
8、1)程序运行时，文件列表框显示当前文件夹中的所有扩展名为 jpg的文件。 2)双击文件列表框中某个图片文件名时，能在图像框中显示出该张图片，并将该图片文件的信息(包括路径及文件名)显示到标签中，如图 342所示。 3)“下一张”命令按钮的功能：选中并显示上次选中文件的下一个图片文件(如果文件列表框中没有被选中的图片文件或上次选中的是最后一个文件名，则从第 1个图片文件始)。 在当前程序所在文件夹中，已经提供了所需要的图片文件，运行时窗体如图所示。 在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文
9、件中已经存在的控件和程序，最后将程序按原文件名存盘。 (2)在考生文件夹下有一个工程文件sjt4vbp。程序的功能是：程序运行时，文本框中显示一篇英文短文，单击“查找”按钮时可输入查找内容，如图 343所示。 若未找到查找内容，查找结束；若找到查找内容，被找到的内容在文本框中以反相显示(即呈选中状态)，每找到一次都给出提示，并在左下角文本框中显示累计的次数，如图 344所示。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt3vbp，在代码编辑窗口中，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： If FilelL
10、istIndex 1 Or File1ListIndexFile1ListCount1 Then File1ListIndexFile1ListIndex1 Labe11CaptionAppPath“ FilelFileName File1Pattern“*jpq“ 步骤 2：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt4vbp，在代码编辑窗口中，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： 步骤 2：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件
11、sjt5vbp。程序运行时，单击“显示数据”按钮，则将考生文件夹下in5dat 文件的内容读入一维数组 a中，并按下标顺序将数组 a各元素的值显示在 List1列表框中；单击“移动”按钮，则将数组 a中的最大值移动到数组的最前面，其他数据的排列顺序不变，并将移动后的结果显示在 List2列表框中。单击“保存”按钮，则保存移动后的结果。 要求：“显示数据”和“保存”按钮的 Click事件过程已经给出，请编写“移动”按钮的 Click事件过程实现上述功能。窗体界面如图345所示。 （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹中的工程文件 sjt5vbp，在代码编
12、辑窗口中，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： Private Sub Command2_Click() =考生编写的程序= Dim n As Integer， s As String Dim i， j As Integer n0 ： j0 For i1 To 10 If a(i)n Then na(i) ： ji End If Next For ij To 2 Step1 a(i)a(i1) Next a(1)n For i1 To 10 List2AddItem(a(i) Next i = End Sub 步骤 2：按F5运行程序，单击各按钮测试验证。 步骤 3：按要求将文件保存至考生文件夹中。)解析：
