Procedure

Bonjour,



en vb 6
je définis dans un module la procédure sub suivante

Option Explicit

Public Nm

Sub AjouterNom(Team, ChaineRetour)

Dim Prompt, Nm
Dim WrapCharacter
Prompt = "Saisissez un salarié de" & Team
Nm = InputBox(Prompt, "Boîte de Saisie")
WrapCharacter = Chr(13) + Chr(10)
ChaineRetour = Nm & WrapCharacter
End Sub

et quand je l'appelle dans un bouton de commande comme ceci

Private Sub CmdMarketing_Click()
Dim Team
Team = "Marketing"
AjouterNom Team, Nm
TxtMarketing.Text = TxtMarketing.Text & Nm
End Sub

cela fonctionne mais si je mets AjouterNom(Team,Nm) donc avec la parenthèse selon le même type d'écriture Sub AjouterNom(Team, ChaineRetour) que lors de sa création il m'affiche une erreur et me dit expected =
je ne comprends pas quelq'un peut il m'expliquer
à l'avance merci