请教内容如何实现 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 请教内容如何实现

标题：请教内容如何实现

取消只看楼主

sylknb

等　级：贵宾
威　望：14
帖　子：1519
专家分：174
注　册：2006-6-3
结帖率：79.3%

楼主

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

请教内容如何实现

在dm字段中0187，0001,0006，我想,0187---0001中间連续添加4个0187，在0001----0006連续添加8个00001，这代码如何书写？请各位指教

搜索更多相关主题的帖子: 如何　

2017-06-24 09:07

sylknb

等　级：贵宾
威　望：14
帖　子：1519
专家分：174
注　册：2006-6-3

第 2 楼

得分:0

以下是引用mywisdom88在2017-6-24 09:29:30的发言：

如果但存为了做这个,你就用鼠标点要插入的位置,然后,在命令窗口输入
INSERT before blank
repl dm with '0187'

数量多咋办？
以下是我的思路
use book1
dmmc=SPACE(20)

scan
iif(dm#dmmc,.t.,.f.)

repl dm with dm

dmmc=dm

ends
为什么不成功

[此贴子已经被作者于2017-6-24 10:00编辑过]

2017-06-24 09:58

sylknb

等　级：贵宾
威　望：14
帖　子：1519
专家分：174
注　册：2006-6-3

第 3 楼

得分:0

以下是引用mywisdom88在2017-6-24 14:10:22的发言：

dm1=''
dm2='0187'
select book1
go top
scan
dm1=allt(dm)
if dm1=".." or dm1=""
   repl dm with dm2
else
  dm2=dm1
endif
endscan

谢谢!我已自行介决了。

2017-06-24 16:08

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