Question

易语言 如何去掉组合框20, 循环程序还是有效果...因为他是取组合框的现实取中项而执行循环的

.版本 2
.支持库 eAPI
.支持库 EThread

.子程序 按键循环
.局部变量 i, 整数型

.判断循环首 (SW ＝ 1)
.计次循环首 (18, i)
.如果真 (nKey [i] ≠ 0)
处理事件 ()
API_PostMessage (GAME, 256, sKey [i], 0)
处理事件 ()
延时 (nKey [i])
.如果真结束

.计次循环尾 ()
.判断循环尾 ()

.子程序 _按钮1_被单击
.局部变量 句柄, 文本型, , "0"
.局部变量 b, 整数型
.局部变量 窗口标题, 文本型

组合框20.清空 ()
GAME ＝ 0
句柄 ＝ 取所有窗口列表 ()
.计次循环首 (取数组成员数 (句柄), b)
窗口标题 ＝ 取窗口标题 (到数值 (句柄 [b]))
.如果真 (窗口标题 ≠ “”)
组合框20.插入项目 (0, 窗口标题, 到数值 (句柄 [b]))
.如果真结束

.计次循环尾 ()

.子程序 _组合框20_列表项被选择

GAME ＝ 组合框20.取项目数值 (组合框20.现行选中项)
按钮2.禁止 ＝ 假
按钮3.禁止 ＝ 假

.子程序 __启动窗口_创建完毕

按钮2.禁止 ＝ 真
按钮3.禁止 ＝ 真
数组清零 (nKey)
数组清零 (sKey)
SW ＝ 0

.子程序 _时钟1_周期事件

API_PostMessage (GAME, 256, sKey [13], 0)

.子程序 _时钟2_周期事件

API_PostMessage (GAME, 256, sKey [14], 0)

.子程序 _时钟3_周期事件

API_PostMessage (GAME, 256, sKey [15], 0)

.子程序 _时钟4_周期事件

API_PostMessage (GAME, 256, sKey [16], 0)

.子程序 _时钟5_周期事件

API_PostMessage (GAME, 256, sKey [17], 0)

.子程序 _时钟6_周期事件

API_PostMessage (GAME, 256, sKey [18], 0)

.子程序 _按钮2_被单击
.局部变量 i, 整数型

.如果 (GAME ＞ 0)
.计次循环首 (18, i)
编辑框 [i] ＝ 多项选择 (i, 编辑框1, 编辑框2, 编辑框3, 编辑框4, 编辑框5, 编辑框6, 编辑框7, 编辑框8, 编辑框9, 编辑框10, 编辑框11, 编辑框12, 编辑框13, 编辑框14, 编辑框15, 编辑框16, 编辑框17, 编辑框18)
nKey [i] ＝ 到数值 (编辑框 [i].内容)
编辑框 [i].禁止 ＝ 真
.计次循环尾 ()
.计次循环首 (18, i)
组合框 [i] ＝ 多项选择 (i, 组合框1, 组合框2, 组合框3, 组合框4, 组合框5, 组合框6, 组合框7, 组合框8, 组合框9, 组合框10, 组合框11, 组合框12, 组合框13, 组合框14, 组合框15, 组合框16, 组合框17, 组合框18)
组合框 [i].禁止 ＝ 真
.计次循环尾 ()
时钟1.时钟周期 ＝ nKey [13]
时钟2.时钟周期 ＝ nKey [14]
时钟3.时钟周期 ＝ nKey [15]
时钟4.时钟周期 ＝ nKey [16]
时钟5.时钟周期 ＝ nKey [17]
时钟6.时钟周期 ＝ nKey [18]
SW ＝ 1
启动线程 (&按键循环, , )
按钮2.禁止 ＝ 真
组合框20.禁止 ＝ 真
按钮1.禁止 ＝ 真

.否则
信息框 (“请先选择游戏”, 0, “提示！”)

Answer 1

.版本 2

组合框1.内容 ＝ 到文本 (取年份 (取现行时间 ()))

已经取了年份了，就不用取时间了，如果取时间，就不用再取年份
取时间（），取的是一个年月日时分秒的时间格式中的时间部分

追问

GAME ＝ 组合框20.内容 ＝ 到文本 (取年份 (取现行时间 ()))
还是杂样改啊?