赚金币 发表于 2018-8-12 19:10:02

[十天入门易语言]第十课任务管理器实例2_分上下两集讲完

超级列表框1.全部删除 ()
窗口句柄 ＝ 取所有窗口列表 ()
数目 ＝ 取数组成员数 (窗口句柄)
.计次循环首 (数目, N)
    .如果真 (取窗口标题 (到整数 (窗口句柄 )) ≠ “” 且 取窗口标题 (到整数 (窗口句柄 )) ≠ “Program Manager” 且 取窗口标题 (到整数 (窗口句柄 )) ≠ “开始”)
      超级列表框1.插入表项 (0, 窗口句柄 , , , , 0)
      超级列表框1.置标题 (0, 1, 取窗口标题 (到整数 (窗口句柄 )))
      窗口数目 ＝ 窗口数目 ＋ 1
    .如果真结束
.计次循环尾 ()
_启动窗口.标题 ＝ “当前共运行” ＋ 到文本 (窗口数目) ＋ “个窗口...”

.子程序 _超级列表框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 被选择, 整数型, , "0"

被选择 ＝ 超级列表框1.取被选择表项 ()
终止进程 (超级列表框1.取标题 (被选择 , 1))
_按钮1_被单击 ()

《十天入门易语言》的10课 结束



郝小北南 发表于 2018-12-30 00:15:44

哈哈哈哈哈哈哈哈哈哈

freejzh 发表于 2019-2-5 20:54:02

受教了！！支持楼主

51026139 发表于 2019-3-9 09:52:02

学习学习学习学习了

服务器小繁 发表于 2019-3-9 10:34:45

杀猪刀 发表于 2019-6-10 11:49:58

看看来了。。。。。。。。。
页: [1]
查看完整版本: [十天入门易语言]第十课任务管理器实例2_分上下两集讲完