举报
您需要 登录 才可以下载或查看,没有账号?加入
查看全部评分
这是我一个未弄完的小软件部分(exe文件),虽没附源码,但有源码解说。 afan 发表于 2010-2-3 17:48
#include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> $a="2010年02月3日" $Form1 = GUICreate("2010年02月3日", 790,586) $Label1 = GUICtrlCreateLabel($a, 320,580, 572, 17,$SS_CENTERIMAGE) GUISetState(@SW_SHOW) $b = 1 While 1 if $b = 635 Then $b = 1 sleep (10) ControlMove ($a,"", $Label1, 320,580-$b, 572, 17) $b +=1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd
If $s >= 188 Then AdlibUnRegister()
If $s >= 188 Then Exit
If $s >= 188 Then AdlibUnRegister('')
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-3-11 09:26 , Processed in 0.081803 second(s), 15 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.