如何使用热键的问题【已解决】

清风飘飘 · 发表于 2011-1-18 22:54:32

本帖最后由清风飘飘于 2011-1-26 23:20 编辑

下午在公司写了个电子产品测试用的小助手，想实现按“F5”的时候循环执行一个自定义的函数，再按一次“F5”时候退出循环，再按一次又开始循环，就相当于“F5”是个开关，请那位朋友不吝赐教，帮我写个例子！甚为感谢！

xuzhenjun130 · 发表于 2011-1-19 04:57:33

只用一个F5来判断有点难，不过用两个热键的话那就相当简单了

HotKeySet("{f5}","test")
HotKeySet("{f4}","test1")
While 1
        Sleep(100)
WEnd
Func test()
        MsgBox(0,0,0)
EndFunc
Func test1()
        Exit
EndFunc

5i5wei · 发表于 2011-1-19 09:55:36

对 2楼不错

3mile · 发表于 2011-1-19 10:32:00

加个开关

HotKeySet("{f5}","test")
Global $stop=True,$k

While 1
        Sleep(100)
WEnd

Func test()
        If $stop=True Then
                $stop=False
                test1()
        Else
                $stop=True
                $k=0
                ToolTip("")
        EndIf    
EndFunc

Func test1()
        While 1
                If $stop=True Then ExitLoop
                ToolTip("循环显示： "&$k)
                $k+=1
        WEnd
EndFunc

m765555 · 发表于 2011-1-19 11:11:40

9行10行和13，14行有点不好理解，可不可以注释一下，非常感谢！

m765555 · 发表于 2011-1-19 11:16:02

对了，我想调用热键ctrl + alt + Q 这个热键，代码怎么写才对呢，我一直没有搞明白，心里一直有点惦记着的，哎，各位指点一下，感谢中……

3mile · 发表于 2011-1-19 11:20:12

回复 5# m765555
$stop是一个开关变量，当$stop为真时循环开路，反之断路。
$k仅为循环显示的一个变量。

m765555 · 发表于 2011-1-19 11:22:26

哦，感谢3mile兄弟,

都市浪子666 · 发表于 2011-1-19 11:23:05

对了，我想调用热键ctrl + alt + Q 这个热键，代码怎么写才对呢，我一直没有搞明白，心里一直有点惦记着的， ...
m765555 发表于 2011-1-19 11:16


    HotKeySet("^!q", "aaaa")  ;CTRL-Alt-q

m765555 · 发表于 2011-1-19 11:32:38

谢谢各位热心兄弟！

清风飘飘 · 发表于 2011-1-26 23:19:43

非常感谢朋友们的热心帮助，值此新春佳节到来之际，祝愿所有的朋友都幸福安康！

lhylm · 发表于 2011-2-11 13:41:51

又学习了！！！

mlz2011 · 发表于 2011-8-6 22:02:43

回复 2# xuzhenjun130

学习了正做快捷键启动呢谢谢分享！

zjw767676 · 发表于 2011-10-25 18:48:45

sxd大大的经典：

HotKeySet("{F5}","toggle")
Dim $toggle = 0
 
While 1
        While $toggle
                代码
        WEnd
WEnd
 
Func toggle()
        $toggle = Not $toggle
EndFunc

navy · 发表于 2012-11-10 20:32:14

回复 9# 都市浪子666

那如果我想调用 LShift + Space 这个热键呢，代码怎么写才对呢，请赐教！

		自动登录	找回密码
密码			加入

[AU3基础] 如何使用热键的问题【已解决】

相关帖子

评分