Discussion :

[plasto590807]

bonjour,

voici ce que j'ai :





J'aimerai qu'un MsgBox apparait avant l'ouverture du formulaire.. Voici son code :

'************************************************
'* Qestionnaire Message box (MsgBox) OUI ou NON *
'************************************************
Private Sub Msgbox()

Dim reponse As Integer


reponse = Msgbox("Est-ce un nouvel Enregistrement ?", vbYesNo)

If reponse = vbYes Then
Frm_EnregistrementJoueur.Show 'ouvre le "formulaire ajouter JOUEUR(SE)
Unload Me 'fermeture du formulaire <coordonnées Joueur>

Else

End If
End Sub