Private Declare Function CreateThread Lib "kernel32" (ByVal Null1 As Long, ByVal Null2 As Long, ByVal StartAddress As Long, Parameter As Any, ByVal Null3 As Long, ThreadId As Long) As Long 使用办法 Dim Identifier As Long CreateThread 0, 0, AddressOf 函数, 0, 0, Identifier 但是这个函数必须得是模块里的函数,否则将无法用AddressOf 取得它的地址
使用办法
Dim Identifier As Long
CreateThread 0, 0, AddressOf 函数, 0, 0, Identifier
但是这个函数必须得是模块里的函数,否则将无法用AddressOf 取得它的地址