写给VB.NET程序员^_^

　　老生常谈了：子类化。

　　 我们都知道在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声明先：

　　Declare Function SubClass& Lib "dssubcls" (ByVal HwndSubclass&, _

　　 Optional ByVal Address& = 0, _

　　 Optional ByVal OldStyle& = 0, _

　　 Optional ByVal NewStyle& = 0, _

　　 Optional ByVal Ext& = 0, _

　　 Optional ByVal SubClass& = 0)

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

　　Declare Function SubClass Lib "dssubcls" (ByVal HwndSubclass As Integer, Optional ByVal Address As Integer = 0, Optional ByVal OldStyle As Integer = 0, Optional ByVal NewStyle As Integer = 0, Optional ByVal Ext As Integer = 0, Optional ByVal SubClass As Integer = 0) As Integer