VB.NET声明API详细描述

在向大家详细介绍VB.NET声明API之前，首先让大家了解下API函数和DLL去修改目标窗口的默认处理函数，然后全面介绍VB.NET声明API。

我们都知道在VB6里面可以用API函数来进行子类化，以处理自身的窗体过程；如果跨进程，这就麻烦了，由于我们的函数在我们的进程中（废话），而目标进程的窗口的消息处理函数在目标进程（还是废话），所以只能想办法把我们的代码放到对方进程中去执行——并且要告知我们的进程得到了什么消息。恐怕写汇编就有点吓人了，于是大家都写DLL，其原理就是把回调函数放到一个DLL里面注入到对方进程，DLL去修改目标窗口的默认处理函数——把消息发送给我们。

当然也有“另类”一点的：http://www.it-berater.org/ThueDownloads/index.shtml上面有一个 DLL包，其中含有一个dssubcls.dll，用它，可以轻松的完成我们的工作：就像调用一个API一样简单，而且在我们的程序中使用回调函数！呵呵，省去了自己写DLL的麻烦之后，这些好处足以吸引各位观众了吧？

好了，VB6的代码大家可以在下载的压缩包中找到，作者提供了一个以记事本为基础的实例（在\dssubcls目录下），非常详细无需详细叙述了。关键是在VB.NET里面如何使用它——如何声明API，如何进行回调，看用来子类化的API的VB6声明先：

转化成VB.NET声明API类似下面的样子（习惯使然，我把&展开成了As Integer）：

这不是很好嘛？问题来了，这样的声明在VB6里面可以使用Addressof function来传入第二个参数（参见你下载的源码），但是在VB.NET里面直接Addressof就不成了——我们需要委托一个回调：

这个委托，对应的是以下函数：

使用时，需要注意先实例化这个委托：

此时，fix_COCD就是我们的mCallback函数引用了，用更直观的观点来看，fix_COCD就是一个指向mCallback的指针，相当于 VB6里面的Addressof function得到的结果，看似问题解决了，于是我们写了以下代码来搞对方的进程窗体消息：

问题真是接踵而至！IDE提示变量类型不符！！事实确实如此，我们把一个HookCallBack类型当做Integer来传递，无法通过检查，那么强行转换吧？当然，你可以去试试。这时，我所做的是，修改这个API声明：

使之符合我们的调用？有点倒行逆施？并非如此，当你习惯了修改API声明之后，会发现有些事变得如此简单，有些事需要你重新认识——对于WIN32 API也是如此。

至此，VB.NET声明API大功告成。

【编辑推荐】

详细讲述VB.NET开发控件 VB.NET Control类的属性和方法 解析VB.NET如何连接数据库 VB.NET应用程序中多线程的应用实例 浅析VB.NET程序学习经验