从上传的四条数据来看,还是有规律的。
坚守VFP最后的阵地
close databases create cursor dz (处理前 c(120),处理后 c(140)) append from 测试 fields 处理前 use 全国 in 0 alias qg select qg scan sf=alltrim(省份) sj=alltrim(市级) select dz cstr="" scan do case case occurs(sj,处理前)=2 n=atc(sj,处理前,2) cstr=sf+sj+substr(处理前,n+len(sj)) case occurs(sj,处理前)=1 n=atc(sj,处理前) cstr=sf+sj+substr(处理前,n+len(sj)) endcase if sj$处理前 replace 处理后 with cstr endif endscan endscan select dz browse