Aloa,

I tested the threads, but when I compile my app, it crashes.
I don't know what I am doing wrong.

The purpose is to load in several threads some data in memory coming from a DB to make it faster during the usage of the app.

I call this method in the main bas

Public Sub Thread_Init()
Thread_Module.Initialize
Thread_Module.EnablePrivateMarshaling False ' I tried with True
End Sub

then onece all is initialized (DB etc..)
I call
Public Sub Thread_LoadMainData()
Call vbCreateThread(0, 0, AddressOf Reload_LoadData, 0, 0, 0)
'Reload_LoadData
End Sub

In the function Reload_LoadData :

Public Sub Reload_LoadData()
Dim sSQL As String
Dim oRecord As ADOFastRecord 'ADODB.Recordset
Dim sTable As String
Dim sID As String
Dim sKey As String

MsgBox "Thread_LoadMainData"

End Sub

Any help will be appreciated.

Thanks a lot

NB : The Trick, Your mailbox is full