突破：VB6中使用安全多线程

    旧瓶装新酒，老树开新花。
    遥想当年研究vb6中的多线程，为求解而网际上四处奔波、八方碰壁，程序的一次次崩溃无情的摧残和消磨着我的耐心、精力和时间，被折磨的简直没有人样。匆匆数年，这个问题就像邻家女孩般始终在心里悄悄的占据着一席之地。时至今日忆起往昔，独怆然而泣下之老泪纵横有过之而无不及。唉，往事不堪回首......
    说书唱戏劝人芳，三条大道走中央，善恶到头终有报，人间正道是沧桑。咱还是说正事吧，今儿个我用vb6抠持出了个dll，用来在vb中安全使用多线程。对于稳定、安全的描述，还是留给尊敬的您吧。Go go go !!!

    下载地址：http://download.youkuaiyun.com/source/446182

    方法和属性：

文件信息
文件：  MT32.dll
版本：  1.0 . 0.0
版权： COPYRIGHT(C) BY CHENOE  2001 - 2009 .ALL RIGHTS RESERVED.
语言： 英语(美国)
描述： Win32 Multithread Library

作者信息
公司： CHENOE
网站： http: // www.chenoe.com
作者： 魏滔序(Modest)
邮箱： taoxu.wei@ 163 .com
博客： http: // blog.youkuaiyun.com / Modest

库信息
库名：Win32 Multithread Library  1.0
GUID：791FFAFF - DDCE - 4451 - BCA6 - 49CD2BD64006
版本： 1.0

枚举( Enum )

ThreadPriorityConstants
    THREAD_PRIORITY_IDLE 最低优先级(空闲时)
    THREAD_PRIORITY_LOWEST 比普通低二级
    THREAD_PRIORITY_BELOW_NORMAL 比普通低一级
    THREAD_PRIORITY_NORMAL 普通优先级    
    THREAD_PRIORITY_ABOVE_NORMAL 比普通高一级
    THREAD_PRIORITY_HIGHEST 比普通高二级
    THREAD_PRIORITY_TIME_CRITICAL 最高优先级

ThreadStateConstants
    THREAD_STATE_UNKNOWN 未知状态(线程未创建或发生错误)
    THREAD_STATE_RUNNING 线程运行中
    THREAD_STATE_UNSTARTED 线程未开始
    THREAD_STATE_STOPPED 线程已停止(强制结束或正常退出)
    THREAD_STATE_SUSPENDED 线程被挂起


接口( Interface )

类:Thread 

函数

CreateThread
功能：    创建线程
参数： ThreadObject 拥有线程函数的对象
    ThreadProc 线程函数名称
    Params 线程函数的参数
    ReturnObject 线程函数返回的是否为对象类型
    Suspending 线程创建后是否挂起
返回：    线程句柄

TerminateThread
功能：    强制结束线程
参数：    ExitCode 线程退出代码
返回：    函数执行是否成功

SuspendThread
功能：    挂起线程
参数：    无
返回：    函数执行是否成功

ResumeThread
功能：    继续执行被挂起的线程
参数：    无
返回：    函数执行是否成功

属性

ExitCode
功能：    返回线程退出码

ThreadPriority
功能：    设置或返回线程优先级

ThreadHandle
功能：    获得线程句柄

ThreadPseudoHandle
功能：    获得线程伪句柄

ThreadID
功能：    获得线程ID

IsExist
功能：    获得线程存活状态

ThreadState
功能：    获得线程状态

ThreadObject
功能：    获得拥有线程函数的对象

Result
功能：    获得线程函数返回的结果

事件

ThreadCreateSuccess
说明：    线程创建成功
参数：    ThreadHandle 创建成功后的线程句柄
    ThreadID 创建成功后的线程ID

ThreadCreateFailure
说明：    线程创建失败
参数：    无

ThreadStart
说明：    线程开始执行
参数：    ThreadHandle 开始执行的线程句柄
    ThreadID 开始执行的线程ID

ThreadFinish
说明：    线程正常执行完毕
参数：    ThreadHandle 执行的线程句柄
    ThreadID 执行完毕的线程ID

ThreadTerminate
说明：    线程被强迫结束
参数：    ThreadHandle 被强迫结束的线程句柄
    ThreadID 被强迫结束的线程ID
    ExitCode 退出代码

ThreadSuspend
说明：    线程被挂起
参数：    ThreadHandle 被挂起的线程句柄
    ThreadID 被挂起的线程ID

ThreadResume
说明：    线程继续执行
参数：    ThreadHandle 继续执行的线程句柄
    ThreadID 继续执行的线程ID

ThreadPriorityChange
说明：    线程优先级被改变
参数：    ThreadHandle 被改变优先级的线程句柄
    ThreadID 被改变优先级的线程ID
    OldPriority 被改变前的线程优先级
    NewPriority 被改变后的线程优先级

类:Threads 

函数

CreateThread
功能：    创建线程
参数： Key 线程对象在集合中的关键字
    ThreadObject 拥有线程函数的对象
    ThreadProc 线程函数名称
    Params 线程函数的参数
    ReturnObject 线程函数返回的是否为对象类型
    Suspending 线程创建后是否挂起
返回：    线程句柄

TerminateThread
功能：    强制结束线程
参数：    Key 线程对象在集合中的关键字
    ExitCode 线程退出代码
返回：    函数执行是否成功

SuspendThread
功能：    挂起线程
参数：    Key 线程对象在集合中的关键字
返回：    函数执行是否成功

ResumeThread
功能：    继续执行被挂起的线程
参数：    Key 线程对象在集合中的关键字
返回：    函数执行是否成功

属性

ExitCode
功能：    返回线程退出码
参数：    Key 线程对象在集合中的关键字

ThreadPriority
功能：    设置或返回线程优先级
参数：    Key 线程对象在集合中的关键字

ThreadHandle
功能：    获得线程句柄
参数：    Key 线程对象在集合中的关键字

ThreadPseudoHandle
功能：    获得线程伪句柄
参数：    Key 线程对象在集合中的关键字

ThreadID
功能：    获得线程ID
参数：    Key 线程对象在集合中的关键字

IsExist
功能：    获得线程存活状态
参数：    Key 线程对象在集合中的关键字

ThreadState
功能：    获得线程状态
参数：    Key 线程对象在集合中的关键字

ThreadObject
功能：    获得拥有线程函数的对象
参数：    Key 线程对象在集合中的关键字

Result
功能：    获得线程函数返回的结果
参数：    Key 线程对象在集合中的关键字

ThreadCount
功能：    线程对象集合中的线程对象数量
参数：    无

事件

ThreadCreateSuccess
说明：    线程创建成功
参数：    Key 线程对象在集合中的关键字
    ThreadHandle 创建成功后的线程句柄
    ThreadID 创建成功后的线程ID

ThreadCreateFailure
说明：    线程创建失败
参数：    Key 线程对象在集合中的关键字

ThreadStart
说明：    线程开始执行
参数：    Key 线程对象在集合中的关键字
    ThreadHandle 开始执行的线程句柄
    ThreadID 开始执行的线程ID

ThreadFinish
说明：    线程正常执行完毕
参数：    Key 线程对象在集合中的关键字
    ThreadHandle 执行的线程句柄
    ThreadID 执行完毕的线程ID

ThreadTerminate
说明：    线程被强迫结束
参数：    Key 线程对象在集合中的关键字
    ThreadHandle 被强迫结束的线程句柄
    ThreadID 被强迫结束的线程ID
    ExitCode 退出代码

ThreadSuspend
说明：    线程被挂起
参数：    Key 线程对象在集合中的关键字
    ThreadHandle 被挂起的线程句柄
    ThreadID 被挂起的线程ID

ThreadResume
说明：    线程继续执行
参数：    Key 线程对象在集合中的关键字
    ThreadHandle 继续执行的线程句柄
    ThreadID 继续执行的线程ID

ThreadPriorityChange
说明：    线程优先级被改变
参数：    Key 线程对象在集合中的关键字
    ThreadHandle 被改变优先级的线程句柄
    ThreadID 被改变优先级的线程ID
    OldPriority 被改变前的线程优先级
    NewPriority 被改变后的线程优先级

(完)