易语言写时钟程序。程序中显示的时间用图片动态显示。可以随便用一些图片代替。请附源码,有注释更好
2个回答
展开全部
.版本 2
.程序集 窗口程序集1
.程序集变量 临时4, 文本型
.程序集变量 临时3, 文本型
.程序集变量 临时1, 文本型
.程序集变量 临时2, 文本型
.子程序 _按钮1_被单击
临时1 = 到文本 (取小时 (取现行时间 ())) ' 取现行时间的小时,临时1=小时
临时2 = 取文本右边 (临时1, 1) ' 取现行小时的右边第一位
临时1 = 取文本左边 (临时1, 1) ' 取现行小时的左边第一位
' 以下是判断当前的时间(【小时】),来选择图片
.判断开始 (临时1 = “0”)
图片框1.图片 = #图片0
.判断 (临时1 = “1”)
图片框1.图片 = #图片1
.判断 (临时1 = “2”)
图片框1.图片 = #图片2
.判断 (临时1 = “3”)
图片猜厅毕框1.图片 = #图片3
.判断 (临时1 = “4”)
图片框1.图片 = #图片4
.判断 (临时1 = “5”)
图片框1.图片 = #图片5
.判断 (临时1 = “6”)
图片框1.图片 = #图片6
.判断 (临时1 = “7”)
图片框1.图片 = #图片7
.判断 (临时1 = “8”)
图片框1.图片 = #图片8
.判断 (临时1 = “9”)
图片框1.图片 = #图片9
.默认
.判断结束
.判断开始 (临时2 = “0”)
图片框2.图片 = #图片0
.判断 (临穗芹时2 = “1”)
图片框2.图片 = #图片1
.判断 (临时2 = “2”)
图片框2.图片 = #图片2
.判断 (临时2 = “3”)
图片框2.图片 = #图片3
.判断 (临时2 = “4”)
图片框2.图片 = #图片4
.判断 (临时2 = “5”)
图片框2.图片 = #图片5
.判断 (临时2 = “6”)
图片框2.图片 = #图片6
.判断 (临时2 = “7”)
图片框2.图片 = #图片7
.判断 (临时2 = “8”)
图片框2.图片 = #图片8
.判断 (临时2 = “9”)
图片框2.图片 = #图片9
.默认
.判断结束
临时3 = 到文本 (取分钟 (取现行时间 ())) '伏宏 取现行时间的分钟
临时4 = 取文本右边 (临时3, 1)
临时3 = 取文本左边 (临时3, 1)
' 以下是判断当前的时间分钟,来选择图片
.判断开始 (临时3 = “0”)
图片框3.图片 = #图片0
.判断 (临时3 = “1”)
图片框3.图片 = #图片1
.判断 (临时3 = “2”)
图片框3.图片 = #图片2
.判断 (临时3 = “3”)
图片框3.图片 = #图片3
.判断 (临时3 = “4”)
图片框3.图片 = #图片4
.判断 (临时3 = “5”)
图片框3.图片 = #图片5
.判断 (临时3 = “6”)
图片框3.图片 = #图片6
.判断 (临时3 = “7”)
图片框3.图片 = #图片7
.判断 (临时3 = “8”)
图片框3.图片 = #图片8
.判断 (临时3 = “9”)
图片框3.图片 = #图片9
.默认
.判断结束
.判断开始 (临时4 = “0”)
图片框4.图片 = #图片0
.判断 (临时4 = “1”)
图片框4.图片 = #图片1
.判断 (临时4 = “2”)
图片框4.图片 = #图片2
.判断 (临时4 = “3”)
图片框4.图片 = #图片3
.判断 (临时4 = “4”)
图片框4.图片 = #图片4
.判断 (临时4 = “5”)
图片框4.图片 = #图片5
.判断 (临时4 = “6”)
图片框4.图片 = #图片6
.判断 (临时4 = “7”)
图片框4.图片 = #图片7
.判断 (临时4 = “8”)
图片框4.图片 = #图片8
.判断 (临时4 = “9”)
图片框4.图片 = #图片9
.默认
也可以给我发短消息,我给你源码 需要四个图片框
0----9个图片数字
.程序集 窗口程序集1
.程序集变量 临时4, 文本型
.程序集变量 临时3, 文本型
.程序集变量 临时1, 文本型
.程序集变量 临时2, 文本型
.子程序 _按钮1_被单击
临时1 = 到文本 (取小时 (取现行时间 ())) ' 取现行时间的小时,临时1=小时
临时2 = 取文本右边 (临时1, 1) ' 取现行小时的右边第一位
临时1 = 取文本左边 (临时1, 1) ' 取现行小时的左边第一位
' 以下是判断当前的时间(【小时】),来选择图片
.判断开始 (临时1 = “0”)
图片框1.图片 = #图片0
.判断 (临时1 = “1”)
图片框1.图片 = #图片1
.判断 (临时1 = “2”)
图片框1.图片 = #图片2
.判断 (临时1 = “3”)
图片猜厅毕框1.图片 = #图片3
.判断 (临时1 = “4”)
图片框1.图片 = #图片4
.判断 (临时1 = “5”)
图片框1.图片 = #图片5
.判断 (临时1 = “6”)
图片框1.图片 = #图片6
.判断 (临时1 = “7”)
图片框1.图片 = #图片7
.判断 (临时1 = “8”)
图片框1.图片 = #图片8
.判断 (临时1 = “9”)
图片框1.图片 = #图片9
.默认
.判断结束
.判断开始 (临时2 = “0”)
图片框2.图片 = #图片0
.判断 (临穗芹时2 = “1”)
图片框2.图片 = #图片1
.判断 (临时2 = “2”)
图片框2.图片 = #图片2
.判断 (临时2 = “3”)
图片框2.图片 = #图片3
.判断 (临时2 = “4”)
图片框2.图片 = #图片4
.判断 (临时2 = “5”)
图片框2.图片 = #图片5
.判断 (临时2 = “6”)
图片框2.图片 = #图片6
.判断 (临时2 = “7”)
图片框2.图片 = #图片7
.判断 (临时2 = “8”)
图片框2.图片 = #图片8
.判断 (临时2 = “9”)
图片框2.图片 = #图片9
.默认
.判断结束
临时3 = 到文本 (取分钟 (取现行时间 ())) '伏宏 取现行时间的分钟
临时4 = 取文本右边 (临时3, 1)
临时3 = 取文本左边 (临时3, 1)
' 以下是判断当前的时间分钟,来选择图片
.判断开始 (临时3 = “0”)
图片框3.图片 = #图片0
.判断 (临时3 = “1”)
图片框3.图片 = #图片1
.判断 (临时3 = “2”)
图片框3.图片 = #图片2
.判断 (临时3 = “3”)
图片框3.图片 = #图片3
.判断 (临时3 = “4”)
图片框3.图片 = #图片4
.判断 (临时3 = “5”)
图片框3.图片 = #图片5
.判断 (临时3 = “6”)
图片框3.图片 = #图片6
.判断 (临时3 = “7”)
图片框3.图片 = #图片7
.判断 (临时3 = “8”)
图片框3.图片 = #图片8
.判断 (临时3 = “9”)
图片框3.图片 = #图片9
.默认
.判断结束
.判断开始 (临时4 = “0”)
图片框4.图片 = #图片0
.判断 (临时4 = “1”)
图片框4.图片 = #图片1
.判断 (临时4 = “2”)
图片框4.图片 = #图片2
.判断 (临时4 = “3”)
图片框4.图片 = #图片3
.判断 (临时4 = “4”)
图片框4.图片 = #图片4
.判断 (临时4 = “5”)
图片框4.图片 = #图片5
.判断 (临时4 = “6”)
图片框4.图片 = #图片6
.判断 (临时4 = “7”)
图片框4.图片 = #图片7
.判断 (临时4 = “8”)
图片框4.图片 = #图片8
.判断 (临时4 = “9”)
图片框4.图片 = #图片9
.默认
也可以给我发短消息,我给你源码 需要四个图片框
0----9个图片数字
来自:求助得到的回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询