欢迎来到天天文库
浏览记录
ID:28574256
大小:4.82 MB
页数:11页
时间:2018-12-11
《程序修改题汇总.doc》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
1、程序修改题(第6套)第1行中的"="需改为"IN";第3行中的"GROUPBY项目号"需改为"GROUPBY零件号";第5行中的"INTOFILE"需改为"TOFILE"。第8套***********程序提供的代码***********&&下句只有一处有错误SELECT课程号FROM课程表WHERE课程名="数据结构"TOARRAYa&&下句有错误OPEN教师表STORE0TOsum&&下句两处有错误SCANOF课程号=aOR工资>=4000&&下句有错误sum+1ENDSCAN?sum*******************************
2、*错误1:将TO改为INTO。错误2:将OPEN改为USE。错误3:将SCANOF改为SCANFOR。错误4:将OR改为AND。错误5:将sum+1改为sum=sum+1。第9套************程序提供的代码********************found********x,s1,s2,s3=0********found********x=thisform.text1dowhilex>0ifint(x/2)=x/2s1=s1+1elses2=s2+1endif********found********ifdiv(x,3)=0s3=s3+1
3、endifx=x-1enddothisform.text2.value=s1thisform.text3.value=s2thisform.text4.value=s3thisform.text5.value=s1+s2+s3********************************错误1:改为STORE0TOx,s1,s2,s3。错误2:改为x=val(thisform.text1.value)。错误3:改为ifmod(x,3)=0。第12套第一处:WHILE改为WHERE。第二处:OPEN改为USE。第三处:WHERE改为FOR。第四处:
4、填入num=num+1。第14套第3行改为:FROM客户,入住WHERE客户.客户号=入住.客户号;第5行改为:(SELECT入住日期;第7行改为:WHERE客户.客户号=入住.客户号AND姓名="姚小敏");第8行改为:INTOTABLETABC第15套**********"登录"按钮的Click事件代码**********USE用户表GOTOPflag=0&&下面语句有错误WHILE.NOT.EOF()IFAlltrim(用户名)==Alltrim(Thisform.Text1.Value)IFAlltrim(口令)==Alltrim(This
5、form.Text2.Value)WAIT"欢迎使用"WINDOWTIMEOUT2ELSEWAIT"口令错误"WINDOWTIMEOUT2ENDIFflag=1EXITENDIF&&下面语句有错误NEXTENDDO&&下面语句有错误CASEFLAG=0WAIT"用户名错误"WINDOWTIMEOUT2ENDIF****************************************错误1:将"WHILE"改为"DOWHILE"。错误2:将"NEXT"改为"SKIP"。错误3:将"CASE"改为"IF"。第16套&&根据"歌手表"计算每个组的
6、歌手人数CLOSEDATAUSEoneGOTOPWHILE.NOT.EOF()&&错误zuhao=组号SELECTCOUNT(*)FROM歌手表WHERE歌手表.歌手编号=zuhaoINTOARRAYA&&错误REPLACE歌手人数INTOA&&错误SKIPENDDO第1处:将"WHILE"改为"DOWHILE";第2处:将"歌手表.歌手编号"改为"LEFT(歌手表.歌手编号,2)";第3处:将"INTO"改为"WITH"第17套第1处错误:keyàprimaryKEY第2处错误:inserttoàINSERTINTO第3处错误:BYàset第4处
7、错误:whileàwhere第20套第1处错误改为:fromemployeepjoinemployeec;第2处错误改为:onp.组别=c.组别wherec.职务="组长"andc.姓名<>p.姓名;第31套第1处:findforàlocatefor第2处:whileàdowhile第3处:rate_exchange.持有数量àcurrency_sL.持有数量第38套第3行处的错误修改为:Key2=ALLTRIM(ThisForm.text2.value)第4行处的错误修改为:LOCATEALLFORUSER=Key1第12行处的错误修改为:THI
8、SFORM.RELEASE第40套①删除"(此处空行)",然后填写"usecustomer"。②把"WHILE"改为"FO
此文档下载收益归作者所有