在VB6中怎么使用多线程?