Site icon 时鹏亮的Blog

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

请知悉:本文最近一次更新为 11年 前,文中内容可能已经过时。

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

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

如您从本文得到了有价值的信息或帮助,请考虑扫描文末二维码捐赠和鼓励。

尊重他人劳动成果。转载请务必附上原文链接,我将感激不尽。


与《易语言实现文本半角-标点符号半角的代码》相关的博文:

Exit mobile version