richiamare exe e farlo divenare mdichild

salve a tutti
sto utilizzando le api :
FindWindow
SetParent
per richiamare altri exe in modo da farli diventare child rispetto al chiamante , ma propio
nn funziona
codice:
    F = Shell(a, 1)
            
    idChild = FindWindow("ThunderRT6FormDC", f)

    CC = SetParent(idChild, Me.hWnd)
        
    'Call GetWindowThreadProcessId(idChild, H_Appoggio) ' questo propio nn so a che serve
						ma mi hanno detto di meterlo!!
in cosa sbaglio_