举报
AdlibRegister("KillWindow", 500) ...... Func KillWindow() If WinExists("窗口1", "文本1") Then WinKill("窗口1", "文本1") ElseIf WinExists("窗口2", "文本2") Then WinKill("窗口2", "文本2") ElseIf WinExists("窗口3", "文本3") Then WinKill("窗口3", "文本3") ElseIf WinExists("窗口4", "文本4") Then WinKill("窗口4", "文本4") ElseIf WinExists("窗口5", "文本5") Then WinKill("窗口5", "文本5") EndIf Return EndFunc ;==>KillWindow
While 1 Local $WinlistArray=WinList() For $i=1 To $WinlistArray[0][0] Step 1 Switch $WinlistArray[$i][0] Case "无标题 - 记事本" ProcessClose("notepad.exe") Case "计算器" WinClose("计算器") EndSwitch Next WEnd
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-2-26 04:44 , Processed in 0.079396 second(s), 23 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.