|
发表于 2017-10-10 23:30:40
|
显示全部楼层
四川省成都市
- [e=5].版本 2
- .程序集 窗口程序集_启动窗口
- .程序集变量 大漠代码, 整数型
- .子程序 _按钮1_被单击
- .局部变量 计次, 整数型
- .局部变量 差多少, 整数型
- .局部变量 字, 文本型
- .计次循环首 (取文本长度 (编辑框1.内容), 计次)
- 大漠代码 = 取代码 (编辑框1.内容, 计次)
- .如果真 (大漠代码 > 96)
- 差多少 = 大漠代码 - 96
- 字 = 字符 (64 + 差多少)
- .如果真结束
- .如果真 (大漠代码 < 91)
- 差多少 = 大漠代码 - 64
- 字 = 字符 (96 + 差多少)
- .如果真结束
- 编辑框2.内容 = 编辑框2.内容 + 字
- .计次循环尾 ()
- .子程序 _编辑框1_内容被改变
- .局部变量 j, 整数型
- .计次循环首 (取文本长度 (编辑框1.内容), j)
- 大漠代码 = 取代码 (编辑框1.内容, j)
- .如果真 (大漠代码 < 65 或 大漠代码 > 90 且 大漠代码 < 97 或 大漠代码 > 122)
- 编辑框1.内容 = 文本替换 (编辑框1.内容, 取文本长度 (编辑框1.内容), 1, )
- 信息框 (“只能输入英文字母,大小写都可以”, 0, , )
- .如果真结束
- .计次循环尾 ()
- [/e]
复制代码 |
|