VFP中如何转换全角和半角符号 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → VFP中如何转换全角和半角符号

标题：VFP中如何转换全角和半角符号

只看楼主

core_nj

等　级：新手上路
帖　子：3
专家分：0
注　册：2018-2-9
结帖率：0

楼主

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

VFP中如何转换全角和半角符号

求助各位大侠！！
比如：冒号，分号，破折号和问号

搜索更多相关主题的帖子: VFP　转换　全角　半角　符号　

2018-02-25 21:22

sdta

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

第 2 楼

得分:10

：:
，,
；;
。.
—－
？?
用strtran()函数替换

坚守VFP最后的阵地

2018-02-25 21:48

sdta

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

第 3 楼

得分:0

* strtran()替换示例
clear
local la[5,2]
la[1,1]="？"
la[1,2]="?"
la[2,1]="；"
la[2,2]=";"
la[3,1]="，"
la[3,2]=","
la[4,1]="—"
la[4,2]="-"
la[5,1]="："
la[5,2]=":"
lcstr="你？是；谁，我—是:"
?lcstr
for i=1 to alen(la,1)
lcstr=strtran(lcstr,la[i,1],la[i,2])
endfor
?lcstr

坚守VFP最后的阵地

2018-02-25 22:57

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