标题:请教,某一字段添加递增数值。
只看楼主
bd_hys
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-3-24
结帖率:100%
已结贴  问题点数:20 回复次数:11 
请教,某一字段添加递增数值。
在某一字段下从1开始添加递增数值,如1-500.
2015-03-24 13:32
wp231957
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:神界
等 级:版主
威 望:422
帖 子:13681
专家分:53296
注 册:2012-10-18
得分:0 
循环

DO IT YOURSELF !
2015-03-24 13:34
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
得分:10 
程序代码:
CREATE TABLE q1 (xh n(3))
SELECT q1
FOR i=1 TO 500
APPEND BLANK
REPLACE xh WITH i
endf
2015-03-24 13:56
bd_hys
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-3-24
得分:0 
例如:

姓名       地址             序号
张三      123456             1
李四      234567             2
 .          .                .
 .          .                .
 .          .                .

序号字段空白,由1开始递增至500
2015-03-24 14:09
bd_hys
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-3-24
得分:0 
例如:

姓名       地址             序号
张三      123456             1
李四      234567             2
 .          .                .
 .          .                .
 .          .                .

序号字段为空,有1开始递增至500
2015-03-24 14:10
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
得分:0 
以下是引用bd_hys在2015-3-24 14:09:12的发言:

例如:

姓名       地址             序号
张三      123456             1
李四      234567             2
 .          .                .
 .          .                .
 .          .                .

序号字段空白,由1开始递增至500
程序代码:
close table
usego top
FOR i=1 TO 500
REPLACE 序号 WITH i
endf
2015-03-24 14:20
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
字段如果是数值型:
Replace All 序号 With Recno()

字段如果是字符型:
Replace All 序号 With Transform(Recno())
或者
Replace All 序号 With Padl(Recno()3,"0")

坚守VFP最后的阵地
2015-03-24 14:28
bd_hys
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2015-3-24
得分:0 
回复 6楼 tlliqi
还是不行,只能在第一条记录添加500
2015-03-24 16:11
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
如果其它字段没有记录,执行Replace 命令前,要执行
Append Blank 命令

坚守VFP最后的阵地
2015-03-24 16:27
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:10 
close table
use 表
go top
FOR i=1 TO 500
    REPLACE 序号 WITH i
    SKIP
endf

坚守VFP最后的阵地
2015-03-24 16:33



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-443015-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.854263 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved