cha询梁山好汉的姓名和称呼源码

奔放的小青年

各位前辈好，来了这么久的论坛，第一次发帖，也是最近才学的易语言，最近学到了计次循环和数组，想着把自己的写的软件分享出来，我的课程也是跟着江老师学的，源码跟老师的基本一样，除了命名不一样哈，但是绝对不是搬运的，分享出来只是单纯的想让大家学习一下思路或者是怎么使用的哈，如打扰到前辈，请谅解哈

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
梁山好汉数组	文本型	0
梁山好汉人数	整数型

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

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

变量名	类 型	静态	数组	备 注
k	整数型

梁山好汉数组 ＝ 分割文本 ( #梁山108位好汉, #换行符, )
梁山好汉人数 ＝ 取数组成员数 (梁山好汉数组)
' 这里是滚动屏幕代码
判断循环首 (k ＝ 0)
处理事件 ()
标签3.左边 ＝ 标签3.左边 － 1
如果真 (标签3.左边 ＋ 标签3.宽度 ＝ 500)
标签3.左边 ＝ _启动窗口.左边
延时 (20)
判断循环尾 ()

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

变量名	类 型	静态	数组	备 注
姓名和称呼	文本型		0
姓名	文本型
称呼	文本型
i	整数型

计次循环首 (梁山好汉人数, i)
姓名和称呼 ＝ 分割文本 (梁山好汉数组 [i], “——”, )
称呼 ＝ 姓名和称呼 [1]
姓名 ＝ 姓名和称呼 [2]
如果真 (姓名 ＝ 编辑框1.内容)
编辑框2.内容 ＝ 称呼
跳出循环 ()
调试输出 (称呼)
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 梁山好汉数组, 文本型, , "0"<br /> .程序集变量 梁山好汉人数, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 k, 整数型<br /> <br /> 梁山好汉数组 ＝ 分割文本 (#梁山108位好汉, #换行符, )<br /> <br /> 梁山好汉人数 ＝ 取数组成员数 (梁山好汉数组)<br /> ' 这里是滚动屏幕代码<br /> .判断循环首 (k ＝ 0)<br />     处理事件 ()<br />     标签3.左边 ＝ 标签3.左边 － 1<br />     .如果真 (标签3.左边 ＋ 标签3.宽度 ＝ 500)<br />         标签3.左边 ＝ _启动窗口.左边<br />     .如果真结束<br />     延时 (20)<br /> .判断循环尾 ()<br /> <br /> .子程序 _编辑框1_内容被改变<br /> .局部变量 姓名和称呼, 文本型, , "0"<br /> .局部变量 姓名, 文本型<br /> .局部变量 称呼, 文本型<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (梁山好汉人数, i)<br /> <br />     姓名和称呼 ＝ 分割文本 (梁山好汉数组 <i>, “——”, )<br />     称呼 ＝ 姓名和称呼 [1]<br />     姓名 ＝ 姓名和称呼 [2]<br /> <br />     .如果真 (姓名 ＝ 编辑框1.内容)<br />         编辑框2.内容 ＝ 称呼<br />         跳出循环 ()<br />     .如果真结束<br />     调试输出 (称呼)<br /> .计次循环尾 ()

dphpzmd

支持开源~！感谢分享

xiang316367725

感谢分享，支持开源

胖子葛格

感谢大神分享~！

pipicool

学习一下

xz0455

cha询梁山好汉的姓名和称呼源码开源必须支持

fengyyun

感谢分享，很给力！~

year1970

感谢分享，学习了

豆豆灰常开心

下个学习一下

查过

感谢发布原创作品，精易因你更精彩！6666666666666