Vb调用多线程，调试能通过，生成了exe文件后，总报错：该内存不能为"read"，哪位大虾帮帮我。

Question

Private Declare Function CreateThread Lib "kernel32" (ByVal lpThreadAttributes As Long, ByVal dwStackSize As Long, ByVal lpStartAddress As Long, lpParameter As Long, ByVal dwCreationFlags As Long, LpthreadId As Long) As LongPrivate Declare Function TerminateThread Lib "kernel32" (ByVal hThread As Long, ByVal dwExitCode As Long) As LongPrivate Declare Function ResumeThread Lib "kernel32" (ByVal hThread As Long) As LongPrivate Declare Function SuspendThread Lib "kernel32" (ByVal hThread As Long) As LongPrivate Const CREATE_SUSPENDED = &H4    LongNull = 0
LongStackSize = 0
LongCreationFlags = CREATE_SUSPENDED myHandle=CreateThread(LongNull, LongStackSize, Addressof myFunction, LongNull, LongCreationFlags, LpthreadId)ResumeThread myHandle

Answer 1

To (八神)：我怎么搞不定啊。我把project的属性改成p-code的了，还是不行。  

Answer 2

一般情况下调试能通过 编译成P代码就可以运行 估计你系统应该是2000  在其他系统下试试吧还不行得话 应该是你得线程代码有问题  线程代码不能对VB窗体里得属性和控件进行操作 否则会出错
VB本来是不支持多线程滴 编译成P代码也只是投机取巧 要真正实现多线程是不可能得

Answer 3

下面是一个VB多线程得例子 从网上下得 自己该了下 需要得下下来看看吧 
http://xacker.go1.icpcn.com/downloads/sourcecode/threads.rar