[IT认证]31次考试20100327vfp考题备份.docVIP

101 退出: myform。Release Clear event 菜单的“常规选项”中设置“顶层表单” 表单的”showwindow”属性中设：2-作为顶层表单 在表单的”init”事件中：do mymenu.mpr with this,”xxx” 在表单的”destroy”事件中:release menu xxx extended “计算”按钮的click事件中： use orders go top do while not eof() yy=订单号 SELECT sum( Orderitems.数量* Goods.单价); FROM orderitems INNER JOIN goods ; ON Orderitems.商品号 = Goods.商品号; WHERE Orderitems.订单号 = yy into array zz repl 总金额 with zz(1) skip enddo use 填入： 102 三、rowsourcetype=5-数组 Rowsource：x(3) 在form1的init事件中定义数组 dimension x(3) x(1)=s1 x(2)=s2 x(3)=s3 “统计”的click事件代码 SELECT sum(使用零件.数量*零件信息.单价); FROM 使用零件 INNER JOIN 零件信息 ; ON 使用零件.零件号 = 零件信息.零件号; WHERE 使用零件.项目号 =bo1.value; into array a thisform.text1.value=a(1) 103 命令：返回系统菜单：set sysmenu to default 104 Enabled 为 t 105 表格控件用于显示查询结果-表格的recordsourcetype属性设置为4-sql 在“查询”按钮的click事件的代码中： A1=”xs”+thisform.text1.value thisform.grid1.recordsource=SELECT 商品代码表.*,一季度利润,二季度利润,; 三季度利润, 四季度利润; FROM 商品代码表 JOIN 销售表 ; ON 商品代码表.商品号 = 销售表.商品号; WHERE 部门号 =thisform.text1.value; AND 年度 =thisform.text2.value; into table a1 106 水平分组线？加一条\- 4、Insert into 表名 value 字段 将rowsourcetype设置为3-sql 在rowsource属性中写命令 Select 国家名称 from 国家 Count(*) as 奖牌总数 four.prg SELECT 国家.国家名称, count(*) 奖牌总数; FROM 国家 INNER JOIN 获奖牌情况 ; ON 国家.国家代码 = 获奖牌情况.国家代码; GROUP BY 国家.国家名称; ORDER BY 2 DESC, 国家.国家名称 2.”生成表”按钮的click事件代码为： Do four 3.“浏览报表”按钮的click事件代码为： report form sport_report preview 107 Set sysmenu nosave 统计 的click事件的代码 do case case thisform.myoption.value=1 SELECT Currency_sl.姓名, Currency_sl.持有数量; FROM currency_sl INNER JOIN rate_exchange ; ON Currency_sl.外币代码 = Rate_exchange.外币代码; WHERE Rate_exchange.外币名称 = 日元; INTO TABLE rate_ry.dbf case thisform.myoption.value=2 SELECT Currency_sl.姓名, Currency_sl.持有数量; FROM currency_sl INNER JOIN rate_exchange ; ON Currency_sl.外币代码 = Rate_exchange.外币代码; WHERE Rate_exchange.外币名称 = 美元; INTO TABLE rate_my.dbf case thisform.myoption.value=3 SELECT Currency_sl.姓名, Currency_sl.持有数量; FROM c