中国海洋大学vfp上机答案.docVIP

  1. 1、本文档共4页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
中国海洋大学vfp上机答案

第一题 a=allt(thisform.text1.value) n=this.value do case case n=1 select * from sb where 商品名=a thisform.refresh case n=2 update sb set 单价=出厂单价*1.1 where left(商品号,2)=10 browse case n=3 copy to 商品备份表.dbf case n=4 thisform.release endcase thisform.text1.setfocus 关注 第二题 a=alltrim(thisform.text1.value) b=left(a,2) i=2 do while len(b)len(a) b=alltrim(left(a,i)) c=allt(right(a,len(a)-i)) a=b+c i=i+1 enddo messagebox(a) a= i=1 s=thisform.text1.value do while i=len(thisform.text1.value) t=allt(substr(s,i,1)) a=a+t i=i+1 enddo messagebox(a) 第三题 update 成绩 set 总成绩=计算机+英语+数学 sele avg(计算机) from 成绩 into array q thisform.text1.value=q thisform.refresh 第四题 上一条click事件代码 skip-1 if bof() mand1.enabled=.f. mand2.enabled=.t. endif thisform.refresh 下一条click事件代码 skip+1 if eof() mand2.enabled=.f. mand1.enabled=.t. endif thisform.refresh 第五题 a=val(thisform.text1.value) b=val(thisform.text2.value) cx=select * from student where val(学号) between a and b into cursor cx1 thisform.grid1.recordsource=cx thisform.refresh 第六题 n=this.value do case case n=1 creat table XLDA; (学号 c(6),姓名 c(10),成绩 n(5,1)) insert into XLDA; values (100101,德华,89) insert into XLDA; values (100202,曼玉,90) insert into XLDA; values (100103,学友,88) case n=2 sele * from XLDA order by 成绩 desc case n=3 sele left(学号,4)as 班级,sum(成绩) as 班级总成绩 from XLDA group by 班级 case n=4 sele * from XLDA wher 成绩 between 80 and 89 into table xsda1 endcase 第七题 update score set 学分=iif(物理=60,2,0)+iif(高数=60,3,0)+iif(英语=60,4,0) select * from score order by 学分,学号 desc into table XF 第八题 sele avg(成绩) from CHENGJI group by 学号 into array z thisform.refresh repl XUESHENG.平均分 with z all thisform.refresh sele 学号,姓名,平均分 from xuesheng into dbf pingjun order by 平均分,学号 thisform.refresh 第九题 a=thisform.text1.value thisform.grid1.recordsource=sele * from cj where 姓名=a into cursor aa sele 姓名,max(成绩) as b ,min(成绩) as c ,avg(成绩) as d from cj group by 姓名 where 姓名=a into cursor aaa thisform.text2.value=b thisform.text3.value=c thisform.text4.valu

文档评论(0)

cgtk187 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档