terminatethread 例子(terminatethread)
发布日期:2023-02-10 00:56:14 来源: 编辑:
关于terminatethread 例子,terminatethread这个很多人还不知道,今天菲菲来为大家解答以上的问题,现在让我们一起来看看吧!
1、VB6.0的。
2、代码如5261下。
3、单击窗体4102效果就1653显现。
4、版==权==============Option ExplicitPrivate Declare Function GetCurrentThread Lib "kernel32" () As LongPrivate Declare Function GetExitCodeThread Lib "kernel32" (ByVal hThread As Long, lpExitCode As Long) As LongPrivate Declare Function TerminateThread Lib "kernel32" (ByVal hThread As Long, ByVal dwExitCode As Long) As LongPrivate Sub Form_Click()Dim hT As OLE_HANDLE, lEC As LonghT = GetCurrentThreadGetExitCodeThread hT, lECTerminateThread hT, lECEnd Sub。
本文到此分享完毕,希望对大家有所帮助。
标签: terminatethread