vb.net全局按键,vb运行快捷键

vb.net 全局热键

见下面的代码

创新互联坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都做网站、网站制作、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的五华网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！

Public Class Form1

Public Declare Auto Function RegisterHotKey Lib "user32.dll" Alias "RegisterHotKey" (ByVal hwnd As IntPtr, ByVal id As Integer, ByVal fsModifiers As Integer, ByVal vk As Integer) As Boolean

Public Declare Auto Function UnRegisterHotKey Lib "user32.dll" Alias "UnregisterHotKey" (ByVal hwnd As IntPtr, ByVal id As Integer) As Boolean

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'注册全局热键 

RegisterHotKey(Handle, 0, 0, Keys.F4)

'第3个参数意义： 0=nothing 1 -alt 2-ctrl 3-ctrl+alt 4-shift 5-alt+shift 6-ctrl+shift 7-ctrl+shift+alt

End Sub

Private Sub Form1_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed

UnRegisterHotKey(Handle, 0)

End Sub

Protected Overrides Sub WndProc(ByRef m As Message)

If m.Msg = 786 Then

Me.Activate()

End If

MyBase.WndProc(m)

End Sub

End Class

VB.net的快捷键

1． F12：转到定义；Shift+F12：转到引用

2． F5：启动；Ctrl+F5：开始执行（不调试）；Shift+F5：停止调试

3． F7：查看代码；Shift+F7：查看视图设计器

4． Ctrl+Alt+L：解决方案资源管理器

5． Ctrl+Alt+J：对象浏览器

6． F4：显示属性窗口

7． Ctrl+Alt+X：工具箱

8． Ctrl+Alt+C类视图

9． Alt+Enter：查看属性

10．F10：逐过程调试

11．F11：逐语句调试

12．Ctrl+B：新断点

13．Ctrl+Shift+F9：清除所有断点

14．Ctrl+Shift+B生成解决方案

15．Shift+Alt+Enter：全屏

16．大纲显示：Ctrl+M, Ctrl+M：切换大纲显示展开；Ctrl+M, Ctrl+L：切换所有大纲显示；Ctrl+M,Crtl+P停止大纲显示；Ctrl+M, Ctrl+O：折叠到定义

17．智能感知：Ctrl＋J：列出成员；Ctrl+Shift+空格：参数信息； Ctrl+K,Ctrl+I：快速信息；Alt+右箭头键：完成单词

vb.net全局热键无效

vb.net全局热键无效可以解决。

读取键盘操作时绕过了windows的消息机制，而使用DirectInput。需要注册全局热键。

因为窗体的焦点发生了转移，当焦点不在游戏人物操作的那个窗体的时候，是没办法向这个窗体发送模拟按键信息的。