C'est bien ça j'ai donc remplacer Declare par Declare Ptfsafe comme ci dessous à 2 endroit dans le code du frmMain et cela fonctionne de nouveau :
Private Declare PtrSafe Function FindWindow Lib "user32" Alias "FindWindowA" _ (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare PtrSafe Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Je savais qu'il y avait des problème de compatibilité du aux version mais je n'avais pas pensé à ça.