之前说过用word实现半角转换,发现对标点无效,有用宏实现的,我懒,就低能的弄个小程序批量替换下好了。下面是源码:

.版本 2
缓存字符串 = 编辑框2.内容
缓存字符串 = 子文本替换 (缓存字符串, “。”, “.”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “,”, “,”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “;”, “;”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “:”, “:”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “?”, “?”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “!”, “!”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “……”, “...”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “—”, “-”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “~”, “~”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “《”, “<”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “》”, “>”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “‘”, “'”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, “’”, “'”, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, #右引号, #引号, , , 真)
缓存字符串 = 子文本替换 (缓存字符串, #左引号, #引号, , , 真)
编辑框2.内容 = 到半角 (缓存字符串)

Related Posts: 易语言实现文本半角-标点符号半角的代码 :