简易文本转化工具

ytbihay

666666666666666

xbwdl

牛逼,精易有你更精彩

wjswzj0

谢谢分享

ocimei

谢谢分享

一指温柔

感谢分享

阿欢sdf

谢谢分享

pipicool

学习一下

zyg666

可以的，加油，一起学习

飞龙雪狐

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

子程序名	返回值类型	公开	备 注
_编辑框1_内容被改变

判断 (单选框1.选中 ＝ 真)
编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 4)
返回 ()
判断 (单选框2.选中 ＝ 真)
编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 3)
返回 ()
判断 (单选框4.选中 ＝ 真)
' 编辑框2.内容 ＝ 数值到金额 (到数值 (编辑框1.内容), 假)
编辑框2.内容 ＝ 数值到大写 (到数值 (编辑框1.内容), 假)
返回 ()
判断 (单选框1.选中 ＝ 假 且 单选框2.选中 ＝ 假 且 单选框3.选中 ＝ 假 且 单选框4.选中 ＝ 假)
编辑框2.内容 ＝ 编辑框1.内容
返回 ()
判断 (单选框3.选中 ＝ 真)
编辑框2.内容 ＝ “”
汉字转化拼音 (编辑框1, 编辑框2)
返回 ()

子程序名	返回值类型	公开	备 注
汉字转化拼音
参数名	类 型	参考	可空	数组	备 注
参数_汉字输入	编辑框
参数_拼音输出	编辑框

变量名	类 型	静态	数组	备 注
局部_计次	整数型

计次循环首 (取文本长度 (参数_汉字输入.内容) ÷ 2, 局部_计次)
参数_拼音输出.加入文本 (取拼音 (取文本中间 (参数_汉字输入.内容, 局部_计次 × 2 － 1, 2), 1) ＋ “ ”)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果 (编辑框2.内容 ＝ “”)
通用对话框1.类型 ＝ 0
通用对话框1.打开 ()
编辑框2.内容 ＝ 读入文本 (打开文件 (通用对话框1.文件名, 1, ), )

通用对话框1.类型 ＝ 1
通用对话框1.打开 ()
写到文件 (通用对话框1.文件名, 到字节集 (编辑框2.内容))

i支持库列表	支持库注释
cncnv	文字编码转换支持库

.版本 2<br /> .支持库 cncnv<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _编辑框1_内容被改变<br /> <br /> <br /> .判断开始 (单选框1.选中 ＝ 真)<br />     编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 4)<br />     返回 ()<br /> .判断 (单选框2.选中 ＝ 真)<br />     编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 3)<br />     返回 ()<br /> .判断 (单选框4.选中 ＝ 真)<br />     ' 编辑框2.内容 ＝ 数值到金额 (到数值 (编辑框1.内容), 假)<br />     编辑框2.内容 ＝ 数值到大写 (到数值 (编辑框1.内容), 假)<br />     返回 ()<br /> .判断 (单选框1.选中 ＝ 假 且 单选框2.选中 ＝ 假 且 单选框3.选中 ＝ 假 且 单选框4.选中 ＝ 假)<br />     编辑框2.内容 ＝ 编辑框1.内容<br />     返回 ()<br /> .判断 (单选框3.选中 ＝ 真)<br />     编辑框2.内容 ＝ “”<br />     汉字转化拼音 (编辑框1, 编辑框2)<br />     返回 ()<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 汉字转化拼音<br /> .参数 参数_汉字输入, 编辑框<br /> .参数 参数_拼音输出, 编辑框<br /> .局部变量 局部_计次, 整数型<br /> <br /> .计次循环首 (取文本长度 (参数_汉字输入.内容) ÷ 2, 局部_计次)<br />     参数_拼音输出.加入文本 (取拼音 (取文本中间 (参数_汉字输入.内容, 局部_计次 × 2 － 1, 2), 1) ＋ “ ”)<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果 (编辑框2.内容 ＝ “”)<br />     通用对话框1.类型 ＝ 0<br />     通用对话框1.打开 ()<br />     编辑框2.内容 ＝ 读入文本 (打开文件 (通用对话框1.文件名, 1, ), )<br /> <br /> .否则<br />     通用对话框1.类型 ＝ 1<br />     通用对话框1.打开 ()<br />     写到文件 (通用对话框1.文件名, 到字节集 (编辑框2.内容))<br /> <br /> .如果结束

飞龙雪狐

.版本 2
.支持库 cncnv

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕



.子程序 _编辑框1_内容被改变


.判断开始 (单选框1.选中 ＝ 真)
    编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 4)
    返回 ()
.判断 (单选框2.选中 ＝ 真)
    编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 3)
    返回 ()
.判断 (单选框4.选中 ＝ 真)
    ' 编辑框2.内容 ＝ 数值到金额 (到数值 (编辑框1.内容), 假)
    编辑框2.内容 ＝ 数值到大写 (到数值 (编辑框1.内容), 假)
    返回 ()
.判断 (单选框1.选中 ＝ 假 且 单选框2.选中 ＝ 假 且 单选框3.选中 ＝ 假 且 单选框4.选中 ＝ 假)
    编辑框2.内容 ＝ 编辑框1.内容
    返回 ()
.判断 (单选框3.选中 ＝ 真)
    编辑框2.内容 ＝ “”
    汉字转化拼音 (编辑框1, 编辑框2)
    返回 ()
.默认

.判断结束


.子程序 汉字转化拼音
.参数 参数_汉字输入, 编辑框
.参数 参数_拼音输出, 编辑框
.局部变量 局部_计次, 整数型

.计次循环首 (取文本长度 (参数_汉字输入.内容) ÷ 2, 局部_计次)
    参数_拼音输出.加入文本 (取拼音 (取文本中间 (参数_汉字输入.内容, 局部_计次 × 2 － 1, 2), 1) ＋ “ ”)
.计次循环尾 ()

.子程序 _按钮1_被单击

.如果 (编辑框2.内容 ＝ “”)
    通用对话框1.类型 ＝ 0
    通用对话框1.打开 ()
    编辑框2.内容 ＝ 读入文本 (打开文件 (通用对话框1.文件名, 1, ), )

.否则
    通用对话框1.类型 ＝ 1
    通用对话框1.打开 ()
    写到文件 (通用对话框1.文件名, 到字节集 (编辑框2.内容))

.如果结束