bonjour,
j'ai écrit ce code pour un bouton dans une boite de dialogue mais le compilateur me rend une erreur "erreur de syntaxe".

voila le code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Commande4_Click()
Dim mdp As String
Const mot = "0000"
mdp = Texte2
 If mdp <> mot Then
   MsgBox ("Mot de passe non valide")
 Exit Sub
 Else: DoCmd.OutputTo(acOutputForm,"menu demande")
 
 
 
 
 
 
 End If
End Sub
aidez moi s'il vous plait.
merci