字符 取代码 例程 ：字母大小写转换的方法

御风软件

本源码是回复一个易友的提问写的，一般我回答的时候会启动易写写小代码，然后删除源码文件的。。。
但是，我觉得这个东西，对新手朋友还是有点用的，所以，就放到这里存档，当以后一些朋友搜索到这个帖子
也会有所帮助的吧!     其他的完善神马的，就靠自己完成了。。。。     ^_^

  

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

变量名	类 型	静态	数组	备 注
原来文本	文本型
新的文本	文本型
N	整数型
一个字符	文本型
字符代码	整数型

原来文本 ＝ 编辑框1.内容
计次循环首 (取文本长度 (原来文本), N)
一个字符 ＝ 取文本中间 (原来文本, N, 1)
字符代码 ＝ 取代码 (一个字符, 1)
判断 (字符代码 ≥ 65 且 字符代码 ≤ 90)  ' 大写字母
一个字符 ＝ 到小写 (一个字符)
判断 (字符代码 ≥ 97 且 字符代码 ≤ 122)  ' 小写字母
一个字符 ＝ 到大写 (一个字符)
' 其他不做处理
新的文本 ＝ 新的文本 ＋ 一个字符
计次循环尾 ()
编辑框2.内容 ＝ 新的文本

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 原来文本, 文本型<br /> .局部变量 新的文本, 文本型<br /> .局部变量 N, 整数型<br /> .局部变量 一个字符, 文本型<br /> .局部变量 字符代码, 整数型<br /> <br /> 原来文本 ＝ 编辑框1.内容<br /> .计次循环首 (取文本长度 (原来文本), N)<br />     一个字符 ＝ 取文本中间 (原来文本, N, 1)<br />     字符代码 ＝ 取代码 (一个字符, 1)<br />     .判断开始 (字符代码 ≥ 65 且 字符代码 ≤ 90)  ' 大写字母<br />         一个字符 ＝ 到小写 (一个字符)<br />     .判断 (字符代码 ≥ 97 且 字符代码 ≤ 122)  ' 小写字母<br />         一个字符 ＝ 到大写 (一个字符)<br />     .默认<br />         ' 其他不做处理<br />     .判断结束<br />     新的文本 ＝ 新的文本 ＋ 一个字符<br /> .计次循环尾 ()<br /> 编辑框2.内容 ＝ 新的文本

3600ly

好像我能看懂哈哈

晓风残月丶

楼主好人，感谢楼主

温xun

感谢分享

Violation

谢谢分享、

炫舞代练号

为自己打算为论坛活跃

hoohoo

感谢分亨！！！

2638277701

感谢分享 支持开源咯

1920370662

感谢分享 支持开源

天天学

学习

Sunnnny

学习了