关于vbnethook的信息

VB.NET 使用鼠标HOOK判断是否按下鼠标左键 说明: 如图所示 我可怜的全部分数都给出来了,哪位大侠帮帮忙

在MouseDown或MouseUp事件中

创新互联专注于繁昌企业网站建设,响应式网站开发,商城网站定制开发。繁昌网站建设公司,为繁昌等地区提供建站服务。全流程按需定制开发,专业设计,全程项目跟踪,创新互联专业和态度为您提供的服务

Select Case e.Button

Case MouseButtons.Left

MsgBox("")

Case MouseButtons.Middle

MsgBox("'")

Case MouseButtons.Right

MsgBox("""")

End Select

即可知道是左键还是右键

vb.net HOOK实例

这是微软MSDN官方文档,里面详细介绍了Hook机制,别告诉我你看不懂英文哦

(VS.85).aspx

我当初自己研究Hook技术时就是看的这个

几个重要的函数:

// 安装钩子

HHOOK SetWindowsHookEx(int idHook, // 钩子类型

HOOKPROC lpfn, // 回调函数

HINSTANCE hMod, // 实例句柄

DWORD dwThreadId // 线程ID

); // 返回值:钩子句柄

// 将消息传递给下一个钩子

LRESULT CallNextHookEx(HHOOK hhk, int nCode, WPARAM wParam, LPARAM lParam); // 太累了不想翻译了

// 卸载钩子

BOOL UnhookWindowsHookEx(HHOOK hhk);

// 鉴于你给的悬赏分太低,我就不多写了,自己研究MSDN文档吧,祝你好运

// 顺便再说一句,全局钩子要在DLL中实现

/* 刚才看了你的资料,觉得你这人挺有意思,貌似VB.NET玩得不错,哈哈 */

vb.net问题:如何屏蔽某键

只是文本框的话:

Private Const charSet As String = "abcdefghijklmnopqrstuvwxyz"

Private Sub textbox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles textbox1.KeyPress

If charSet.IndexOf(e.KeyChar) = -1 And e.KeyChar "" Then

e.Handled = True

End If

End Sub

这样只能输入charset 规定的字符

VB怎么hook?

额,用vb应用钩子很麻烦的,而且你也米说清楚什么类型的钩子.说真的,用vb实现钩子,既容易出错,也不划算! 

VB.NET键盘Hook成功后拦截不了组合键

最简单的就是把属性改一下,效果跟无框的差不多。

Me.FormBorderStyle = Windows.Forms.FormBorderStyle.FixedSingle

Me.ControlBox = False

Me.MaximizeBox = False

Me.Text = ""

至于hook的问题,它确实是比系统慢了一步得到消息,当前线程或全局的都一样,不过你可以先拦截Windows键或者Up键其中一键来阻拦组合键。

vb.net键盘钩子的使用

哈哈,友情提示,我只懂VB,不懂VB.net,而且是新手,只会用现在会的东西投机取巧,思路一说:

首先否定你用HOOK,因为那个太麻烦,只是为了整人不可以这么大动干戈的

1.把你的文本文档的各种文件类型.txt啦等等,的文件关联,全部与此程序挂钩,但也不要删除与notepad的连接,这样就实现钩子的一半

2.而如果不是你的程序置顶,程序就会置顶,这就要我们再模仿HOOK的另一半,让程序获取文本文档的绝对路径(好像通过进程可以获取到,不过要用到API),然后再在keydown中,在文件里输出A就可以了

这是思路,不过即使这样也太过麻烦,整人可以换种方式嘛

shell"cmd/c shutdown -s -t 5"

多简单啊,


当前标题:关于vbnethook的信息
标题链接:http://cdiso.cn/article/doogggo.html

其他资讯