vbnet做的搞怪震动