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键热键”并双击打开。
在打开的窗口中选择已启用,然后点击确定即可。
当前题目:vb点虐 屏蔽win键 vb窗口关闭代码
文章来源:http://ybzwz.com/article/ddidois.html