(萌新求助贴)要求是如果同一单位DWMC有相同的姓名XM，则需在ZM中将XM与IDCARD（身份证）显示在一起，请大神指教 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → (萌新求助贴)要求是如果同一单位DWMC有相同的姓名XM，则需在ZM中将XM与IDCARD（身份证）显示在一起，请大神指教

标题：(萌新求助贴)要求是如果同一单位DWMC有相同的姓名XM，则需在ZM中将XM与IDCA ...

只看楼主

y148y

等　级：论坛游民
威　望：1
帖　子：26
专家分：11
注　册：2013-6-23

第 21 楼

得分:4

close all
use 20150324.dbf
INDEX on xm TAG xm
INDEX on dwmc TAG dwmc
go top
x=dwmc
y=xm
      DO WHILE !eof()
         SKIP
         if ALLTRIM(x)==ALLTRIM(dwmc) AND ALLTRIM(y)==ALLTRIM(xm)
           REPLACE zm WITH ALLTRIM(xm)+"("+ALLTRIM(dwmc)+")"
         endif
         x=dwmc
         y=xm
      ENDDO

这样行不行呢?

2015-03-26 11:40

sdta

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

第 22 楼

得分:0

以下是引用y148y在2015-3-26 11:40:21的发言：

close all
use 20150324.dbf
INDEX on xm TAG xm
INDEX on dwmc TAG dwmc
go top
x=dwmc
y=xm
      DO WHILE !eof()
         SKIP
         if ALLTRIM(x)==ALLTRIM(dwmc) AND ALLTRIM(y)==ALLTRIM(xm)
           REPLACE zm WITH ALLTRIM(xm)+"("+ALLTRIM(dwmc)+")"
         endif
         x=dwmc
         y=xm
      ENDDO

这样行不行呢?

老毛病

坚守VFP最后的阵地

2015-03-26 12:38

wangke508

等　级：新手上路
帖　子：3
专家分：4
注　册：2015-3-27

第 23 楼

得分:4

不是太懂，初学者

2015-03-27 10:54

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