这个文章很早以前发不过，后来空间挂了帖子丢了。。。重新发一下。。。
声明：代码是博主大三的时候写的，当时编码水平属于初级，代码规范技术应用还很基础，仅供参考，请勿喷。。。
某天早上在VBGOOD翻坛子里的帖子，突然看到了自己曾经在软件发布区发布的一个帖子，基于数据包过滤的网址过滤软件--(VB+PB) ，个人微博URL:http://fenlog.com/post/55.html。
...
远程屏幕传输，不用多解释了。这个代码很简单，就是将屏幕截图成JPG，然后发送数据，接收到之后显示出来，效率很低很低。。。 我原来做过一个分块差异比较的传输算法，是将屏幕分成M*N的矩阵，然后每个块去1-2个特征点，比较前后特征点的RGB值是否发生改变来判定这个块是否发生变化，变化了就发送这个块。这么操作效率是高了那么一点，但CPU占用很高（VB本身也不是干着活用的，效率比较低）。悲剧的是那份代码在一次硬盘出意外之后木有了。。。泪流满面。。。
这份代码至少给想了解这方面原理的同学不少启发，从屏幕截取到传输与显示，winsock应用和传输协议等等。
...
这几天做点家伙，用到了很多动态调用的实例，淘到了一些比较有意思的代码，都贴出来涨涨人气。
这份代码是动态调用API的例子。使用的人类(Supermanking)同学（暂时称为同学吧。。比较亲切）做的APIClass类，着实很强大。
调用这个类的代码如下：
Dim API As New APIClass
Dim APIScript As String
...
从内存中加载并调用DLL的代码，很邪恶，VBGOOD的仙剑魔同学从C翻译成VB的。
直接在内存中调用DLL中的函数，根据这个代码会产生很邪恶的想法，进而编出很邪恶的程序。。。。我啥也没说。。。
...
一些功能比如sendmessage、截屏等等在SYSTEM权限下会不工作，以前没有碰到过这个情况所以一直没去处理，前两天做模拟点击的时候必须处理这个情况，于是有了个这个传说中的降权的代码。SYSTEM权限的进程建立普通权限的进程第一反应就是CreateProcessAsUser函数。于是有了下面的代码：
Option Explicit
...