《全国计算机二级vfp上机题内容解析.docx》由会员分享,可在线阅读,更多相关《全国计算机二级vfp上机题内容解析.docx(96页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、综合应用1、有表单myform,设为顶层表单,设计菜单mymenu (load),表单一浏览课程/选修 课统计报表-预览报表退出一、建立菜单1 .单击文件新建”命令项.2 .在”新建”对话框中选择”菜单”单选钮,再按“新建文件”按钮.3 .在”新建菜单”对话框中选择“菜单”按钮,在菜单设计器中的”菜单 名称”中依次输入“表单、”报表”和“退出”这三个主菜单项,然后选择” 表单”菜单项,在”结果中选择“子菜单,单击”创建“按钮,在”菜单设计 器”中,输入两个子菜单项”浏览课程和浏览选课统计,选择“报表”菜 单项,在”结果中选择“子菜单,单击“创建按钮,在”菜单设计器”中, 输入一个子菜单项”预览
2、报表”.4 .在”浏览课程”子菜单的”结果”选择“过程”并输入命令下列语句 myform. gridl. recordsource=课程5 .在浏览选课统计”子菜单的“结果”选择”过程”并输入命令下列语 句 myform. gridl. recordsource= sview”6 .在”预览报表“子菜单的“结果“选择命令”并输入命令 report form creport preview.7 .在“退出”主菜单的”结果“选择“命令”并输入命令 myform. release.8 .单击工具栏上“保存”按钮,在弹出保存”对话框中输入 mymenu” 即可.9 .在”菜单设计器”窗口下,单击“菜单
3、”菜单栏,选择“生成”菜单项,生成 mymenu. mpr文件.二、修改表单1 .输入修改表单命令MODIFY FORM myform2 .在”表单设计器”中,在其属性”的ShowWindow处选择” 2-作为顶层 表单”,双击“ Load Event,在Forml. Load编辑窗 口 中输入do mymenu. mpr, 双击”Init Event,在myform. Init编辑窗口中输入do mymenu. mpr with this , xxxz ,启动菜单命令,双击Destroy Event,在myform. Destroy*5 编 辑窗口中输入release menu xxx ex
4、tended”,在表单退出时释放菜单.2、正确建立order-detail表并追加记录,根据单价和数量编程修改order_list, 记录存放od_mod,总金额升序close databaseselect 1use order-listcopy stru to tmpselect 2use tmpselect 订单号,sum(单价*数量)as aa from order-detail group by 订单 号 order by 订单号 into cursor ffsele order-listdo while !eof ()select fflocate for 订单号=order_lis
5、t.订单号if order-list.总金额 aaselect order-listscatt to mmselect tmpappend blankgath from mmreplace 总金额 with ff. aaend ifselect order-listskipenddoselect from tmp order by 总金额 into dbf od-mod3、打开SELLDB数据库,创建标题为部门销售查询,表单名Forml,文件名XS,附图 2标签2文本框1表格2命令按钮1 .新建表单 CREATE FORM xs2 .在”表单设计器-xs. sex”中,在属性”的Caption
6、处输入”部门销售 查询”.3 .在”表单设计器-xs. sex”中,添加两个标签,在第1个标签Labell”属性” 的Caption处输入“部门号”,在第2个标签Labell”属性”的Caption处输入” 年度” .4 .在表单设计器-xs. sex”中,添加两个文本框(Textl和Text2 ).5 .在”表单设计器-xs. sex”中,添加一个表格Gridl,在其“属性”的 RecordSourceType处选择4 - SQL 说明”.6 .在“表单设计器-xs. sex”中,添加两个命令按钮,在第1个命令按钮”属 性”窗口的Caption处输入”查询”,在第2个命令按钮“属性”窗口的C
7、aption 处输入”退出”.7 .在”表单设计器”中,双击查询”命令按钮,在 Commandl. Click编 辑窗口中输入下列语句,接着关闭编辑窗口.XI = ALLTRIM(ThisForm. Textl. Value)X2 = ALLTRIM (ThisForm. Text2. Value)ThisForm.Gridl. RecordSource = SELECT 销售表.商品号,商品名, 一季度利润,二季度利润,三季度利润,四季度利润;FROM销售表JOIN商品代码表ON销售表.商品号=商品代码表. 商品号;WHERE 部门号=XI AND 年度=X2 INTO CURSOR lsb
8、”SELECT销售表.商品号,商品名,一季度利润,二季度利润,三季度 利润,四季度利润;FROM销售表JOIN商品代码表ON销售表.商品号=商品代码表. 商品号;WHERE 部门号=XI AND 年度=X2 INTO TABLE xs&Xl8 .在”表单设计器”中,双击“退出命令按钮,在 Command?. Click”编 辑窗口中输入 Release Thisform语句,接着关闭编辑窗口.4、为order_detail增加字段新单价,编程2001年90%, 2002年110%,快速报表建 reportl. frx9 .增加新字段:ALTER TABLE order-detail ADD C
9、OLUMN 新单价 F(10, 2)10 在progl.prg文件中的内容是:UPDATE order-detail SET 新单价=单价*0. 9 WHERE 订单号=(SELECT 订单号 FROM order-list WHERE 订单号-order-detail.订单号 AND YEAR (订购 日期)=2001)UPDATE order-detail SET 新单价=单价*1. 1 WHERE 订单号=(SELECT 订单号 FROM order-list where 订单号=order_detail.订单号 AND YEAR(订购 日期)=2002)11 建立”快速报表”(1) .
10、单击工具向导报表”菜单项,并显示”向导选取”对话框.(2) .在”向导选取对话框中,选择”报表向导”并单击”确定按钮,并 显示”报表向导”对话框.(3) .在”报表向导”对话框的步骤1-字段选取”中,首先要选取表” order-detail,在”数据库和表”列表框中,选择表 order-detail,接着在” 可用字段”列表框中显示表。rder_detail的所有字段名,并选取指定的字段名 至”选定字段”列表框中,单击”完成按钮.(4) .在”报表向导”对话框的”步骤6-完成中,单击“完成按钮,在” 另存为”对话框的”保存报表为中输入报表名 reports ,最后单击“保存” 按钮即可.5、建
11、立表单,文件名、表单名为myfornua,标题商品浏览样式如图,商品分类(饮 料、调味品、酒类、小家电)1 .建立表单CREATE FORM myform.a2 .在”表单设计器”中,在“属性”的Caption处输入”商品浏览,在Name 处输入myform_a.3 .在”表单设计器”中,添加一个选项按钮组OptionGroupl,在“属性”的 ButtonCount处输入“ 4,并对其进行编辑,在Optionl的Caption处输入饮料,在Option2的Caption处输入调味品“,在0ption3的Caption处输入酒类,在0ption2的Caption处输入“小家电”.4 .在”表单
12、设计器”中,添加两个命令按钮,在第1个命令按钮”属性”的 Caption处输入退出”,在第2个命令按钮属性”的Caption处输入”确定”.5 .在”表单设计器“中,双击 Commands 命令按钮,在 Command 1. Click 编辑窗口中输入 Release Thisform”,接着关闭编辑窗口.6 .在”表单设计器”中,双击 Command2”命令按钮,在 Command!. Click 编辑窗口中输入下列语句,接着关闭编辑窗口.DO CASECASE THISFORM. OPTIONGROUP1. VALUE=1SELECT * FROM商品WHERE分类编码=人期(SELECT
13、分类编码FROM 分类WHERE分类名称=“饮料”)CASE THISFORM. OPTIONGROUP1. VALUE=2SELECT * FROM商品WHERE分类编码=A期(SELECT分类编码FROM 分类WHERE分类名称=调味品”)CASE THISFORM. OPTIONGROUP1. VALUE=3SELECT * FROM商品WHERE分类编码=人期(SELECT分类编码FROM 分类WHERE分类名称=“酒类”)CASE THISFORM. OPTIONGROUP1. VALUE=4SELECT * FROM商品WHERE分类编码=人W(SELECT分类编码FROM 分类W
14、HERE分类名称=“小家电”)ENDCASE 6、打开SDB数据库,建标题为查询、文件名为testb的表单,附图,添加学生表,自动居中,1标签,1文本框,1表格,2命令按钮1 .新建表单CREATE FORM testb2 .在”表单设计器”中,在“属性”的Caption处输入”查询”,在AutoCenter 处选择” .T. -真”.3 .单击”显示数据环境”菜单项,在”打开”对话框中双击表“学生表”, 再单击“关闭”来关闭”添加表或视图”对话框.4 .在表单设计器-testb. sex”中,添加一个标签Labell,在其属性的 Caption处输入”学生注册日期”.5 .在表单设计器-te
15、stb. sex”中,添加一个文本框Textl.6 .在”表单设计器-testb. sex”中,添加一个表格Gridl,在其“属性”的 RecordSourceType处选择4 - SQL 说明”.7 .在“表单设计器-testb. sex”中,添加两个命令按钮,在第1个命令按钮” 属性”窗口的Caption处输入”查询”,在第2个命令按钮“属性”窗口的Caption 处输入”退出”.8 .在”表单设计器”中,双击查询”命令按钮,在 Commandl. Click编 辑窗口中输入下列语句,接着关闭编辑窗口.ThisForm. Gridl. RecordSource = SELECT 学号,姓名
16、,年龄,性别,班级, 注册日期FROM学生表;WHERE 注册日期=CTOD(ALLTRIM(ThisForm. Textl. Value) ORDER BY 年龄 DESC INTO CURSOR lsb*SELECT学号,姓名,年龄,性别,班级,注册日期;FROM学生表;WHERE 注册日期=CTOD(ALLTRIM(ThisForm. Textl. Value) ORDERBY 年龄 DESC INTO table IsUSE TABEZAPAPPEND FROM IsUSE9 .在”表单设计器”中,双击退出命令按钮,在 Command2. Click编 辑窗口中输入 Release T
17、hisform语句,接着关闭编辑窗口.7、建立视图VIEW1,查询每个雇员部门号、部门名、雇员号、姓名、性别、年龄 和EMALL设计form2表单,设一个页框,有部门和雇员选项卡,右下角有退出命令按钮 一、建立视图1 .打开数据库”雇员管理 OPEN DATABASE雇员管理2 .单击工具向导查询”菜单项,并显示”向导选取”对话框.3 .在“向导选取对话框中,选择”本地视图向导”并单击”确定”按钮, 并显示”本地视图向导”对话框.4 .在”本地视图向导”对话框的步骤1-字段选取”中,首先要选取表” 雇员”,在”数据库和表”列表框中,选择表“雇员“,接着在“可用字段”列表 框中显示表“雇员”的所
18、有字段名,并选定指定的字段名添加到”选定字段”列 表框中;选择表部门”,接着在“可用字段”列表框中显示表“部门”的所有 字段名,并选定指定的字段名添加到“选定字段”列表框中,单击“下一步”按 钮.5 .在”本地视图向导”对话框的”步骤2-为表建立关系”中,单击“添加”按钮,再单击“完成按钮.6 .在”本地视图向导”对话框的”步骤5-完成中,单击“完成按钮.7 .在“视图名”对话框中,输入视图名 viewl,再单击“确认按钮,这 样视图就生成了.二、设计表单1 .在命令窗口中输入建立表单命令CREATE FORM form22 .在”表单设计器”中,在属性”的Caption处输入”商品销售数据输
19、入”.3 .在”表单设计器”中,单击鼠标右键,在弹出菜单中选择“数据环境”菜 单项,在”添加表或视图”对话框中先选中表“部门”并单击”添加按钮,接 着再单击”选定”框中”视图”的按钮,并单击”添加”按钮,最后接着单击” 关闭”按钮关闭”添加表或视图”对话框.4 .在”表单控件”对话框中选定”页框“控件,在”表单设计器”中建立 这个“页框”,选中这个“页框”并单击鼠标右键,在弹出菜单中选择”编辑” 菜单项,再单击 Pagel,在其属性”的Caption处输入部门”,接着在”数 据环境”中选中”部门”表按住不放,再移动鼠标到”页框的”部门”处,最 后松开鼠标;单击” Page2,在其“属性”的Ca
20、ption处输入雇员,接着在” 数据环境中选中 viewl”视图按住不放,再移动鼠标到”页框的“雇员” 处,最后松开鼠标.5 .在”表单设计器”的右下角,添加一个命令按钮,在“属性”窗口的Caption 处输入“退出“,双击“退出命令按钮,在 Commandl. Click编辑窗口中输 入 Release Thisform”,接着关闭编辑窗口.8、建顶层表单myform. sex,创建并添加菜单mymenu,如图,统计和退出访问键为T、R,统计客户号,客户名,合计按合计降序一、建立菜单1 .建立菜单文件 CREATE MENU mymenu在“新建菜单”对话框中,单击“菜单”按钮.2 .在”菜
21、单设计器-mymenu. nmx”中,在”菜单名称中输入统计(T)”, 再移到下一个菜单项处中输入”退出(R)” .3 .选中”统计(T)”菜单项,在”结果中选择“过程”并单击”创建”, 在“菜单设计器-mymenu. mnx-统计(T)过程”中输入下列语句:select customer.客户号,客户名,sum(金额)as合计from orders, customer where orders.客户-=customer.客户号 group by customer. 客户号 order by 合计 desc into table tabletwo4 .选中退出(R)”子菜单项,在“结果中选择”
22、过程“并单击“创建”, 在“菜单设计器-mymenu. mnx-退出(R)过程”中输入下列语句: myform. release5 .单击显示常规选项”菜单项,在”常规选项”对话框的“顶层菜单” 框中打勾,再单击确定”按钮.6 .在”菜单设计器”窗口下,单击”菜单”菜单栏,选择“生成”菜单项, 生成mymenu. mpr”文件.二、建立表单1 .新建表单CREATE FORM myform2 .在”表单设计器”中,在“属性”的Caption处输入”考试,在ShowWindow 处选择” 2 -作为顶层表单”,双击Init Event事件,在Forml.Init中输入 do mymenu. mp
23、r with this, xxx”,双击 Destroy Event 事件,在 Forml. Destroy 中输入release menu xxx extended .9、gnht.dbf是合同管理表,编程统计订货单位数、供货单位数、订货总数,结果填入jieguo. dbf在文件progzh. prg存放内容如下:select 1use jieguoselect 2use gnhtsum jhsl to a sum&计算订货总数index on dhdw to aaa uniqcount to adhdw&计算订货单位数index on ghdw to bbb uniqcount to ag
24、hdw&计算供货单位数useselect 1replace num with adhdw &把订货单位数存放第1条记录中 skipreplace num with aghdw &把供货单位数存放第2条记录中 skipreplace num with a sum &把订货总数存入第3条记录中 list &显示结果use10、建立表单stock-form含2表格控件grdStock_name, grdStock_sl, 1 关闭命令 按钮1.在命令窗口中输入建立表单命令CREATE FORM stock.form2 .在”表单设计器”中,单击鼠标右键,在弹出菜单中选择“数据环境”菜 单项,在”打开
25、”对话框中选中表 stock.namew并单击“确定按钮,再单击”其他按钮,在“打开”对话框中,选择表 stock_sl”,单击确定“按钮,在” 数据环境设计器”中,按住表 stock-name字段股票代码”不放,再移动鼠 标至表 stock.sT处,松开鼠标,在出现的提示信息窗口中,单击”确定”按钮.3 .按住表 stock_name”,移动鼠标至”表单设计器”,松开鼠标,这样就 建立一个grdStock_name表格.按住表stock_sl”,移动鼠标至“表单设计器”, 松开鼠标,这样就建立一个grdStock_sl表格.4 .在”表单设计器”中添加一个命令按钮,在属性”窗口的Captio
26、n处输 入”关闭”.5 .双击“关闭”命令按钮,在“ Command 1. Click”编辑窗口中输入 Release Thisform”,接着关闭编辑窗口.11、建立表table3,学号 字10、姓名 字6、课程名 字8、分数数5,1.编程 查60的,分数升序学号降序一、建立表文件 CREATE TABLE table3(学号 C(10),姓名 C(6), 课程名C(8),分数N(5,l)二、在progl. prg文件中编写如下程序:clearclose allselect 0use table3dele all packcopy to tttselect 0use tttselect 0u
27、se xueshengindex on学号tag学号select 0use chengjiset relation to 学号 into xueshenggo topdo while . not. eof ()if数学60select tttappend blankreplace 学号 with xuesheng.学号,姓名 with xuesheng.姓名 replace课程名with “数学,分数with chengji.数学select chengjiend ifif英语60select tttappend blankreplace 学号 with xuesheng.学号,姓名 with
28、 xuesheng.姓名 replace课程名with 英语,分数with chengji.英语select chengjiend ifif信息技术60 select ttt append blank replace 学号 with xuesheng.学号,姓名 with xuesheng.姓名 replace课程名with 信息技术,分数withchengji.信息技术select chengjiend ifskipenddoselect tttsort on 分数,学号/d to tttlselect table3append from tttlclose all12、打开Ecommerc
29、e数据库,生成报表myreport,设计表单myform, 4个命令按钮1 .打开数据库OPEN DATABASE Ecommerce2 .在命令窗口中输入建立表单命令CREATE FORM myform3 .建立报表1) .单击工具向导报表”菜单项,并显示“向导选取”对话框.2) .在”向导选取对话框中,选择”报表向导”并单击”确定”按钮,并显示”报表向导”对话框.3) .在”报表向导”对话框的步骤1-字段选取”中,首先要选取表” Customer,在”数据库和表”列表框中,选择表 Customer,接着在可用字 段”列表框中显示表Customer的所有字段名,并选定所有字段名至“选定字段”
30、 列表框中,单击”完成按钮.4) .在“报表向导”对话框的”步骤6-完成中,在”报表标题”文本 框中输入“客户信息“,单击“完成”.4 .在”表单设计器”中,在属性”的Caption处输入”客户基本信息”, 在Name处输入myform .5 .在”表单设计器”中,添加四个命令按钮,在第1个命令按钮“属性”窗 口的Caption处输入女客户信息”,在第2个命令按钮“属性”窗口的Caption 处输入”客户购买商品情况”,在第3个命令按钮属性”窗口的Caption处输入” 输出客户信息”,在第4个命令按钮属性”窗口的Caption处输入”退出”.6 .双击”女客户信息”按钮,在“ Command
31、l.Click”编辑窗口中 select * from customer where 性别= 女” 7 .双击”客户购买商品情况”按钮,在 Command?. Click”编辑窗口中” SELECT FROM sb_vieww8 .双击”输出客户信息”按钮,在 Command3. Click”编辑窗口中 REPORT FORM myreport PREVIEW559 .双击“退出命令按钮,在 Command/Click”编辑窗口中输入” ThisForm. Release,接着关闭编辑窗口.13、创建下拉菜单mymenu,运行会在当前VFP系统菜单末尾追加考试子菜单,如图, 创建项目mypro
32、ject一、建立菜单1 .建立菜单文件CREATE MENU mymenu在新建菜单”对话框中,单击”菜单”按钮.2 .在“菜单设计器-mymenu. mnx”中,在“菜单名称“中输入考试,再 单击“创建按钮来子菜单,在“菜单名称中输入“统计”,再移到下一个菜 单项处中输入返回”.3 .选”统计”子菜单项,在“结果中选择“过程并单击“创建“,在” 菜单设计器-mymenu. mnx-统计过程”中输入下列语句:select year (签订日期)as年份,month (签订日期)as月份,sum(金额) as 合计 from orders group by 年份,月份 order by 年份 d
33、esc,月份 into table tabletwo4 .选”返回”子菜单项,在“结果中选择“过程”并单击“创建“,在” 菜单设计器-mymenu. mnx-返回过程”中输入下列语句:set sysmenu nosaveset sysmenu to default5 .单击显示常规选项”菜单项,在“常规选项”对话框的”位置”框中 选中“追加“单选钮,再单击确定”按钮.6 .在”菜单设计器”窗口下,单击”菜单”菜单栏,选择“生成”菜单项, 生成mymenu. mpr”文件.二、创建项目1 .新建项目文件 CREATE PROJECT myproject2 .在项目设计器-Myproject”中,
34、单击“其他”选项卡并选中“菜单”项,单击添加按钮,在添加”对话框中双击mymenu. mnx” .3 .在”项目设计器-Myproject”中,单击”连编“按钮,在“连编选项”对 话框中单击“确定”按钮,在“另存为”中输入文件名 myproject,最后单击” 保存”按钮.14、设计mystock的表单,表单的标题为股票持有情况,2文本框2命令按钮1 .在命令窗口中输入建立表单命令CREATE FORM mystock2 .在表单设计器-mystock. sex”中,在属性的Caption处输入”股票 持有情况”,在Name处输入mystock.3 .在“表单设计器-mystock. sex”
35、中,添加两个文本框(Textl*和” Text2).4 .在“表单设计器-mystock. sex”中,添加两个命令按钮,单击第1个命令 按钮在“属性”的Caption处输入查询”,单击第2个命令按钮在属性”的Caption 处输入”退出”.5 .双击“查询”命令按钮,在 Commandl.Click编辑窗口中输入命令组, 接着关闭编辑窗口.pinyin= alltrim(thisform. textl. value)open database stockuse stock-namelocate for 汉语拼if found ()select 持有数量,股票简称 from stock.sl,
36、 stock-name ;where 汉语拼音=pinyin and stock_sl.股票代码=$1:0-皿1110.股票代码;into array a thisform. textl. value=a 2thisform. text2. value=a 1elsewait “没有查询到,请重输window timeout 2end if6 .双击退出命令按钮,在 Command2. Click编辑窗口中输入 Release Thisform”,接着关闭编辑窗口.15、建立表单,文件名表单名为myform有表格控件,文本控件,命令按钮,运行并 计算笔记本和计算机产品部销售额利润1 .在命令窗
37、口中输入建立表单命令CREATE FORM myform2 .在”表单设计器”中,在其属性”的Name处输入 myform .3 .在”表单设计器”中,分别添加一个文本框Textl和表格Gridl.4 .在”表单设计器”中,添加一个命令按钮Commandl,在其命令按钮的”属 性”的Caption处输入”确定”.5 .双击“确定“按钮,在 Commandl. Click编辑窗口中输入下列程序 dn=thisform. textl. value SELECT Sell.年度,SUM(Sell.销售额)销售额,;SUM (Sell.销售额)-SUM (Sell.工资额)利润;FROM sell w
38、here 部门号 in;(select 部门号 from dept where 部门名=dn);GROUP BY Sell.年度 into dbf &dnthisform. gridl. recordsource=dn 16、创建自由表tablethree,姓名c 6,最高金额n 6. 2,最低金额n 6. 2,平均 金额n 6. 2,设计表单formtwo,表格名Gridl,查询统计按钮名Commandl如图,运行统计赵 小青和吴伟军签单金额一、建立表文件 CREATE TABLE tablethree (姓名C (6),最高金额 N(6,2),最低金额N(6,2),平均金额N(6,2)二、
39、建立表单1 .使用命令建立表单CREATE FORM formtwo2 .在”表单设计器”中,在“属性”的Caption处输入”综合应用”.3 .在”表单设计器”中,添加一个表格控件(Gridl),在“属性”的 RecordSourceType处选择4 - SQL说明”,再添加一个文本框(Textl).4 .在表单设计器”中,添加两个命令按钮(Commandl和Command2 ),单击 第1个命令按钮在“属性”的Caption处输入”查询统计”,单击第2个命令按钮 在“属性”的Caption处输入”退出”.5 .双击“查询统计命令按钮,在 Commandl. Click”编辑窗口中输入命 令
40、组,接着关闭编辑窗口.set talk offThisform. Gridl. RecordSource= select 订单号,金额;from employee join order on Employee.职员号=Order.职员号; where employee.姓名=a 11 trim(thisform. textl. value);order by 金额 into cursor Isb”select Isbgo top1111=金额go bottomma=金额average 金额 to avselect tablethreeappend blankreplace 姓名 with al
41、ltrim(thisfonn. textl. value),最高金额 with ma,最低金额with mi,平均金额with avset talk on6 .双击“退出”命令按钮,在“ Command2. Click编辑窗口中输入 Release Thisform”,并关闭编辑窗口.17、建表单文件名和表单控件名为myform_db,标题为数据浏览和维护,如图,选 项按钮组选择职工表或订单表,复选框控件确定是否需要存盘7 .在命令窗口中输入建立表单命令CREATE FORM myform.db8 .在”表单设计器”中,在其属性”的Name处输入 myform_dbn,在Capt ion 处输
42、入”数据浏览和维护”.9 .在”表单设计器”中,建立选项按钮组”,并在选定它且单击右键,再 选择“编辑”项,接着选定Option在其Caption处输入”职工表(employee)”, 接着选定0ption2,在其Caption处输入”订单表(orders) ”,10 在”表单设计器”中,建立”复选框”,并在其属性的Caption处输入” 存盘” .11 在“表单设计器“中,添加两个命令按钮(Commandl和Command2 ),在第 1个命令按钮Commandl”属性”窗口的Caption处输入“确定”,在第2个命令按 钮Command2”属性”窗口的Caption处输入”退出”.12 双
43、击”确定命令按钮,在 Commandl.Click”编辑窗口中输入命令组, 接着关闭编辑窗口.IF thisform. optiongroupl. optionl. value=lIF thisform. checkl. value=lSELECT * FROM employee INTO TABLE tempELSESELECT FROM employeeENDIFELSEIF thisform. checkl. value=2SELECT * FROM orders INTO TABLE tempELSESELECT * FROM ordersENDIFENDIF13 双击“退出命令按钮,
44、在 Command2. Click编辑窗口中输入” ThisForm. Release”,接着关闭编辑窗口.18、创建下拉式菜单mymenu. mnx,运行菜单时会在当前VFP菜单帮助子菜单前插 入考试子菜单,如图,统计以组为单位求订单金额的和.1 .建立菜单文件 CREATE MENU mymenu在“新建菜单”对话框中,单击“菜单”按钮.2 .在“菜单设计器-mymenu. mnx”中,在“菜单名称“中输入“考试,再 单击”创建按钮来子菜单,在“菜单名称“中输入“统计”,再移到下一个菜 单项处中输入返回”.3 .选”统计”子菜单项,在”结果中选择“过程并单击“创建“,在” 菜单设计器-my
45、menu. mnx-统计过程”中输入下列语句:close datause employeecopy to tmpl field组别,姓名for职务=组长”select 组别,sum(金额)as 合计 from orders, employee where orders.职员号=employee.职员号 group by 组别 into cursor tmp2select tmp2.组别,姓名 as 负责人,合计 from tmpl, tmp2 where tmpl.组别=tmp2.组别 order by 合计 desc into table tabletwo4 .选”返回”子菜单项,在“结果中
46、选择“过程”并单击“创建“,在” 菜单设计器-mymenu. mnx-统计过程”中输入下列语句:set sysmenu nosaveset sysmenu to default5 .单击显示常规选项”菜单项,在”常规选项”对话框的”位置”框中 选中”在.之前”单选钮,在后面的列表框选择“帮助”,再单击确定”按钮.6 .在”菜单设计器”窗口下,单击”菜单”菜单栏,选择“生成”菜单项, 生成mymenu. mprn 文件.19、基于数据库pdtmng建如图顶层表单,文件名myform. sex,控件名为goods,表 单标题为商品;1表格控件Gridl,建条形菜单mymenu. mnx,在表单Load事件执 行菜单程序mymenu. mpr一、建立表单1 .建立表单 CREATE FORM myform2 .在”表单设计器”中,在其“属性”的Name处输入 goods,在Caption 处输入“商品,在ShowWindow处选择” 2-作为顶层表单,双击 Load Event”, 在goods. Loadw 编辑窗口中输入do mymenu. mprw .3 .在“属性“中,双击 Init