论坛 › 已解决问题区 › 请教 终止For循环的问题

傻娃 发表于 2008-10-13 02:20:34

请教 终止For循环的问题

————————————————————————————————————
HotKeySet("{F2}", "用快捷键终止下面的循环")
Run('NOTEPAD.exe')
kaishi()
Func kaishi()
$val = 1
For $i = 1 To 200
        $doubled =MyDouble($val)
        Sleep(500)
        Send($doubled,0)
        Send('{enter}')
        $val = $doubled
Next
EndFunc
Exit

Func MyDouble($value)
   $value = $value + 1
   Return $value
EndFunc
————————————————————————————

[ 本帖最后由 傻娃 于 2008-10-14 11:41 编辑 ]

78391493 发表于 2008-10-13 10:23:28

HotKeySet("{F2}", "End")

liongodmien 发表于 2008-10-13 14:40:27

HotKeySet("{F2}", "ExitProgram")
Run('NOTEPAD.exe')
kaishi()
Func kaishi()
$val = 1
For $i = 1 To 200
      $doubled =MyDouble($val)
      Sleep(500)
      Send($doubled,0)
      Send('{enter}')
      $val = $doubled
Next
EndFunc
Exit

Func MyDouble($value)
   $value = $value + 1
   Return $value
EndFunc

Func ExitProgram()
        Exit
EndFunc

查看完整版本: 请教 终止For循环的问题