- 1、本文档共5页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第04套
1. 基本操作(2小题,每小题15分,共计30分)
注意:下面出现的“考生文件夹”均为%USER%
**********************************************************************
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)请在名称为Form1的窗体上建立一个二级下拉菜单,第一级共有二个菜单
项,标题分别为“文件”、“编辑”,名称分别为file、edit;在“编
辑”菜单下有第二级菜单,含有三个菜单项,标题分别为“剪切”、“复
制”、“粘贴”,名称分别为cut、copy、paste。其中“粘贴”菜单项设
置为无效(如图所示)。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件
名为sjt1.frm。
**********************************************************************
(2)在窗体上画二个文本框,名称分别为Text1、Text2。请设置适当的控件属
性,并编写适当的事件过程,使得在运行时,如果在Text1中每输入一个
字符,则显示一个“*”,同时在Text2中显示输入的内容(如图所示)。
程序中不得使用任何变量。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件
名为sjt2.frm。
2. 简单应用(2小题,每题20分,计40分)
注意:下面出现的“考生文件夹”均为%USER%
***********************************************************************
(1)在名称为Form1的窗体上画二个图片框,名称分别为P1、P2,高度均为
1900,宽度均为 1700,通过属性窗口把图片文件pic1.bmp放入P1中,把
图片文件pic2.jpg放入 P2中;再画一个命令按钮,名称为C1,标题为“
交换图片”(如图所示)。 编写适当的事件过程,使得在运行时,如果
单击命令按钮,则在P1中显示Pic2.jpg,在P2中显示Pic1.bmp。程序中
不得使用任何变量,也不能使用第三个图片框。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件
名为sjt3.frm。
**********************************************************************
(2)在考生文件夹下有一个工程文件 sjt4.vbp,请在窗体上画二个复选框,
名称分别为 Ch1、Ch2,标题分别为“程序设计”、“数据库原理”;然
后画一个文本框,名称为Text1;再画一个命令按钮,名称为C1,标题为
“确定” (如图所示)。请编写适当的事件过程,使得在运行时,选中
复选框并单击“确定”按钮, 就可以按照下表的要求把结果显示在文本
框中。存盘时,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。
注意:
考生不得修改窗体文件中已经存在的程序,退出程序时必须通过单击
窗体右上角的关闭按钮。在结束程序运行之前,必须进行产生下表一个
结果的操作。
3. 综合应用(1小题,计30分)
注意:下面出现的“考生文件夹”均为%USER%
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有二个文本框,名称分
别为Text1、Text2;还有三个命令按钮,名称分别为C1、C2、C3,标题分别
为“输入”、“计算”、“存盘”(如图所示)。并有一个函数过程
isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果
是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运
行时,单击“输入”按钮,就把文件in5.txt中的整数放入Text1中;单击
“计算”按钮,则找出大于Text1中的整数的第1个素数,并显示在Text2中;
单击“存盘”按钮,则把Text2中的计
文档评论(0)