欢迎来到天天文库
浏览记录
ID:6379601
大小:141.50 KB
页数:18页
时间:2018-01-12
《vfp79套上机试卷答案》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、1三菜单计算项SETTALKOFFOPENDATABASEXUESHENG3SELECTCj.学号,Xs.班级,Xs.姓名,Cj.课程名,Cj.成绩;FROMxuesheng3!xsINNERJOINxuesheng3!cj;ONXs.学号=Cj.学号;WHERECj.课程名='计算机';ORDERBYCj.成绩DESC;INTOARRAYAFieldsValueDELETEFROMCJBINSERTINTOCJBFROMARRAYAFieldsValueCLOSEALLUSECJBPACKUSESETTALKON2三菜单统计项SETTALKOFFSETSAFETYOFFO
2、PENDATABASEck3.dbcUSECKSELECT*FROMCKWHERE仓库号NOTIN;(SELECT仓库号FROMZGWHERE工资<=1220);AND仓库号IN(SELECT仓库号FROMZG);ORDERBY面积;INTOTABLEwh1.dbfCLOSEALLSETSAFETYONSETTALKON3三菜单统计项settalkoffopenDATABASEWAGE3.DBCSELECT仓库号,AVG(工资)ASAvgGZFROMZG;GROUPBY仓库号INTOCURSORCurTableSELECTZG.*FROMZG,CurTable;WHEREZ
3、G.仓库号=CurTable.仓库号ANDZG.工资1230;ANDGys.地址="北京";ORDERBYDgd.总金额DESC;INTOTABLEord1
4、CLOSEDATABASESETTALKON5三菜单查询项SETTALKOFFOPENDATABASEGZ3SELECTDISTINCZg.职工号,Zg.工资;FROMgz3!zgINNERJOINgz3!dgd;ONZg.职工号=Dgd.职工号;WHEREDgd.供应商号IN;("S7","S4","S6");GROUPBYZg.职工号HAVINGCOUNT(DISTINCT供应商号)=3;ORDERBYZg.工资DESC;INTOARRAYTEMPINSERTINTOGJ3FROMARRAYTEMPCLOSEDATABASESETTALKON6菜单查询SETTALKOF
5、FSETSAFETYOFFSELECT姓名,年龄,处方号,药名,生产厂;FROMyisheng,yao,chufang;WHERECHUFANG.药编号=YAO.药编号ANDCHUFANG.职工号=YISHENG.职工号AND药名IN("感冒");ORDERBY处方号;INTOTABLEJG9SELECT*FROMJG9GROUPBY姓名INTOCURSORCurTableCOUNTTOJINSERTINTOJG9(处方号)VALUES(J)SETSAFETYONSETTALKON7三表单计算settalkoff18opendatabooksupdatescoreset学分
6、=0updatescoreset学分=学分+2where物理>=60updatescoreset学分=学分+3where高数>=60updatescoreset学分=学分+4where英语>=60sele*fromscoreorderby学分,学号descintotablexf.dbfsettalkon8三菜单计算SETTALKOFFSETSAFETYOFFOPENDATASTOCK&&打开数据库文件SELECT股票代码,(买入价-现价)*持有数量AS浮亏金额;FROMSTOCK_SL;WHERE买入价>现价;INTOARRAYAFieldsValue&&将满足条件的信息写
7、入变量数组AFieldsValue中SETDELETEDONDELETEFROMSTOCK_FK&&删除STOCK_FK中的所有记录INSERTINTOSTOCK_FKFROMARRAYAFieldsValue&&将得到的满足条件的记录写入STOCK_FK中SELECTSUM(浮亏金额)FROMSTOCK_FKINTOARRAYAFieldsValue&&得到浮亏金额的总计CREATETABLESTOCK_Z(浮亏金额N(11,2))&&创建表STOCK_ZINSERTINTOSTOCK_ZFROMARRAYAFi
此文档下载收益归作者所有