WinActivate("Windows 任务管理器")
Sleep(500)
$i = ControlCommand ( "Windows 任务管理器", "", "SysTabControl321", "CurrentTab", "" )
While $i>1
ControlCommand ( "Windows 任务管理器", "", "SysTabControl321", "TabLeft", "" )
$i -= 1
Sleep(500)
WEnd
While True
;$txt = ControlGetText ("Windows 任务管理器", "", "[CLASS:SysTabControl32; INSTANCE:1]")
$txt = WinGetText( "Windows 任务管理器", "" )
;ConsoleWrite($txt & @CRLF)
If StringInStr($txt, "结束进程(&E)") Then
ExitLoop
EndIf
ControlCommand ( "Windows 任务管理器", "", "SysTabControl321", "TabRight", "" )
Sleep(500)
WEnd
Sleep(500)
MsgBox(0, "got", $txt)
|