分页:
上一页 1 2 3 4 5 [6] 7 8 9 下一页
n=80000
do while n>=1
n=n-1
enddo
endif
set talk on
return
第9题
给定程序MODI1.PRG 的功能是:用户在P2DB数据库中选择并修改数据库记录,然后根据用户的意愿存入或放弃修改。修改调试如下程序,使之能正确运行。
改错要求:程序中共有三处错误,请修改*****found****下面的错误,并调试运行。
注意:要求在原来位置修改,不得增加或删减程序行。
set talk off
dimension unchange(3)
store "y" to ans,conti
use p2db
count to rno
r=1
do while conti="y"
clear
@ 2,2 say "修改第几条记录?" get r range 1,rno
read
go r
**********************found************************
store to unchange &&参考答案:scatter to unchange
@ 4,10 say "学号" get unchange(1) picture "999999"
@ 6,10 say "姓名" get unchange(2)
@ 8,10 say "所属z系" get unchange(3)
**********************found************************
分页:
上一页 1 2 3 4 5 [6] 7 8 9 下一页