师傅们帮忙看看这段E4A定时源码时钟1.2同时工作为啥不好...

辽宁铁岭

师傅们帮忙看看这段E4A定时源码时钟1时钟2同时工作为啥不好用呢
变量 选择时间 为 文本型
变量 选择日期 为 文本型
变量 是否开启 为 逻辑型       
变量 用户时间 为 文本型       
变量 用户时间1 为 文本型       

事件 主窗口.日期框被选择(日期 为 文本型)
        选择日期=日期
        显示时间选择框()
结束 事件

事件 时钟1.周期事件()
        如果 单选框1.选中=真  则
          用户时间=选择时间
          信息框 ("提示","成功打开","确定")
          单选框1.选中=假
        否则

        结束 如果
        时钟1.可用=假
       
结束 事件
事件 时钟2.周期事件()
        如果 单选框2.选中=真  则
          用户时间1=选择时间
          信息框 ("提示","成功关闭","确定")
          单选框2.选中=假
        否则

        结束 如果
        时钟2.可用=假

结束 事件
事件 主窗口.时间框被选择(时间 为 文本型)
       
        变量 x1 为 文本型
        变量 f1 为 文本型
        变量 选择时间1 为 文本型()
        变量 当前日期时间 为 日期时间型
        变量 选择日期时间 为 日期时间型
        选择时间1=分割文本(时间,":")
        如果 取文本长度(选择时间1(0))=1 则
                x1="0" & 选择时间1(0)
        否则
                x1=选择时间1(0)
        结束 如果
        如果 取文本长度(选择时间1(1))=1 则
                f1=":0" & 选择时间1(1) & ":00"
        否则
                f1=":" & 选择时间1(1) & ":00"
        结束 如果
        选择时间=" " & x1 & f1
选择时间1=分割文本(时间,":")       
选择日期时间=到时间(选择日期 & 选择时间)
当前日期时间=取现行时间()       
时钟1.时钟周期=取时间间隔(选择日期时间,当前日期时间)
时钟2.时钟周期=取时间间隔(选择日期时间,当前日期时间)
时钟1.可用=真
时钟2.可用=真       
结束 事件

事件 按钮8.被单击()
        返回桌面()
结束 事件

事件 按钮9.被单击()
        结束程序()
结束 事件
事件 单选框1.选择改变()
       
        显示日期选择框()
结束 事件

事件 单选框2.选择改变()
       
        显示日期选择框()
结束 事件
事件 时钟3.周期事件()
        标签1.标题 = 取现行时间文本(":")
结束 事件

精易论坛龙

这是易语言，易安卓平台不一样。