回复 4楼 sd_tysd
2楼 和编辑过以后的1楼 的循环并没有错~~~ 单从这段代码看, 其第2和第3句 就有vfp6貌似通不过的语病, 而楼主却说到了后面的“嵌套错误”, 我很纳闷, 也就没有再复贴~~~
这样的循环是符合规范, 是可行的~~~ 特意制作测试程序如下(通过测试)~~~
程序代码:
set safe off
clos all
crea dbf c:\表1 (Zjhm c(3),Zkzh c(7))
crea dbf c:\表2 (Zjhm c(3),ksh c(7))
for kk=1 to 20
inse into 表1 valu(tran(kk),subs(repl("qtrqiotutuoi46igpqoweg",6),kk*2-1,2) )
inse into 表2 valu(tran(kk+7),subs(repl("满城春色宫墙柳东风恶欢情薄",6),kk*2-1,2) )
endfor
clos data
sele 2
use c:\表2 excl
brow noed titl " >> 这是原表2... zjhm为8-27, ksh全为汉字"
sele 1
use c:\表1 excl
brow noed titl " >> 这是原表1... zjhm为1-20, zkzh全为字母和数字"
scan
sele 2
repl 表2.ksh with 表1.zkzh for 表2.zjhm=表1.zjhm
endscan
sele 2
go top
brow noed titl " >> 这是替换后的表2... ksh原全为汉字, 现在zjhm=8-20(与表1相同) 替换成了 表1的字母和数字~"
retu
[
本帖最后由 茵梦湖 于 2009-8-28 00:16 编辑 ]
[
本帖最后由 茵梦湖 于 2009-8-28 00:20 编辑 ]