怎么用VB把图像处理成这种过渡效果

如何用VB把图像处理成这种过渡效果？
处理前：



处理后：



[解决办法]
有一个本 游戏编程的书里写过,但用VC代码,

你 短信我

我回家帮你找找,有这个API
[解决办法]
其实有比较快速的方法可以做到。
使用ALPHABLEND这个API就可以了。
将原始图片按照一个象素的高度横向分割。
然后将该长条图片和一个相同大小的黑色图片做ALPHABLEND。
只要一个循环（循环次数就是远图片的高度）
期间只要改变每次循环中的ALPHA通道参数就可以了。
如果楼主不明白这个API使用方法可以在VB版查找一下历史问题，以前有很多人问过。
MSDN也有例程。