用OpenThread获得的线程句柄怎么每次都不一样？

[因为我刚好遇见你]

代码如下：
Private Declare Function OpenThread Lib "kernel32.dll" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwThreadId As Long) As Long
Private Const THREAD_ALL_ACCESS = &H3FF

Private Sub Form_Activate()
Dim l As Long
l = OpenThread(THREAD_ALL_ACCESS, True, 10724)
Print l
End Sub

10724是用GetWindowThreadProcessId获取的线程ID
为什么每次打印出来的线程句柄都不一样？
新人求解答。。。

[因为我刚好遇见你]

自己顶一下，有人知道吗？拜托讲讲。。。

[Tiger_Zhao]

这个句柄是系统全局的标识，那么多程序在申请、释放。两次申请一样的概率比中彩票还低吧。