Discussion :

[Arola78]

Bonsoir,
Voici le problème qui m’occupe actuellement :
Sur un formulaire, j’ai 2 boutons, le 1er permet d’affiche le form en plein écran ou en écran réduit, le 2e débranche sur le formulaire suivant. Quand je clique sur le 1er bouton je mets à jour une table qui mémorise le format de l’écran sous forme 0 /1 (écran réduit / plein écran). Lorsque je clique sur le 2e bouton je récupère cette valeur en lisant ma table pour transmettre 0 ou 1 au formulaire suivant.
Pouvez vous me dire si il y a moyen de s’affranchir de l’étape Mise à Jour de la table, puis lecture de celle-ci ? Autrement dit, existe-t-il un moyen de passer des paramètres d’une Private Sub à une autre ?
Merci

[Brunodm13]

Bonjour,

dans le module de ton formulaire, en en-tête, tu dimensionnes une variable de type booléenne qui pourra être utilisée par tous les Private Sub de ton Form. Ensuite à toi de jouer

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Dim z As Boolean
Private Sub Bouton1()
 
.....
 
End Sub
 
Private Sub Bouton2()
 
.....
 
End Sub

Cordialement

Bruno

[Arola78]

Merci pour la réponse, mais

... dans le module de ton formulaire, en en-tête ...

Cela se trouve où ?

[User]

Salut,

Le module de ton formulaire c'est là ou se trouvent écrites les procédures évènementielles:

L'en-tête du module c'est tout en haut en dessous de Option Compare Database

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
Option Compare Database
 
Dim z as boolean
 
 
Private Sub Bouton1_click()
 
.....
 
End Sub
 
Private Sub Bouton2_click()
 
.....
 
End Sub

A+

[Arola78]

Bonsoir et merci Brunodm13 pour ta contribution, c'est exactement ce que je cherchais