|
5精币
.版本 2
.支持库 ePY
.程序集 窗口程序集1
.程序集变量 原文, 文本型
.程序集变量 文, 文本型
.子程序 __启动窗口_创建完毕
原文 = 编辑框1.内容
文 = 原文
.子程序 _编辑框1_内容被改变
原文 = 编辑框1.内容
文 = 原文
.子程序 _按钮1_被单击
.局部变量 随机, 整数型
.局部变量 结果, 整数型
.局部变量 显示, 文本型
.局部变量 文长, 整数型
.局部变量 显示文字, 文本型
.如果 (标签1.标题 = “已完”)
延时 (1000)
返回 ()
.否则
.如果结束
文长 = 取文本长度 (文)
.循环判断首 ()
随机 = 取随机数 (1, 文长)
.判断开始 (文长 < 2)
跳出循环 ()
.默认
.判断结束
结果 = 随机 % 2
.循环判断尾 (结果 = 1)
标签1.标题 = “ ” + 取文本中间 (文, 随机 - 1, 2)
显示文字 = 取文本中间 (文, 随机 - 1, 2)
标签2.标题 = 取字拼音 (显示文字)
文 = 文本替换 (文, 随机 - 1, 2, “”)
.如果 (文长 < 2)
延时 (200)
标签1.标题 = “已完”
.否则
.如果结束
.子程序 _按钮3_被单击
.如果 (按钮3.标题 = “拼音显示”)
按钮3.标题 = “拼音关闭”
标签2.可视 = 真
.否则
按钮3.标题 = “拼音显示”
标签2.可视 = 假
--------------------------------
请问 那个“返回()”应该换成什么才能达到回到最开始的时候,好重新输入,重新开始。还有那个“取字拼音()”,应该怎么做?他显示的是“不能将“文本型 数组”数据转换到“文本型”数据。
”
|
最佳答案
查看完整内容
好了 看看是不是这样
承接服务器、客户端、ERP办公系统、智能回复系统、2D游戏引擎等等各类软件的编写。
新手学习请进群:251539517 本群不支持模块,滥用模块的勿进
高手绕道
|