vf题库3(第三大题合集).doc

综合应用1、有表单myform,设为顶层表单,设计菜单mymenu(load),表单-浏览课程/选修课统计 报表-预览报表 退出 一、建立菜单 1. 单击”文件新建”命令项. 2. 在”新建”对话框中选择”菜单”单选钮,再按”新建文件”按钮. 3. 在”新建菜单”对话框中选择”菜单”按钮,在菜单设计器中的”菜单名称”中依次输入”表单”、”报表”和”退出”这三个主菜单项,然后选择”表单”菜单项,在”结果”中选择”子菜单”,单击”创建”按钮,在”菜单设计器”中,输入两个子菜单项”浏览课程”和”浏览选课统计”,选择”报表”菜单项,在”结果”中选择”子菜单”,单击”创建”按钮,在”菜单设计器”中,输入一个子菜单项”预览报表”. 4. 在”浏览课程”子菜单的”结果”选择”过程”并输入命令下列语句 myform.grid1.recordsource=“课程” 5. 在”浏览选课统计”子菜单的”结果”选择”过程”并输入命令下列语句 myform.grid1.recordsource=“sview” 6. 在”预览报表”子菜单的”结果”选择”命令”并输入命令”report form creport preview”. 7. 在”退出”主菜单的”结果”选择”命令”并输入命令”myform.release”. 8. 单击工具栏上”保存”按钮,在弹出”保存”对话框中输入”mymenu”即可. 9. 在”菜单设计器”窗口下,单击”菜单”菜单栏,选择”生成”菜单项,生成”mymenu.mpr”文件. 二、修改表单 1. 输入修改表单命令 MODIFY FORM myform 2. 在”表单设计器”中,在其”属性”的ShowWindow处选择”2-作为顶层表单”,双击”Load Event”,在”Form1.Load”编辑窗口中输入”do mymenu.mpr”,双击”Init Event”,在”myform.Init”编辑窗口中输入”do mymenu.mpr with this ,xxx“,启动菜单命令,双击”Destroy Event,在”myform.Destroy”编辑窗口中输入”release menu xxx extended”,在表单退出时释放菜单.2、正确建立order_detail表并追加记录,根据单价和数量编程修改order_list,记录存放od_mod,总金额升序 close database select 1 use order_list copy stru to tmp select 2 use tmp select 订单号,sum(单价*数量) as aa from order_detail group by 订单号 order by 订单号 into cursor ff sele order_list do while !eof() select ff locate for 订单号=order_list.订单号 if order_list.总金额 aa select order_list scatt to mm select tmp append blank gath from mm replace 总金额 with ff.aa endif select order_list skip enddo select * from tmp order by 总金额 into dbf od_mod3、打开SELLDB数据库,创建标题为部门销售查询,表单名Forml,文件名XS,附图 2标签 2文本框 1表格 2命令按钮 1. 新建表单 CREATE FORM xs 2. 在”表单设计器-xs.scx”中,在”属性”的Caption处输入”部门销售查询”. 3. 在”表单设计器-xs.scx”中,添加两个标签,在第1个标签Label1”属性”的Caption处输入”部门号”,在第2个标签Label1”属性”的Caption处输入”年度”. 4. 在”表单设计器-xs.scx”中,添加两个文本框（Text1和Text2）. 5. 在”表单设计器-xs.scx”中,添加一个表格Grid1,在其”属性”的RecordSourceType处选择”4 - SQL 说明”. 6. 在”表单设计器-xs.scx”中,添加两个命令按钮,在第1个命令按钮”属性”窗口的Caption处输入”查询”,在第2个命令按钮”属性”窗口的Caption处输入”退出”. 7. 在”表单设计器”中,双击”查询”命令按钮,在”Command1.Click”编辑窗口中输入下列语句,接着关闭编辑窗口. X1 = ALLTRIM(ThisForm.Text1.Value) X2 = ALLTRIM(ThisForm.Text2.Value) ThisForm.Grid1.RecordSource = “SELECT 销售表.商品号, 商品名, 一季度利润, 二季度利润, 三季度利润, 四季度利润 ; FROM 销售表 JOIN 商品代码表 ON 销售表.商品号 = 商品代码表.商品号 ; WHERE 部门号 = X1 AND 年度 = X2 INTO CURSOR lsb” SELECT 销售表.商品号, 商品名, 一季度利润, 二季度利润, 三季度利润, 四季度利润 ; FROM 销售表 JOIN 商品代码表 ON 销售表.商品号 = 商品代码表.商品号 ; WHERE 部门号 = X1 AND 年度 = X2 INTO TABLE xs&X1 8. 在”表单设计器”中,双击”退出”命令按钮,在”Command2.Click”编辑窗口中输入”Release Thisform”语句,接着关闭编辑窗口.4、为order_detail增加字段新单价,编程2001年90%,2002年110%,快速报表建report1.frx 1. 增加新字段: ALTER TABLE order_detail ADD COLUMN 新单价 F(10,2) 2. 在prog1.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) 3. 建立”快速报表” (1). 单击”工具向导报表”菜单项,并显示”向导选取”对话框. (2). 在”向导选取”对话框中,选择”报表向导”并单击”确定”按钮,并显示”报表向导”对话框. (3). 在”报表向导”对话框的”步骤1-字段选取”中,首先要选取表”order_detail”,在”数据库和表”列表框中,选择表”order_detail”,接着在”可用字段”列表框中显示表order_detail的所有字段名,并选取指定的字段名至”选定字段”列表框中,单击”完成”按钮. (4). 在”报表向导”对话框的”步骤6-完成”中,单击”完成”按钮,在”另存为”对话框的”保存报表为”中输入报表名”report1”,最后单击”保存”按钮即可.5、建立表单,文件名、表单名为myform_a,标题商品浏览样式如图,商品分类(饮料、调味品、酒类、小家电) 1. 建立表单 CREATE FORM myform_a 2. 在”表单设计器”中,在”属性”的Caption处输入”商品浏览”,在Name处输入”myform_a”. 3. 在”表单设计器”中,添加一个选项按钮组OptionGroup1,在”属性”的ButtonCount处输入”4”,并对其进行编辑,在Option1的Caption处输入”饮料”,在Option2的Caption处输入”调味品”,在Option3的Caption处输入”酒类”,在Option2的Caption处输入”小家电”. 4. 在”表单设计器”中,添加两个命令按钮,在第1个命令按钮”属性”的Caption处输入”退出”,在第2个命令按钮”属性”的Caption处输入”确定”. 5. 在”表单设计器”中,双击”Command1”命令按钮,在”Command1.Click”编辑窗口中输入”Release Thisform”,接着关闭编辑窗口. 6. 在”表单设计器”中,双击”Command2”命令按钮,在”Command2.Click”编辑窗口中输入下列语句,接着关闭编辑窗口. DO CASE CASE THISFORM.OPTIONGROUP1.VALUE=1 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称=“饮料”) CASE THISFORM.OPTIONGROUP1.VALUE=2 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称=“调味品”) CASE THISFORM.OPTIONGROUP1.VALUE=3 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称=“酒类”) CASE THISFORM.OPTIONGROUP1.VALUE=4 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称=“小家电”) ENDCASE6、打开SDB数据库,建标题为查询、文件名为testb的表单,附图,添加学生表,自动居中,1标签,1文本框,1表格,2命令按钮 1. 新建表单 CREATE FORM testb 2. 在”表单设计器”中,在”属性”的Caption处输入”查询”,在AutoCenter处选择”.T. - 真”. 3. 单击”显示数据环境”菜单项,在”打开”对话框中双击表”学生表”,再单击”关闭”来关闭”添加表或视图”对话框. 4. 在”表单设计器-testb.scx”中,添加一个标签Label1,在其”属性”的Caption处输入”学生注册日期”. 5. 在”表单设计器-testb.scx”中,添加一个文本框Text1. 6. 在”表单设计器-testb.scx”中,添加一个表格Grid1,在其”属性”的RecordSourceType处选择”4 - SQL 说明”. 7. 在”表单设计器-testb.scx”中,添加两个命令按钮,在第1个命令按钮”属性”窗口的Caption处输入”查询”,在第2个命令按钮”属性”窗口的Caption处输入”退出”. 8. 在”表单设计器”中,双击”查询”命令按钮,在”Command1.Click”编辑窗口中输入下列语句,接着关闭编辑窗口. ThisForm.Grid1.RecordSource = “SELECT 学号,姓名,年龄,性别,班级,注册日期 FROM 学生表; WHERE 注册日期 = CTOD(ALLTRIM(ThisForm.Text1.Value) ORDER BY 年龄 DESC INTO CURSOR lsb” SELECT 学号,姓名,年龄,性别,班级,注册日期; FROM 学生表; WHERE 注册日期 = CTOD(ALLTRIM(ThisForm.Text1.Value) ORDER BY 年龄 DESC INTO table ls USE TABE ZAP APPEND FROM ls USE 9. 在”表单设计器”中,双击”退出”命令按钮,在”Command2.Click”编辑窗口中输入”Release Thisform”语句,接着关闭编辑窗口.7、建立视图VIEW1,查询每个雇员部门号、部门名、雇员号、姓名、性别、年龄和EMALL设计form2表单,设一个页框,有部门和雇员选项卡,右下角有退出命令按钮 一、建立视图 1. 打开数据库”雇员管理” OPEN DATABASE 雇员管理 2. 单击”工具向导查询”菜单项,并显示”向导选取”对话框. 3. 在”向导选取”对话框中,选择”本地视图向导”并单击”确定”按钮,并显示”本地视图向导”对话框. 4. 在”本地视图向导”对话框的”步骤1-字段选取”中,首先要选取表”雇员”,在”数据库和表”列表框中,选择表”雇员”,接着在”可用字段”列表框中显示表”雇员”的所有字段名,并选定指定的字段名添加到”选定字段”列表框中;选择表”部门”,接着在”可用字段”列表框中显示表”部门”的所有字段名,并选定指定的字段名添加到”选定字段”列表框中,单击”下一步”按钮. 5. 在”本地视图向导”对话框的”步骤2-为表建立关系”中,单击”添加”按钮,再单击”完成”按钮. 5. 在”本地视图向导”对话框的”步骤5-完成”中,单击”完成”按钮. 6. 在”视图名”对话框中,输入视图名”view1”,再单击”确认”按钮,这样视图就生成了. 二、设计表单 1. 在命令窗口中输入建立表单命令 CREATE FORM form2 2. 在”表单设计器”中,在”属性”的Caption处输入”商品销售数据输入”. 3. 在”表单设计器”中,单击鼠标右键,在弹出菜单中选择”数据环境”菜单项,在”添加表或视图”对话框中先选中表”部门”并单击”添加”按钮,接着再单击”选定”框中”视图”的按钮,并单击”添加”按钮,最后接着单击”关闭”按钮关闭”添加表或视图”对话框. 4. 在”表单控件”对话框中选定”页框”控件,在”表单设计器”中建立这个”页框”,选中这个”页框”并单击鼠标右键,在弹出菜单中选择”编辑”菜单项,再单击”Page1”,在其”属性”的Caption处输入”部门”,接着在”数据环境”中选中”部门”表按住不放,再移动鼠标到”页框”的”部门”处,最后松开鼠标;单击”Page2”,在其”属性”的Caption处输入”雇员”,接着在”数据环境”中选中”view1”视图按住不放,再移动鼠标到”页框”的”雇员”处,最后松开鼠标. 5. 在”表单设计器”的右下角,添加一个命令按钮,在”属性”窗口的Caption处输入”退出”,双击”退出”命令按钮,在”Command1.Click”编辑窗口中输入”Release Thisform”,接着关闭编辑窗口.8、建顶层表单myform.scx,创建并添加菜单mymenu,如图,统计和退出访问键为T、R,统计客户号,客户名,合计按合计降序 一、 建立菜单 1. 建立菜单文件 CREATE MENU mymenu 在”新建菜单”对话框中,单击”菜单”按钮. 2. 在”菜单设计器-mymenu.mnx”中,在”菜单名称”中输入”统计(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 tabletwo 4. 选中”退出(R)”子菜单项,在”结果”中选择”过程”并单击”创建”,在”菜单设计器-mymenu.mnx-退出(R) 过程”中输入下列语句: myform.release 5. 单击”显示常规选项”菜单项,在”常规选项”对话框的”顶层菜单”框中打勾,再单击”确定”按钮. 6. 在”菜单设计器”窗口下,单击”菜单”菜单栏,选择”生成”菜单项,生成”mymenu.mpr”文件. 二、建立表单 1. 新建表单 CREATE FORM myform 2. 在”表单设计器”中,在”属性”的Caption处输入”考试”,在ShowWindow处选择”2 - 作为顶层表单”,双击Init Event事件,在Form1.Init中输入”do mymenu.mpr with this,”xxx”“,双击Destroy Event事件,在Form1.Destroy中输入”release menu xxx extended”.9、gnht.dbf是合同管理表,编程统计订货单位数、供货单位数、订货总数,结果填入jieguo.dbf 在文件progzh.prg存放内容如下: select 1 use jieguo select 2 use gnht sum jhsl to asum & 计算订货总数 index on dhdw to aaa uniq count to adhdw & 计算订货单位数 index on ghdw to bbb uniq count to aghdw & 计算供货单位数 use select 1 replace num with adhdw & 把订货单位数存放第1条记录中 skip replace num with aghdw & 把供货单位数存放第2条记录中 skip replace num with asum & 把订货总数存入第3条记录中 list & 显示结果 use10、建立表单stock_form含2表格控件grdStock_name,grdStock_sl,1关闭命令按钮 1. 在命令窗口中输入建立表单命令 CREATE FORM stock_form 2. 在”表单设计器”中,单击鼠标右键,在弹出菜单中选择”数据环境”菜单项,在”打开”对话框中选中表”stock_name”并单击”确定”按钮,再单击”其他”按钮,在”打开”对话框中,选择表”stock_sl”,单击”确定”按钮,在”数据环境设计器”中,按住表”stock_name”字段”股票代码”不放,再移动鼠标至表”stock_sl”处,松开鼠标,在出现的提示信息窗口中,单击”确定”按钮. 3. 按住表”stock_name”,移动鼠标至”表单设计器”,松开鼠标,这样就建立一个grdStock_name表格.按住表”stock_sl”,移动鼠标至”表单设计器”,松开鼠标,这样就建立一个grdStock_sl表格. 4. 在”表单设计器”中添加一个命令按钮,在”属性”窗口的Caption处输入”关闭”. 5. 双击”关闭”命令按钮,在”Command1.Click”编辑窗口中输入”Release Thisform”,接着关闭编辑窗口.11、建立表table3,学号 字 10、姓名 字 6、课程名 字 8、分数 数 5,1.编程查60的,分数升序学号降序 一、建立表文件 CREATE TABLE table3(学号 C(10), 姓名 C(6), 课程名 C(8), 分数 N(5,1) 二、在prog1.prg文件中编写如下程序: clear close all select 0 use table3 dele all pack copy to ttt select 0 use ttt select 0 use xuesheng index on 学号 tag 学号 select 0 use chengji set relation to 学号 into xuesheng go top do while .not.eof() if 数学60 select ttt append blank replace 学号 with xuesheng.学号,姓名 with xuesheng.姓名 replace 课程名 with “数学”,分数 with chengji.数学 select chengji endif if 英语60 select ttt append blank replace 学号 with xuesheng.学号,姓名 with xuesheng.姓名 replace 课程名 with “英语”,分数 with chengji.英语 select chengji endif if 信息技术60 select ttt append blank replace 学号 with xuesheng.学号,姓名 with xuesheng.姓名 replace 课程名 with “信息技术”,分数 with chengji.信息技术 select chengji endif skip enddo select ttt sort on 分数,学号/d to ttt1 select table3 append from ttt1 close all12、打开Ecommerce数据库,生成报表myreport,设计表单myform,4个命令按钮 1. 打开数据库 OPEN DATABASE Ecommerce 2. 在命令窗口中输入建立表单命令 CREATE FORM myform 3. 建立报表 1). 单击”工具向导报表”菜单项,并显示”向导选取”对话框. 2). 在”向导选取”对话框中,选择”报表向导”并单击”确定”按钮,并显示”报表向导”对话框. 3). 在”报表向导”对话框的”步骤1-字段选取”中,首先要选取表”Customer”,在”数据库和表”列表框中,选择表”Customer”,接着在”可用字段”列表框中显示表Customer的所有字段名,并选定所有字段名至”选定字段”列表框中,单击”完成”按钮. 4). 在”报表向导”对话框的”步骤6-完成”中,在”报表标题”文本框中输入”客户信息”,单击”完成”. 4. 在”表单设计器”中,在”属性”的Caption处输入”客户基本信息”,在Name处输入”myform”. 5. 在”表单设计器”中,添加四个命令按钮,在第1个命令按钮”属性”窗口的Caption处输入”女客户信息”,在第2个命令按钮”属性”窗口的Caption处输入”客户购买商品情况”,在第3个命令按钮”属性”窗口的Caption处输入”输出客户信息”,在第4个命令按钮”属性”窗口的Caption处输入”退出”. 6. 双击”女客户信息”按钮,在”Command1.Click”编辑窗口中”select * from customer where 性别 = “女”“ 7. 双击”客户购买商品情况”按钮,在”Command2.Click”编辑窗口中”SELECT * FROM sb_view” 8. 双击”输出客户信息”按钮,在”Command3.Click”编辑窗口中”REPORT FORM myreport PREVIEW” 9. 双击”退出”命令按钮,在”Command4.Click”编辑窗口中输入”ThisForm.Release”,接着关闭编辑窗口.13、创建下拉菜单mymenu,运行会在当前VFP系统菜单末尾追加考试子菜单,如图,创建项目myproject 一、建立菜单 1. 建立菜单文件 CREATE MENU mymenu 在”新建菜单”对话框中,单击”菜单”按钮. 2. 在”菜单设计器-mymenu.mnx”中,在”菜单名称”中输入”考试”,再单击”创建”按钮来子菜单,在”菜单名称”中输入”统计”,再移到下一个菜单项处中输入”返回”. 3. 选”统计”子菜单项,在”结果”中选择”过程”并单击”创建”,在”菜单设计器-mymenu.mnx-统计 过程”中输入下列语句: select year(签订日期) as 年份,month(签订日期) as 月份,sum(金额) as 合计 from orders group by 年份,月份 order by 年份 desc,月份 into table tabletwo 4. 选”返回”子菜单项,在”结果”中选择”过程”并单击”创建”,在”菜单设计器-mymenu.mnx-返回 过程”中输入下列语句: set sysmenu nosave set sysmenu to default 5. 单击”显示常规选项”菜单项,在”常规选项”对话框的”位置”框中选中”追加”单选钮,再单击”确定”按钮. 6. 在”菜单设计器”窗口下,单击”菜单”菜单栏,选择”生成”菜单项,生成”mymenu.mpr”文件. 二、创建项目 1. 新建项目文件 CREATE PROJECT myproject 2. 在”项目设计器-Myproject”中,单击”其他”选项卡并选中”菜单”项,单击”添加”按钮,在”添加”对话框中双击”mymenu.mnx”. 3. 在”项目设计器-Myproject”中,单击”连编”按钮,在”连编选项”对话框中单击”确定”按钮,在”另存为”中输入文件名”myproject”,最后单击”保存”按钮.14、设计mystock的表单,表单的标题为股票持有情况,2文本框2命令按钮 1. 在命令窗口中输入建立表单命令 CREATE FORM mystock 2. 在”表单设计器-mystock.scx”中,在”属性”的Caption处输入”股票持有情况”,在Name处输入”mystock”. 3. 在”表单设计器-mystock.scx”中,添加两个文本框（”Text1”和”Text2”）. 4. 在”表单设计器-mystock.scx”中,添加两个命令按钮,单击第1个命令按钮在”属性”的Caption处输入”查询”,单击第2个命令按钮在”属性”的Caption处输入”退出”. 5. 双击”查询”命令按钮,在”Command1.Click”编辑窗口中输入命令组,接着关闭编辑窗口. pinyin= alltrim(thisform.text1.value) open database stock use stock_name locate for 汉语拼音=pinyin if found() select 持有数量,股票简称 from stock_sl,stock_name ; where 汉语拼音=pinyin and stock_sl.股票代码=stock_name.股票代码; into array a thisform.text1.value=a2 thisform.text2.value=a1 else wait “没有查询到,请重输” window timeout 2 endif6. 双击”退出”命令按钮,在”Command2.Click”编辑窗口中输入”Release Thisform”,接着关闭编辑窗口.15、建立表单,文件名表单名为myform有表格控件,文本控件,命令按钮,运行并计算笔记本和计算机产品部销售额利润 1. 在命令窗口中输入建立表单命令 CREATE FORM myform 2. 在”表单设计器”中,在其”属性”的Name处输入”myform”. 3. 在”表单设计器”中,分别添加一个文本框Text1和表格Grid1. 4. 在”表单设计器”中,添加一个命令按钮Command1,在其命令按钮的”属性”的Caption处输入”确定”. 5. 双击”确定”按钮,在”Command1.Click”编辑窗口中输入下列程序 dn=thisform.text1.value SELECT Sell.年度, SUM(Sell.销售额) 销售额,; SUM(Sell.销售额)- SUM(Sell.工资额) 利润; FROM sell where 部门号 in; (select 部门号 from dept where 部门名=dn); GROUP BY Sell.年度 into dbf &dn thisform.grid1.recordsource=dn16、创建自由表tablethree,姓名 c 6,最高金额 n 6.2,最低金额 n 6.2,平均金额 n 6.2,设计表单formtwo,表格名Gridl,查询统计按钮名Command1如图,运行统计赵小青和吴伟军签单金额 一、建立表文件 CREATE TABLE tablethree(姓名 C(6), 最高金额 N(6,2), 最低金额 N(6,2), 平均金额 N(6,2) 二、建立表单 1. 使用命令建立表单 CREATE FORM formtwo 2. 在”表单设计器”中,在”属性”的Caption处输入”综合应用”. 3. 在”表单设计器”中,添加一个表格控件（Grid1）,在”属性”的RecordSourceType处选择”4 - SQL 说明”,再添加一个文本框（Text1）. 4. 在”表单设计器”中,添加两个命令按钮（Command1和Command2）,单击第1个命令按钮在”属性”的Caption处输入”查询统计”,单击第2个命令按钮在”属性”的Caption处输入”退出”. 5. 双击”查询统计”命令按钮,在”Command1.Click”编辑窗口中输入命令组,接着关闭编辑窗口. set talk off Thisform.Grid1.RecordSource=“select 订单号,金额; from employee join order on Employee.职员号 = Order.职员号; where employee.姓名=alltrim(thisform.text1.value); order by 金额 into cursor lsb” select lsb go top mi=金额 go bottom ma=金额 average 金额 to av select tablethree append blank replace 姓名 with alltrim(thisform.text1.value),最高金额 with ma,最低金额 with mi,平均金额 with av set talk on 6. 双击”退出”命令按钮,在”Command2.Click”编辑窗口中输入”Release Thisform”,并关闭编辑窗口.17、建表单文件名和表单控件名为myform_db,标题为数据浏览和维护,如图,选项按钮组选择职工表或订单表,复选框控件确定是否需要存盘 1. 在命令窗口中输入建立表单命令 CREATE FORM myform_db 2. 在”表单设计器”中,在其”属性”的Name处输入”myform_db”,在Caption处输入”数据浏览和维护”. 3. 在”表单设计器”中,建立”选项按钮组”,并在选定它且单击右键,再选择”编辑”项,接着选定Option1,在其Caption处输入”职工表(employee)”,接着选定Option2,在其Caption处输入”订单表(orders)”, 4. 在”表单设计器”中,建立”复选框”,并在其属性的Caption处输入”存盘”. 5. 在”表单设计器”中,添加两个命令按钮（Command1和Command2）,在第1个命令按钮Command1”属性”窗口的Caption处输入”确定”,在第2个命令按钮Command2”属性”窗口的Caption处输入”退出”. 6. 双击”确定”命令按钮,在”Command1.Click”编辑窗口中输入命令组,接着关闭编辑窗口. IF thisform.optiongroup1.option1.value=1 IF thisform.check1.value=1 SELECT * FROM employee INTO TABLE temp ELSE SELECT * FROM employee ENDIF ELSE IF thisform.check1.value=2 SELECT * FROM orders INTO TABLE temp ELSE SELECT * FROM orders ENDIF ENDIF 7. 双击”退出”命令按钮,在”Command2.Click”编辑窗口中输入”ThisForm.Release”,接着关闭编辑窗口.18、创建下拉式菜单mymenu.mnx,运行菜单时会在当前VFP菜单帮助子菜单前插入考试子菜单,如图,统计以组为单位求订单金额的和. 1. 建立菜单文件 CREATE MENU mymenu 在”新建菜单”对话框中,单击”菜单”按钮. 2. 在”菜单设计器-mymenu.mnx”中,在”菜单名称”中输入”考试”,再单击”创建”按钮来子菜单,在”菜单名称”中输入”统计”,再移到下一个菜单项处中输入”返回”. 3. 选”统计”子菜单项,在”结果”中选择”过程”并单击”创建”,在”菜单设计器-mymenu.mnx-统计 过程”中输入下列语句: close data use employee copy to tmp1 field 组别,姓名 for 职务=“组长” select 组别,sum(金额) as 合计 from orders,employee where orders.职员号=employee.职员号 group by 组别 into cursor tmp2 select tmp2.组别,姓名 as 负责人,合计 from tmp1,tmp2 where tmp1.组别=tmp2.组别 order by 合计 desc into table tabletwo 4. 选”返回”子菜单项,在”结果”中选择”过程”并单击”创建”,在”菜单设计器-mymenu.mnx-统计 过程”中输入下列语句: set sysmenu nosave set sysmenu to default 5. 单击”显示常规选项”菜单项,在”常规选项”对话框的”位置”框中选中”在.之前”单选钮,在后面的列表框选择”帮助”,再单击”确定”按钮. 6. 在”菜单设计器”窗口下,单击”菜单”菜单栏,选择”生成”菜单项,生成”mymenu.mpr”文件.19、基于数据库pdtmng建如图顶层表单,文件名myform.scx,控件名为goods,表单标题为”商品”;1表格控件Grid1,建条形菜单mymenu.mnx,在表单Load事件执行菜单程序mymenu.mpr 一、建立表单 1. 建立表单 CREATE FORM myform 2. 在”表单设计器”中,在其”属性”的Name处输入”goods”,在Caption处输入”商品”,在ShowWindow处选择”2-作为顶层表单”,双击”Load Event”,在”goods.Load”编辑窗口中输入”do mymenu.mpr”. 3. 在”属性”中,双击”Init Event”,在”myform.Init”编辑窗口中输入”do mymenu.mpr with this ,xxx“,启动菜单命令. 4. 在”属性”中,双击”Destroy Event,在”myform.Destroy”编辑窗口中输入”release menu xxx extended”,在表单退出时释放菜单. 5. 在”表单设计器”中,添加一个表格控件Grid1,在其”属性”的 RecordSourceType处选择”4-SQL说明”. 二、建立菜单 1. 单击”文件新建”命令项. 2. 在”新建”对话框中选择”菜单”单选钮,再按”新建文件”按钮. 3. 在”新建菜单”对话框中选择”菜单”按钮,在菜单设计器中的”菜单名称”中依次输入”商品分类”和”退出”这两个主菜单项,然后选择”商品分类”菜单项,在”结果”中选择”子菜单”,单击”创建”按钮,在”菜单设计器”中,输入两个子菜单项”小家电”、”饮料”和”酒类”. 4. 在”小家电”子菜单的”结果”选择”过程”并输入命令下列语句 myform.grid1.recordsource=“select * from products where 分类编码=4001 into cursor lsb” 5. 在”饮料”子菜单的”结果”选择”过程”并输入命令下列语句myform.grid1.recordsource=“select * from products where 分类编码=1001 into cursor lsb” 6. 在”酒类”子菜单的”结果”选择”过程”并输入命令下列语句 myform.grid1.recordsource=“select * from products where 分类编码=3001 into cursor lsb”7. 在”退出”主菜单的”结果”选择”过程”并输入下列命令 myform.release set sysmenu to default 8. 单击”显示/常规选项”,在”常规选项”对话框中选中”顶层表单”. 9. 单击工具栏上”保存”按钮,在弹出”保存”对话框中输入”mymenu”即可. 10. 在”菜单设计器”窗口下,单击”菜单”菜单栏,选择”生成”菜单项,生成”mymenu.mpr”文件.20、打开student数据库,添加表student、score和ourse,建视图viewsc,包括4个字段;建报表,简报式,报表文件名three.frx,打开表单文件three,完成操作,运行表单three,并一定通过生成数据命令按钮产生result.dbf表文件. 第1小题 OPEN DATABASE student ADD TABLE student