用VB6实现真正实用的多线程处理