仅供参考，自己稍加修改即可达到你要求的效果。http://hi.baidu.com/ctralt/blog/item/65b389fdf507741709244daf.html
我只会VB
erzhsbftre
