1、VB 机试-试卷 61 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.请根据以下各小题的要求设计 VisualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画一个名称为：PictureI 的图片框(PictureBox)，高、宽均为 1000。在图片框内再画一个有边框的名称为 Imagel 的图像框(Image)。并通过属性窗口把考生目录下的图标文件 POINTll(香蕉图标)装入图像框Imagel 中，如图 1-26 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为
2、 sjtlvbp，窗体文件名为 sjtlfrm。 (2)在名称为Forml 的窗体上画一个名称为 Commandl、标题为“保存文件”的命令按钮，再画一个名称为 CommonDialogl 的通用对话框。要求：通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为 out2；运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图 1-27 所示。注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为 sjt2vbp，窗体文件名为sjt2frm。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.
3、00)3.简单应用题（）（分数：2.00）_4.(1)在考生文件夹下有一个工程文件 sjt3vbp，请在窗体上画两个框架，其名称分别为 F1 和 F2，标题分别为“交通工具”和“到达目标”。在 Fl 中画两个单选按钮，名称分别为 Opl 和 Op2，标题分别为“飞机”和“火车”。在 F2 中画两个单选按钮，名称分别为 Op3 和 Op4，标题分别为“广州”和“昆明”。画一个称为 Labl 的标签，宽度为 3000，高度为 375。编写适当事件过程。程序运行后，选择不同单选按钮并单击窗体后在标签上显示的结果见表 1-1。 程序的运行情况如图 1-127 所示。存盘时，工程文件名为 sjt3vbp
4、，窗体文件名为 sjt3frm。注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的关闭按钮。(2)在考生文件夹下有一个工程文件 sjt4vbp，请在窗体上画两个文本框，其名称分别为Textl、Text2，文本框的内容分别设置为“计算机”、“等级考试”。然后画一个标签，其名称为Labl，高度为 375，宽度为 2000。再画两个单选按钮，名称分别为 opl 和 op2，标题分别为“交换”和“连接”，最后再画一个命令按钮，其名称为 Cl，标题为“确定”，编写适当的事件程序。程序运行后，如果选中“交换”单选按钮并单击“确定”
5、按钮，则 Textl 文本框中的内容与 Text2 文本框中的内容进行交换，并在标签处显示“交换成功”(如图 1-128 所示)；如果选中“连接”单选按钮并单击“确定”按钮后，则把交换后的 Textl 和 Text2 的内容连接起来，并在标签处显示连接后的内容。存盘时，工程文件名为 sjt4vbp，窗体文件名为 sjt4frm。注意：不得修改已经给出的程序。在结束程序运行之前，必须选中一个单选按钮，并单击“确定”按钮。退出程序时必须通过单击窗体右上角的关闭按钮，否则无成绩。（分数：2.00）_三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_6.在考生文件夹下有
6、一个工程文件 sjt5vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时，在文本框 Textl 中输入一个大于 2 的偶数，并单击“分解为”按钮，则可以将该偶数分解为两个素数之和，且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合，例如 24 可以分解为 5 和 19，也可以分解为 11 和 13，要求取含有最小素数的组合，如图 1-38 所示)。要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码，以实现上述功能。过程 IsPrime 用来判断一个数是否为素数，如果是，返回值为 True，否则返回值为 False。注意
7、：不得修改原有程序和控件的属性。至少正确运行一次程序，且运行时在文本框中输入 23456，单击“分解为”按钮，将结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2.00）_VB 机试-试卷 61 答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_解析：2.请根据以下各小题的要求设计 VisualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画一个名称为：PictureI 的图片框(PictureBox)，高、宽均为 1000。在图片框内再画一个有边框的名称为
8、 Imagel 的图像框(Image)。并通过属性窗口把考生目录下的图标文件 POINTll(香蕉图标)装入图像框Imagel 中，如图 1-26 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 (2)在名称为Forml 的窗体上画一个名称为 Commandl、标题为“保存文件”的命令按钮，再画一个名称为 CommonDialogl 的通用对话框。要求：通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为 out2；运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图 1-27 所示。注意：
9、要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为 sjt2vbp，窗体文件名为sjt2frm。 （分数：2.00）_正确答案：(正确答案：第 l 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，如表 2-14 在窗体中画出控件并设置其相关属性。 步骤 2：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，选择【工程】【部件】命令，在弹出的“部件，对话框的列表中选中“MicroSoflCommonDialogControl6,0”项目，单击“确定”按钮。 步骤 2： 在窗体：Forml
10、上画一个通用对话框和一个命令按钮，其相关属性设置如表 2-15 所示。 )解析：解析：第 l 小题 窗体、图像框(ImageBox)和图片框(PietureBox)上均可以显示来自位图、图标、元文件、JPEG 或 GIF 文件的图形。区别在于：图像框专门用于显示位图，而另外两种还提供了画图的功能。为图片框控件指定图片有两种方法：一是在设计阶段通过 Picture 属性设置；二是在程序运行时通过LoadPicture()图片加载函数加载。图片框作为一个容器，在图片框上可以再画图片框或者图像框。 本题只需按照要求画出控件并设置属性即可，注意图像框要画在图片框内部。 第 2 小题 通用对话框的默认文
11、件名由 FileName 属性设置。标题由 Dialog“ritle 属性设置。本题可在“保存文件”的单击事件过程中，用语句通过调用通用对话框的 ShowSave 方法或通过设置其 Action 属性值为 2，使其以“保存对话框”方式打开。二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_解析：4.(1)在考生文件夹下有一个工程文件 sjt3vbp，请在窗体上画两个框架，其名称分别为 F1 和 F2，标题分别为“交通工具”和“到达目标”。在 Fl 中画两个单选按钮，名称分别为 Opl 和 Op2，标题分别为“飞机”和“火车”。在 F2 中画两个单选按钮，名称分别
12、为 Op3 和 Op4，标题分别为“广州”和“昆明”。画一个称为 Labl 的标签，宽度为 3000，高度为 375。编写适当事件过程。程序运行后，选择不同单选按钮并单击窗体后在标签上显示的结果见表 1-1。 程序的运行情况如图 1-127 所示。存盘时，工程文件名为 sjt3vbp，窗体文件名为 sjt3frm。注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的关闭按钮。(2)在考生文件夹下有一个工程文件 sjt4vbp，请在窗体上画两个文本框，其名称分别为Textl、Text2，文本框的内容分别设置为“计算机”、“
13、等级考试”。然后画一个标签，其名称为Labl，高度为 375，宽度为 2000。再画两个单选按钮，名称分别为 opl 和 op2，标题分别为“交换”和“连接”，最后再画一个命令按钮，其名称为 Cl，标题为“确定”，编写适当的事件程序。程序运行后，如果选中“交换”单选按钮并单击“确定”按钮，则 Textl 文本框中的内容与 Text2 文本框中的内容进行交换，并在标签处显示“交换成功”(如图 1-128 所示)；如果选中“连接”单选按钮并单击“确定”按钮后，则把交换后的 Textl 和 Text2 的内容连接起来，并在标签处显示连接后的内容。存盘时，工程文件名为 sjt4vbp，窗体文件名为 s
14、jt4frm。注意：不得修改已经给出的程序。在结束程序运行之前，必须选中一个单选按钮，并单击“确定”按钮。退出程序时必须通过单击窗体右上角的关闭按钮，否则无成绩。（分数：2.00）_正确答案：(正确答案： 第 1 小题 【操作步骤】 步骤 l：打开考生文件夹下的本题工程文件sjt3vbp。 步骤 2：在窗体 Forml 中加入两个框架和一个标签以及一个命令按钮，然后在每个框架中各加入两个单选按钮，分别设置它们的相关属性，其属性及值如表 2-69 所示。 步骤 3：打开代码编辑窗口输入如下代码： 参考代码： PriVate Sub FormI_Click() If OpAnd Op3 Then
15、LablCaption=“坐飞机去广州“ ElseIf Opl And Op4 Then LablCaption=“坐飞机去昆明“ ElseIf Op2 And Op3 Then LablCaption=“坐火车去广州“ ElseIf Op2 And Op4 Then LablCaption=“坐火车去昆明“ End If End Sub 步骤 4：按要求将文件保存至考生文件夹中。 步骤 5：按 键运行程序，选择一种交通工具和一个到达目标，并单击命令按钮，最后单击窗体右上角的关闭按钮退出程序。 * 第 2 小题 【操作步骤】 步骤 l：打开考生文件夹下的本题工程文件 sjt4vbp。 步骤 2
16、：在窗体 Forml 中加入两个文本框、一个标签和两个单选按钮，分别设置它们的相关属性，其属性及值如表 2-70 所示。 步骤 3：打开代码编辑窗口输入如下代码： 参考代码： Private Sub C1_Click() If Opl Then LablCaption=TextlText TextlText=Text2Text Text2Text=LablCaption LablCaption=“交换成功“ ElseIf Op2 Then LablCaption=TextlText&Text2Text End If End Sub 步骤 4：按要求将文件保存至考生文件夹中。步骤 5：按键运行程
17、序，选择一个单选按钮，并单击命令按钮，最后单击窗体右上角的关闭按钮退出程序。 *)解析：解析： 第 1 小题 根据题目要求，在“确定”按钮的单击事件过程中，先用 If 语句判断框架 F1 中的 Opl 是否选中(即以 OplValue=True 为条件表达式)，如果条件为真，那么再继续判断框架 F2 中的Op3 是否选中(即以 Op3Value=True 为条件表达式)，当 Op3 被选中时，标签中显示“坐飞机去广州”，否则显示“坐飞机去昆明”；同理在外层 If 语句条件为假(即 Op2 被选中)时，也作类似处理。这样一共就有四种可能：Opl 和 Op3 被选中、Opl 和 Op4 被选中、O
18、p2 和 Op3 被选中、Op2 和 Op4 被选中。对于可能出现的不同选择对照题目中表的规定，在标签中显示不同内容。以上判断和显示操作均在 Cl 的 Click 事件中完成。 第 2 小题 根据题目要求，设计本题程序的思路：在命令按钮的 Click 事件过程中分别以 Opl和 Op2 是否选中作为 If 语句的条件，当 Opl 被选中时，将两个文本框中的内容通过一个中间变量进行交换：当 Op2 被选中时，将两个文本框中的内容连接起来。三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在考生文件夹下有一个工程文件 sjt5vbp。在窗体文件中已经给出了
19、全部控件及部分程序。程序运行时，在文本框 Textl 中输入一个大于 2 的偶数，并单击“分解为”按钮，则可以将该偶数分解为两个素数之和，且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合，例如 24 可以分解为 5 和 19，也可以分解为 11 和 13，要求取含有最小素数的组合，如图 1-38 所示)。要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码，以实现上述功能。过程 IsPrime 用来判断一个数是否为素数，如果是，返回值为 True，否则返回值为 False。注意：不得修改原有程序和控件的属性。至少正确运行一次程序
20、，且运行时在文本框中输入 23456，单击“分解为”按钮，将结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案： 【操作步骤】 步骤 1：打开考生文件中的本题工程文件 sjt5vbp，在代码编辑窗口的指定位置编写以下代码： 参考代码： Dim i As Integer Dim n As Integer n=Val(TextlText) If n Mod 2O Then MsgBox“请输入偶数!“ Exit Sub End If For i=3 To n2 If IsPrime(i)And IsPrime(n-i)Then LabellC
21、aption=i Label2Caption=n-i Exit For End If Next 步骤 2：按要求将文件保存至考生文件夹中。 步骤 3：按F5键运行程序，在文本框中输入 23456，单击“分解为”按钮。)解析：解析：素数的判断准则就是看该数除了 l 和其本身外有无其他约数。 本题程序设计思路：两个整数之和为 n 的组合有：l 和 n1、2 和 n-2i 和 ni，在。For 循环中按前一个加数由小到大的顺序，依次通过调用函数 IsPrime 来判断每个组合中的两个加数是否均为素数，第一个找到的素数组合中即含有能够分解出的最小素数。由于 1 不是素数，故循环变量的初值从 2 开始；由于 i 和 n-i 的组合与 n-i 和 i组合在本题中可被视为相同组合，故循环变量的终值设定为 n/2 即可。
