再不改变字段类型的情况下，如何将数值变量替换到字符型字段内 - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 再不改变字段类型的情况下，如何将数值变量替换到字符型字段内

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 3139 人关注过本帖

标题：再不改变字段类型的情况下，如何将数值变量替换到字符型字段内

只看楼主加入收藏

lumen

等　级：新手上路
帖　子：21
专家分：5
注　册：2018-9-16
结帖率：100%

楼主

已结贴√ 问题点数：20 回复次数：19

再不改变字段类型的情况下，如何将数值变量替换到字符型字段内

USE rgf2
cnxh=""
select rgf2
SCAN
IF ALLTRIM(序号)="小计"
  cnxh=1
ELSE
   IF 工序名称="" OR ALLTRIM(工序名称)="劈抚" OR ALLTRIM(工序名称)="松土"
   cnxh= cnxh + 0.1
   replace 序号 WITH cnxh
   ELSE
   cnxh=cnxh+1
   replace 序号 WITH cnxh
   ENDIF
ENDIF
ENDSCAN

图片附件: 游客没有浏览图片的权限，请登录或注册

搜索更多相关主题的帖子: 改变　字段　替换　序号　名称　

2018-09-17 21:12

sdta

来　自：江苏省连云港市
等　级：版主
威　望：335
帖　子：9848
专家分：27241
注　册：2012-2-5

第 2 楼

得分:0

用临时表处理，就可以改变字段的数据类型了。

坚守VFP最后的阵地

2018-09-17 21:20

sdta

来　自：江苏省连云港市
等　级：版主
威　望：335
帖　子：9848
专家分：27241
注　册：2012-2-5

第 3 楼

得分:0

IF 工序名称="" OR ALLTRIM(工序名称)="劈抚" OR ALLTRIM(工序名称)="松土"
红字处的代码可能有问题吧
是不是应该改为
ALLTRIM(工序名称)=""

整行代码改为
IF INLIST(ALLTRIM(工序名称),"","劈抚","松土")
是不是更合适

坚守VFP最后的阵地

2018-09-17 21:31

lumen

等　级：新手上路
帖　子：21
专家分：5
注　册：2018-9-16

第 4 楼

得分:0

回复 3楼 sdta

我试试，萌新不太懂，添加小数位数为一的字段用什么命令啊，我只会加整数的

2018-09-17 21:37

sdta

来　自：江苏省连云港市
等　级：版主
威　望：335
帖　子：9848
专家分：27241
注　册：2012-2-5

第 5 楼

得分:0

aa n(5,2)

坚守VFP最后的阵地

2018-09-17 21:40

lumen

等　级：新手上路
帖　子：21
专家分：5
注　册：2018-9-16

第 6 楼

得分:0

回复 5楼 sdta

图片附件: 游客没有浏览图片的权限，请登录或注册

2018-09-17 21:46

sdta

来　自：江苏省连云港市
等　级：版主
威　望：335
帖　子：9848
专家分：27241
注　册：2012-2-5

第 7 楼

得分:0

数值型变量转换为字符型变量
STR()
TRANSFORM()
要学会看帮助文件

坚守VFP最后的阵地

2018-09-17 21:47

sdta

来　自：江苏省连云港市
等　级：版主
威　望：335
帖　子：9848
专家分：27241
注　册：2012-2-5

第 8 楼

得分:0

select *,0.00 标记 from rgf2 into cursor test readwrite

坚守VFP最后的阵地

2018-09-17 21:56

lumen

等　级：新手上路
帖　子：21
专家分：5
注　册：2018-9-16

第 9 楼

得分:0

回复 8楼 sdta

CLOSE DATABASES ALL
SET SAFETY OFF
SET DEFAULT TO F:\项目\新建文件夹
select *,0.0 标记 from rgf2 into cursor test readwrite
cnxh=""
SCAN
IF ALLTRIM(序号)="小计"
  cnxh=0
  REPLACE 标记 with cnxh
ELSE
  IF INLIST(ALLTRIM(工序名称),"","劈抚","松土")
   cnxh = cnxh + 0.1
   replace 标记 WITH cnxh
   ELSE
   cnxh = cnxh + 1
   replace 标记 WITH cnxh
   ENDIF
   endscan
ENDIF
ENDSCAN
这样运行完怎么全是加0.1的