shift后门源码,VB编写