1、国家二级 VB 机试（上机操作）-试卷 56 及答案解析(总分：10.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。请在名称为 Forml 的窗体上建立一个二级下拉菜单，第一级共有两个菜单项，标题分别为”文件”、”编辑”，名称分别为file、edit；在”编辑”菜单下有第二级菜单，含有三个菜单项，标题分别为”剪切”、”复制”、”粘贴”，名称分别为 cut、copy、paste。其中”粘贴”菜单项设置为无效(如图 2-206 所示)。注意：存盘时必须存放在考生文件夹下，工程文件名为 s
2、jtlvbp，窗体文件名为 sjtlfrm。 （分数：2.00）_2.在窗体上画两个文本框，名称分别为 Textl、Text2。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在 Textl 中每输入一个字符，则显示一个”*”，间时在 Text2 中显示输入的内容(如图 2-207 所示)。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2，vbp，窗体文件名为 sjt2frm。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.在名称为 Forml 的窗体上画两个图片框，名称分别为 Pl、P2，高度均为 1900，宽度均为 170
3、0，通过属性窗口把图片文件 piclbmp 放入 P1 中，把图片文件 pic2jpg 放入 P2 中：再画一个命令按钮，名称为C1，标题为”交换图片”(如图 2-208 所示)。编写适当的事件过程，使得在运行时，如果单击”交换图片”按钮，则在 P1 中显示 pic2jpg，在 P2 中显示 piclbmp。程序中不得使用任何变量，也不能使用第三个图片框。注意：存盘时必须存放在考生文件夹下，工程文件名为 sit3vbp，窗体文件名为sjt3frm。 （分数：2.00）_4.在考生文件夹下有一个工程文件 sjt4vbp，请在窗体上画两个复选框，名称分别为 Chl、Ch2，标题分别为”程序设计”、
4、”数据库原理”；然后画一个文本框，名称为 Textl；再画一个命令按钮，名称为C1，标题为”确定”(如图 2-209 所示)。请编写适当的事件过程，使得在运行时，选中复选框并单击”确定”按钮，就可以按照下表的要求把结果显示在文本框中。存盘时，工程文件名为 sjt4vbp，窗体文件名为 sjt4frm。注意：考生不得修改窗体文件中已经存在的程序，退出程序时必须通过单击窗体右上角的关闭按钮。在结束程序运行之前，必须进行产生表 2-9 一个结果的操作。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)5.在考生文件夹下有一个工程文件 sjt5vbp，其窗体上有两个文本框，名称分别为
5、Textl、Text2；还有三个命令按钮，名称分别为 Cl、C2、C3，标题分别为”输入”、”计算”、”存盘”(如图 2-210 所示)。并有一个函数过程 isprime(a)可以在程序中直接调用，其功能是判断参数 a 是否为素数，如果是素数，则返回 True，否则返回 False。请编写适当的事件过程，使得在运行时，单击”输入”按钮，就把文件in5txt 中的整数放入 Textl 中；单击”计算”按钮，则找出大于 Textl 中的整数的第一个素数，并显示在 Text2 中；单击”存盘”按钮，则把 Text2 中的计算结果存入 out5txt 文件中。注意：考生不得修改 isprime 函数过
6、程和控件的属性，必须把计算结果通过单击”存盘”按钮存入 out5txt 文件中。（分数：2.00）_国家二级 VB 机试（上机操作）-试卷 56 答案解析(总分：10.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。请在名称为 Forml 的窗体上建立一个二级下拉菜单，第一级共有两个菜单项，标题分别为”文件”、”编辑”，名称分别为file、edit；在”编辑”菜单下有第二级菜单，含有三个菜单项，标题分别为”剪切”、”复制”、”粘贴”，名称分别为 cut、copy、paste。其中”粘贴
7、”菜单项设置为无效(如图 2-206 所示)。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 （分数：2.00）_正确答案：(正确答案：步骤 1：新建一个”标准 EXE”工程，利用菜单设计器如表 3-120 在窗体上建立一个二级菜单。 )解析：2.在窗体上画两个文本框，名称分别为 Textl、Text2。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在 Textl 中每输入一个字符，则显示一个”*”，间时在 Text2 中显示输入的内容(如图 2-207 所示)。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文
8、件名为sjt2，vbp，窗体文件名为 sjt2frm。 （分数：2.00）_正确答案：(正确答案：步骤 1：新建一个”标准 EXE”工程。 步骤 2：在窗体 Forml 中加入两个文本框，并分别设置它们的相关属性，属性及值如表 3-12l 所示。 )解析：二、简单应用题(总题数：2，分数：4.00)3.在名称为 Forml 的窗体上画两个图片框，名称分别为 Pl、P2，高度均为 1900，宽度均为 1700，通过属性窗口把图片文件 piclbmp 放入 P1 中，把图片文件 pic2jpg 放入 P2 中：再画一个命令按钮，名称为C1，标题为”交换图片”(如图 2-208 所示)。编写适当的事
9、件过程，使得在运行时，如果单击”交换图片”按钮，则在 P1 中显示 pic2jpg，在 P2 中显示 piclbmp。程序中不得使用任何变量，也不能使用第三个图片框。注意：存盘时必须存放在考生文件夹下，工程文件名为 sit3vbp，窗体文件名为sjt3frm。 （分数：2.00）_正确答案：(正确答案：步骤 1：新建一个”标准 EXE”工程，在窗体 Forml 中如表 3-122 画出所列控件并设置其相关属性。 )解析：4.在考生文件夹下有一个工程文件 sjt4vbp，请在窗体上画两个复选框，名称分别为 Chl、Ch2，标题分别为”程序设计”、”数据库原理”；然后画一个文本框，名称为 Text
10、l；再画一个命令按钮，名称为C1，标题为”确定”(如图 2-209 所示)。请编写适当的事件过程，使得在运行时，选中复选框并单击”确定”按钮，就可以按照下表的要求把结果显示在文本框中。存盘时，工程文件名为 sjt4vbp，窗体文件名为 sjt4frm。注意：考生不得修改窗体文件中已经存在的程序，退出程序时必须通过单击窗体右上角的关闭按钮。在结束程序运行之前，必须进行产生表 2-9 一个结果的操作。 （分数：2.00）_正确答案：(正确答案：步骤 1：打开考生文件中的本题工程文件 sjt3vbp，如表 3-123 在窗体中画出控件并设置属性。 步骤 2：在代码编辑窗口，编写”确定”按钮的单击事件
11、。 参考代码： Private Sub C1_Click( ) TextlText=“我选的课是” If ChlValue Then TextlText=TextlText+ChlCaption EndIf If Ch2Value=1 Then TextlText=TextlText+Ch2Caption EndIf End Sub 步骤 3：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)5.在考生文件夹下有一个工程文件 sjt5vbp，其窗体上有两个文本框，名称分别为 Textl、Text2；还有三个命令按钮，名称分别为 Cl、C2、C3，标题分别为”输
12、入”、”计算”、”存盘”(如图 2-210 所示)。并有一个函数过程 isprime(a)可以在程序中直接调用，其功能是判断参数 a 是否为素数，如果是素数，则返回 True，否则返回 False。请编写适当的事件过程，使得在运行时，单击”输入”按钮，就把文件in5txt 中的整数放入 Textl 中；单击”计算”按钮，则找出大于 Textl 中的整数的第一个素数，并显示在 Text2 中；单击”存盘”按钮，则把 Text2 中的计算结果存入 out5txt 文件中。注意：考生不得修改 isprime 函数过程和控件的属性，必须把计算结果通过单击”存盘”按钮存入 out5txt 文件中。（分数
13、：2.00）_正确答案：(正确答案：步骤 1：打开考生文件中的本题工程文件 sjt5vbp，在代码编辑窗口，分别编写命令按钮的单击事件。 参考代码： Private Sub Cl_Click( ) Open”in5txt”For Input As#1 Input #1，a Close #1 TextlText=a End Sub Private Sub C2 Click( ) a=TextlText Do a=a+1 Loop Until isprime(a) Text2Text=a End Sub Private Sub C3_Click( ) Open”out5txt”For Output As #1 Print #1，Text2Text Close #1 End Sub)解析：
