|
本帖最后由 gold13 于 2011-4-17 17:37 编辑
因为做excel资料,资料太多,我自己编写一个按键翻页程序检查有没有未修改的数据。找到错误的数据或是输错次数,却不能退出循环程序。
请教高手帮忙指点指点一下,源代码如下:
$Form1 = GUICreate("Form1", 215, 53, 380, 217)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Label1 = GUICtrlCreateLabel("次数", 16, 16, 28, 17)
GUICtrlCreateInput("", 48, 16, 73, 21)
$Button1 = GUICtrlCreateButton("Button1", 136, 16, 65, 25)
GUICtrlSetOnEvent(-1, "Button1Click")
GUISetState(@SW_SHOW)
While 1
Sleep(100)
WEnd
Func Button1Click()
_WinWaitActivate("Microsoft Excel - 配电线路设备数据采集模板.xls [兼容模式]","");----激活EXCEL
for $i=1 to guictrlread($input1)
Send("{PGDN}")
sleep(300)
next
EndFunc
Func Form1Close()
exit
EndFunc |
|