vb屏蔽ctrl等系统键，vbKeyTab)EndSub能不能用同类的

话题：vb屏蔽ctrl等系统键

问题详情：vbKeyTab)End Sub 能不能用同类的方法屏蔽掉其他的系统按键 ctrl

回答：'模块--------------------------------------------------------- Option ExplicitPublic hHook As LongPublic Declare Sub CopyMemory Lib ＂kernel32＂ Alias ＂RtlMoveMemory＂ (Destination As Any, Source As Any, ByVal Length As Long)Public Declare Function GetKeyState Lib ＂user32＂ (ByVal nVirtKey As Long) As IntegerPublic Declare Function SetWindowsHookEx Lib ＂user32＂ Alias ＂SetWindowsHookExA＂ (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As LongPublic Declare Function CallNextHookEx Lib ＂user32＂ (ByVal hHook As Long, ByVal nCode As L

话题：谁能不能帮我用VB写一段屏蔽系统热键 CTRL+ALT+DEL的

回答：我不会很好地运用API。 但可以实现达到任务管理器打开就关闭，开始菜单一 出就消失。 （几乎有点失效的感觉） 先添一个Timer,Interval属 可以设成10。 Private Declare Function FindWindow Lib ＂user32＂ Alias ＂FindWindowA＂ (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function SendMessage Lib ＂user32＂ Alias ＂SendMessageA＂ (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Sub Timer1_Timer() hw=FindWindow(vbNullString, ＂Windows 任务管理器＂) SendMessage hw, H10, 0, 0 SendKeys ＂%＂ Me.SetFocus End

话题：怎么用VB屏蔽CTRL+ALT+DEL键？

问题详情：用什么方法可以屏蔽CTRL+ALT+DEL键？？？？ 还有在挂机页面

回答：: .down100/Item/502.aspxVB源 码屏蔽Ctrl+Alt+Del键 源 码

参考回答：1、只要把 s的任务管理屏蔽掉就行，这个用api可以做到。我原来记得用过， 还可以动态禁用或打开 表等等2、 不

话题：急求VB屏蔽热键 ctrl+alt+del和alt+tab的源码

问题详情：（要能用的简单的）能用就给分，先到先得。

回答：'屏蔽Ctrl + Alt + Del组合键盘防止打开任务管理器 Dim sys As Stringsys=Environ(＂windir＂) amp; ＂\system32\taskmgr.exe＂Open sys For Random Lock Read As #1 '释放则 close #1

话题：VBA屏蔽Ctrl键

问题详情：目的：屏蔽Ctrl键 + 鼠标滚轮键VBA 码完成，谢谢。

回答：给你提供方法， 码网上一搜一大把，简单粘贴过来也不一定是你想要的。原理：利用Hook钩子程序，勾住键盘和鼠标，但是使用Hook的时候一定要注意，别忘了解钩子一下是我原来写的，也是从网上找的，你参照一下吧，注意， 码需要修改Declare Function IsNTAdmin Lib ＂advpack.dll＂ (ByVal dwReserved As Long, ByRef lpdwReserved As Long) As LongOption ExplicitPublic Declare Sub CopyMemory Lib ＂kernel32＂ Alias ＂RtlMoveMemory＂ (Destination As Any, Source As Any, ByVal Length As Long)Public Declare Function GetKeyState Lib ＂user32＂ (ByVal nVirtKey As Long) As IntegerPublic Declare Function

参考回答：调用API函数，控制按键响应，控制鼠标响应！具体可以 相关的API函数库！

话题：VBA怎样屏蔽删除行的快捷键（Ctrl +

回答：1、若想文本打开后即屏蔽，按alt+f11进入vba工程模式，在thisworkbook内贴入Private Sub Workbook_Open()Application.OnKey ＂^-＂, ＂＂End Sub以后每次打开此 表即可达到屏蔽快捷键（Ctrl + -）2、需要按照需求开启或者关闭快捷键，请参考 1102的解答，建议加上快捷键设定方便快速调用各个sub例如加入以下 码：Application.OnKey ＂^{q}＂， ＂屏蔽＂

参考回答：Sub 屏蔽（）Application.OnKey ＂^-＂, ＂＂End Sub恢复：Sub 恢复（）Application.OnKey ＂^-＂End Sub