Одновременный вызов функции из нескольких потоков

CComPort ComPort1, ComPort2, ComPort3;

    
        1Load = AfxBeginThread(Load1Ch, DLG, THREAD_PRIORITY_NORMAL, 0, CREATE_SUSPENDED);
        1Load->ResumeThread( );
    
        2Load = AfxBeginThread(Load2Ch, DLG, THREAD_PRIORITY_NORMAL, 0, CREATE_SUSPENDED);
        2Load->ResumeThread( );
 
        3Load  = AfxBeginThread(Load3Ch, DLG, THREAD_PRIORITY_NORMAL, 0, CREATE_SUSPENDED);
        3Load ->ResumeThread( );

    
                LoadTest(&ComPort1, "C:\\Users\\111.mot")  //Load1Ch
                LoadTest(&ComPort2, "C:\\Users\\111.mot")  //Load2Ch
                LoadTest(&ComPort3, "C:\\Users\\222.mot")  //Load3Ch

BOOL LoadTest(CComPort *ComPort, CString FileName)
{
 
    DWORD len = 0;
    CString wCommand, rCommand;
    CString msg;
    
    GetRS232Buf(ComPort, &msg);
 
    wCommand.Format("L");
    // выдать команду
    if (!ComPort->WriteBlock((LPBYTE)wCommand.GetBuffer(wCommand.GetLength()), wCommand.GetLength()))
        //if (!ComPort.PutByte(0x31))
    {
        return FALSE;
    }
    Sleep(100);
    // получить ответ
    len = GetCommand(ComPort, 'L', &rCommand);
    if (len == 0) return FALSE;
 
    if (LoadHexFile(ComPort, FileName)) return FALSE;
 
    GetRS232Buf(ComPort, &msg);
 
    wCommand.Format("R");
    // выдать команду
    if (!ComPort->WriteBlock((LPBYTE)wCommand.GetBuffer(wCommand.GetLength()), wCommand.GetLength()))
    {
        return FALSE;
    }
    Sleep(10);
    // получить ответ
    len = GetCommand(ComPort, 'R', &rCommand);
    if (len == 0) return FALSE;
 
    return TRUE;
 
}