在VB中如何实现多线程？？？

Question

谢谢各位高手

Answer 1

Public Declare Function CreateThread Lib "kernel32" Alias "CreateThread" (lpThreadAttributes As SECURITY_ATTRIBUTES, ByVal dwStackSize As Long, lpStartAddress As Long, lpParameter As Any, ByVal dwCreationFlags As Long, lpThreadId As Long) As Long
在vb里限制太多，线程不安全...
搜索一下"多线程"有很多例子，都不大实用。

Answer 2

Dim t As New Threading.Thread(AddressOf ThreadProc)
t.Start()'================================Public Sub ThreadProc()
    'code hear
End Sub

Answer 3

如果线程要求精度不高，还是用Timer模拟吧，我就是没有解决安全线程才转到VC的