terminatethread 例子_terminatethread
2023-03-26 07:57:08
互联网
(资料图片仅供参考)
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。
本文就为大家分享到这里，希望小伙伴们会喜欢。
