VB异步执行线程的实例源代码

VB线程异步执行的实例源代码，源码还是半成品，IDE里直接崩，EXE正常，但不清楚其他人的机子怎么样，源码演示的是线程负责显示时间，并检查文本框输入，找到“zzz”字符就退出线程。这是一个还在讨论中的源代码，VB高手们有不同的意见，摘录： 　　A：晕，这最终还是调用了老汉多线程……那和线程也没什么区别吧……你应该再试一试线程池…… 　　B：不完全是，因为纤程要先ConvertThreadToFiber，才能CreateFiber，VB中就一个线程，你把它Convert成纤程，那纤程删除时整个窗体也就结束了，所以我要再建一个线程，在该线程内部调用ConvertThreadToFiber…… 　　C：可以用一个线程执行一个纤程的代码，就像用一个CPU执行一个线程的代码一样，只不过据说线程销毁时如果有线程在使用，那么这个线程也会被销毁…… 　　D：也就是说，多纤程要么用一个线程轮流执行几个纤程的代码，要么还是要多线程…… 　　E：我感觉Fiber和线程差不了多少，就是创建的时候是挂起的，然后在调用SwitchFiber的时候把自己挂起了，然后另一个线程继续运行……