vb点虐 屏蔽win键 vb窗口关闭代码

vb点虐 编写的程序屏蔽系统热键

使用VB点虐 编写屏蔽热键的方法有很多中,比如说使用系统的API函数,也可以使用钩子来进行屏蔽.还有一种就是点虐 带的一种方法,首先来判断所按下去的键,然后再执行操作等事件.比如说:if (e.keycode==keys.D){e.handle=true}在keydown事件里面处理!这样就可以屏蔽了D键. 实例:if ((Control.ModifierKeys == Keys.Alt) (e.KeyCode == Keys.F4))

成都创新互联一直在为企业提供服务，多年的磨炼，使我们在创意设计，成都全网营销到技术研发拥有了开发经验。我们擅长倾听企业需求，挖掘用户对产品需求服务价值，为企业制作有用的创意设计体验。核心团队拥有超过十年以上行业经验，涵盖创意，策化，开发等专业领域，公司涉及领域有基础互联网服务成都多线机房、手机APP定制开发、手机移动建站、网页设计、网络整合营销。

{

e.Handled = true;

}还有一种办法就是不通过屏蔽热键来实现,就是通过设置焦点.你可以把你程序窗口设置为主焦点,这样其他程序一般就无法在你的程序前面了.实现屏蔽的作用.至于任务管理器的话可以通过杀掉进程的办法做到.如下: Process[] p = Process.GetProcesses(); foreach (Process p1 in p)

{

try

{

if (p1.ProcessName.ToLower().Trim() == "taskmgr")//这里判断是任务管理器

{

p1.Kill();

return;

}

}

catch

{

return;

}

}}以上是使用C#编写的,稍微改下就可以了,在,NET里面都差不多!

VB中如何禁用键盘上的左右WIN键？

这两个键其实就是Ctrl＋ESC，屏蔽这两个键就可以。这两个键的值分别是91和92。

Option Explicit

Private Declare Function StartMaskKey Lib "MaskKey" (lpdwVirtualKey As Long, ByVal nLength As Long, Optional ByVal bDisableKeyboard As Boolean = False) As Long

Private Declare Function StopMaskKey Lib "MaskKey" () As Long

Private Sub cmdStartMask_Click()

' @# 屏蔽 A, B, C, 上, 下, 左, 右及两个win键

Dim key(8) As Long

key(0) = vbKeyA

key(1) = vbKeyB

key(2) = vbKeyC

key(3) = vbKeyLeft

key(4) = vbKeyRight

key(5) = vbKeyUp

key(6) = vbKeyDown

key(7) = H5B '@# 左边的win键

key(8) = H5C ' @# 右边的win键

StartMaskKey key(0), UBound(key) + 1

End Sub

Private Sub cmdStopMask_Click()

StopMaskKey

End Sub

自己调下，网上找的应该可以

怎么屏蔽win键

同时按下Windows键和R键，输入gpedit.msc后确定，打开组策略

依次选择 用户配置----管理模板---Windows组件

在展开的菜单中找到“文件资源管理器”菜单项并选中。

在窗口的右侧找到“关闭Windows键热键”并双击打开。

在打开的窗口中选择已启用，然后点击确定即可。