www.21code.com系统控制部分有好几个这样的例子
都很不错

解决方案 »

  1.   

    参考http://expert.csdn.net/Expert/topic/1377/1377234.xml?temp=.4382593
    VB里也可以实现真正的多线程1.最好把代码放在Active Dll里,编译时使用p代码方式,至少要装vbsp3以上
    2.线程函数里不能有VB的内置函数,比如left,trim等
    3.创建线程CreateThread的参数不要使用ByVal &0,使用变量
    3.主程序退出时要使用TerminateProcess(GetCurrentProcess, ByVal 0&)强行结束当前进程,否则有可能出错,这是两个API函数,请查相关资料
    具体示例请看
    http://www.planet-source-code.com/xq/ASP/txtCodeId.14479/lngWId.1/qx/vb/scripts/ShowCode.htm
      

  2.   

    1.用API:
    CreateThread
    2.用Timer控件