Erreur sur ''End Function''

bonjour
j'ai une erreur qui apparaît sur 2 fin de procédure.

Voici l'érreur:

Citation:

---

La fonction 'GetID' ne retourne pas une valeur pour tous les chemins de code. Une exception de référence null peut se produire au moment de l'exécution lorsque le résultat est utilisé.

---

Elle se trouve à cet endroit:

Code:

---

1 2 3 4 5 6 7

Public Function GetID(ByVal name) hWin = FindWindow(GN, vbNullString) Call GetWindowThreadProcessId(hWin, pid) End Function

---

C'est la première fois que j'ai un problème sur "End Function".
Pourriez-vous me donner quelques informations svp.

Complément :

Code:

---

1 2 3

Public Const GN As String = "D3D Window" Public hWin As Integer

---

Merci

Bonjour,

Une fonction doit retourner un résultat, utilise "Return"

Code:

---

1 2	Return GetWindowThreadProcessId(hWin, pid)

---

Hervé.

Et je complèterais par :

Si tu n'as pas besoin que ta fonction retourne une valeur, remplace-la alors par une procédure (sub)