请问这个命令如何写？先多谢

2013-10-21

请教这个命令怎么写？先谢谢vfp9.0sp2环境下，有一表tb中一数值型字段sz，想让第一行是1，以后7行之内每一行的

请教这个命令怎么写？先谢谢
vfp9.0sp2环境下，有一表tb中一数值型字段sz，想让第一行是1，以后7行之内每一行的数值自动加20，如下：
sz
1
21
41
61
81
101
121

命令该怎么写？
[解决办法]
select tb
m.sz=1
scan
replace sz=m.sz
m.sz=m.sz+20
endscan
[解决办法]
如果有太多的行,那必须要使用循环语句了

for i=1 to  n (n是总行数)
  goto i
  repl sz with 1+20*(i-1)
next i
[解决办法]
select tb
for i=1 to 200 step 20
  append blank
  replace sz=i
endfor
[解决办法]

CREATE CURSOR TB (SZ N(3))
FOR I=1 TO 121 STEP 20
    INSERT INTO TB VALUES ((I-1)*20+1)
ENDFOR
BROWSE

[解决办法]


*-- 如果表中无记录
Create Cursor TB (SZ N(10))
For I=1 To 100
Insert Into TB Values ((I-1)*20+1)
Endfor
Browse

*--如果表中有记录
Update TB Set SZ=((Recno('TB')-1)*20+1)
或
Replace All SZ With ((Recno()-1)*20+1)

热点排行

VFP

请问这个命令如何写？先多谢