国二33次题目备份答案.doc

1011021031041051062.在表格的属性中设置Recordsourcetype=3-查询Recordsource：chaxun.qpr注意：如果要求在命令中设置，那么代码如下：thisform.grid1.recordsource=chaxun.qpr107108109二1.UPDATE TABA SET NOTE=无实数解 WHERE (B*B-4*A*C)=0UPDATE TABA SET X2=(-B-SQRT(B*B-4*A*C)/2*A WHERE (B*B-4*A*C)=01101124.SELECT *; FROM 歌手表; WHERE 歌手表.歌手出生地 =alltrim(bo1.value); INTO TABLE birthplace.dbf1131146.在表格的init事件中设置代码如下：This.recordsource=”result.dbf”或Thisform.gird1. recordsource=”result.dbf”注意：如果recordsourcetype=0-表那么recordsource要设置成表名，这个表必须是表单运行时已经存在的表115116117118119120121123CLOSE DBFPRIVATE no,moneyUSE scust*下面的一行语句有错误SELECT 顾客号,SUM(数量*单价) 应付款 ;FROM order JOIN comm ON order.商品号 = comm.商品号 ;GROUP BY 顾客号 ;INTO CURSOR lsSELECT scust*下面的一行语句有错误DO WHILE NOT EOF() no = 顾客号 SELECT ls LOCAT FOR 顾客号 = no money = 应付款 SELECT scust *下面的一行语句有错误 REPLACE ALL 应付款 WITH money SKIP +1ENDDOCLOSE TABLERETURN125126127128129130A1=THISFORM.PAGEFRAME1.PAGE1.COMBO1.VALUEDO CASE CASE THISFORM.PAGEFRAME1.PAGE2.OPTIONGROUP1.VALUE=1 SELECT 学院表.系名, 学院表.系号, AVG(教师表.工资) 平均工资; FROM 学院表 INNER JOIN 教师表 ; ON 学院表.系号 = 教师表.系号; WHERE 学院表.系名 =A1; INTO TABLE salary.dbf CASE THISFORM.PAGEFRAME1.PAGE2.OPTIONGROUP1.VALUE=2 SELECT 学院表.系名, 学院表.系号, SUM(教师表.工资) 总工资; FROM 学院表 INNER JOIN 教师表 ; ON 学院表.系号 = 教师表.系号; WHERE 学院表.系名 =A1; INTO TABLE salary.dbfENDCASE201（1） 把TEXT1的VALUE属性设置为：，将文本框设置为日期型查询的CLICK事件代码如下：SELECT 结帐表.顾客序号, 结帐表.顾客姓名, 结帐表.单位, 结帐表.消费金额; FROM 点菜!结帐表; WHERE 结帐表.结帐日期 =THISFORM.TEXT1.VALUE; INTO TABLE tabc.dbf（2） 显示的CLICK事件代码如下：THISFORM.GRID1.RECORDSOURCE=SELECT * FROM TABC INTO CURSOR TMP202203204205206207208209表格的recordsourcetype=4-sqlThisform.grid1.recordsource=”select into cursor tmp”1) 属性value设置为=date( )2）3）* 下面代码的功能首先将年份设置为用4位数字表示，然后根据文本框Text1的值构建SQL语句，并设置表格Grid1的相关属性。* 修改所有* FOUND *下面的一条语句。* 不能修改其他语句。不能增加语句，也不能删除语句。* FOUND * set century on* FOUND * va=thisform.text1.valuest=select 订单号,签订日期,金额 from orders where 签订日期=va order by 签订日期 into cursor tmp* FOUND * thisform.grid1.recordSource=st211212213214215在“确定”的click事件代码如下：a1=alltrim(thisform.text1.value)SELECT Sell.年度, sum(Sell.销售额) 销售额,; sum(Sell.销售额)-sum(Sell.工资额) 利润; FROM test_db!dept INNER JOIN test_db!sell ; ON Dept.部门号 = Sell.部门号; WHERE Dept.部门名 =a1; GROUP BY Sell.年度; ORDER BY Sell.年度; INTO TABLE &a1 thisform.grid1.recordsource=&a1216217218219220221222223224225226227228将表格控件的recordsourcetype设置为4-sqlthisform.grid1.recordsource=SELECT Student.学号, Student.姓名, Student.院系, Course.课程名称,; 成绩; FROM student JOIN score; JOIN course ; ON Score.课程编号 = Course.课程编号 ; ON Student.学号 = Score.学号; ORDER BY Student.学号; INTO TABLE results.dbf229二1.*在下一行添加一条打开customer表的语句, 然后把（此处空行）删除u