注册 登录
编程论坛 VFP论坛

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

core_nj 发布于 2018-02-25 21:22, 1595 次点击
求助各位大侠!!
比如:冒号,分号,破折号和问号
2 回复
#2
sdta2018-02-25 21:48
::
,,
;;
。.
—-
??
用strtran()函数替换
#3
sdta2018-02-25 22:57
* 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

1