VB6.0多线程的一个小例子。希望对你有帮助。。。。