Discussion :

[morobaboumar]

Bonjour Membres du forum!
Pourriez vous m'indiquer à quel moment doit on écrire "Option Explicit" dans un code ?
Quel est son rôle ?

J'ai écris le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub CLASSE_Ar_GotFocus()
If MsgBox("ATTENTION !!" & vbCrLf & "VOULEZ-VOUS VRAIMENT MODIFIER CET ELEMENT ?", vbQuestion + vbYesNo + vbDefaultButton2, "MODIFICATION") = vbNo Then
    Cancel = True
    Me.CLASSE_Ar.Requery
End If
End Sub

Ensuite écris: "Option Explicit" après "Option Compare Database".
Voici la capture du message d'erreur affichée:.
Quelle en est la solution ?
Cordialement.

[User]

Bonjour,

Cela permet de contrôler si toutes les variables que vous utilisez dans votre code sont bien déclarée avec un type de données bien précis.

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim Cancel as boolean

Si ce n'est pas le cas il vous le signale lors de la compilation.

Cela permet ainsi une meilleure gestion de la mémoire, car une variable non déclarée est par défaut de type variant et occupe plus de mémoire.

Le code est aussi plus propre et c'est plus facile et s'il y a une erreur de frappe au niveau de la variable il le détecte tout de suite.

Cdlt,

[loufab]

Bonjour,

En bref : systématiquement.

A mettre dans les options de création des modules.

Cordialement,

[tee_grandbois]

bonjour,
une chose quand même: cela ne sert à rien d'utiliser la constante variable Cancel si celle-ci n'est pas en paramètre dans l'évènement.

[marot_r]

Bonjour.

Pourriez vous m'indiquer à quel moment doit on écrire "Option Explicit" dans un code ?

A sa creation :-) ou lors d'une modification si elle n'y est pas.

Le meilleur moyen de faire cela en Access (et autre produits qui utilises VBA) est de cocher la declaration obligatoire des variables dans les options de l'editeur de code.

Quand j'ai deja beaucoup de modules sans cette declaration, j'utilise l'astuce suivante :

1. Je fais un rechercher/remplacer de Option Explicit par rien.
   Cela supprime tous les Option Explicit qui pourraient exister.
2. Puis je fais un rechercher/remplacer de Option Compare Database par Option Compare Database : Option Explicit.
   Cela rajoute l'option a tous les modules.

Et apres je compile pour savoir si j'ai des variables non declarees.
Une variable non declaree peut etre un signe d'erreur (ex : erreur d'orthographe dans le nom) ou de code inutile.

A+

[morobaboumar]

Bonjour !
Je vous remercie tous infiniment d'avoir donné une suite satisfaisante à ma discussion.
Cordialement.