VB实现多线程的模式..