multiThread's question in vb6

[rackeychen]

Hello
When I create a thread in my vb6 program, I met some problems:
1 if i create a thread , in the debug mode , I can not terminate the thread.
I use createThread() function to create a thread as following:

gThreadHandle = CreateThread(ByVal 0&, ByVal 0&, AddressOf Module1.sweep_test, VarPtr(0), ByVal 0&, gThread)

and I use terminateThread to terminate my thread:

rc = TerminateThread(gThreadHandle, exitCode)
CloseHandle (gThreadHandle)
2. if I make a exe. but the exe can not create the thread. and the message told me that some address can not be written.

I have no idea of solving these problems. Hope you can give me some tips.
thanks in advance.
the attachment is my project