分页:
上一页 1 2 3 4 5 6 [7] 8 9 下一页
store to unchange &&参考答案:read
@ 10, 2 say "准备存入你修改过的记录吗?(Y/N) " get ans
read
if upper(ans)="Y"
**********************found*************************
append from to unchange &&参考答案:gather from unchange
endif
@ 12,2 say "继续吗?" get conti
read
if upper(conti)<>"Y"
exit
endif
enddo
set talk on
return
第10题
给定程序MODI1.PRG的功能是:根据银行流水帐,同时修改银行和个人帐目。P3DB1为银行数据库,包括:支行号,名称,现有资金三个字段。P3DB2是个人数据库,包括:帐号,姓名,密码,余额四个字段。P3DB3是银行流水帐数据库,包括:帐号,支行号,日期,金额,存取,其中“存取”字段为逻辑型数据,存入其值为真T,取出其值为假F。另外,假设所有银行的初始资金为800000元,所有个人的初始资金为20000元,修改调试如下程序,使之能正确运行。
改错要求:程序中共有三处错误,请修改*****found****下面的错误,并调试运行。
注意:要求在原来位置修改,不得增加或删减程序行。
set talk off
set safety off
sele 1
分页:
上一页 1 2 3 4 5 6 [7] 8 9 下一页