VB6代码,仅仅一个模块,非常方便移植到其他工程,重绘自带按钮,仿QQ2009,带渐变效果。