字符串操作，遍历组合，可否使用For语句？最近VFP块忘光了 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 字符串操作，遍历组合，可否使用For语句？最近VFP块忘光了

标题：字符串操作，遍历组合，可否使用For语句？最近VFP块忘光了

取消只看楼主

ytahdou

等　级：新手上路
帖　子：6
专家分：0
注　册：2013-12-19
结帖率：0

楼主

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

字符串操作，遍历组合，可否使用For语句？最近VFP块忘光了

AA='040506'
最后实现第一个字符串组合，输出：04#05#06#04+05#04+06#05+06#04+05+06
输出第二个:04*05#04*06#05*06#04*05*06
记得使用For ENdfor是不是可以容易实现？

搜索更多相关主题的帖子: For　VFP　遍历　组合　字符串　

2021-06-23 20:51

ytahdou

等　级：新手上路
帖　子：6
专家分：0
注　册：2013-12-19

第 2 楼

得分:0

ksxkkmzhdm='040506'
kmyq_OR=''
kmyq_AND=''
For IIkms=1 To 3
    kmyq_OR=kmyq_OR+Substr(ksxkkmzhdm,(IIKMS-1)*2+1,2)+'+'
    kmyq_AND=kmyq_AND+Substr(ksxkkmzhdm,(IIKMS-1)*2+1,2)+'*'
        For IIkmss=IIkms+1 To 3
        kmyq_OR=kmyq_OR+Substr(ksxkkmzhdm,(IIKMSS-1)*2+1,2)+'#'
        kmyq_and=kmyq_and+Substr(ksxkkmzhdm,(IIKMSS-1)*2+1,2)+'#'
    Endfor
Endfor
Messagebox(kmyq_OR,kmyq_and)

问题在哪？

2021-06-23 21:28

ytahdou

等　级：新手上路
帖　子：6
专家分：0
注　册：2013-12-19

第 3 楼

得分:0

感谢，但都不是很合适。

2021-06-23 22:37

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