Discussion :

[adelsunwind]

Comme vous le savez on peut placer des calculs sur des controles d'un formulaire dans un form_current. Dans ce cas ces calculs sont actualisés en permanance.
Donc si j ai plusieurs calculs à faire les temps de réponses augmentent considérablement, ce qui devient genant.
Dans mon formulaire j ai des onglets et dans chaque onglet j ai des calculs sur des controles.
Est il possible d' avoir un genre de form_current uniquement sur les onglets et non pas sur tout le formulaire.
En fait les calculs s executerait uniquement quand l onglet est actif ( et non pas sur un click); les autres onglets n étant pas actifs alors les autres calculs restent en stand by.
Ca éviterait de mettre tout dans le form_current général du formulaire.

[Invité]

Bonjour

Peut-être en plaçant des sous-formulaires dans tes onglets, ils ont chacun leur Form_Current.

Philippe

[adelsunwind]

Interressant ce que tu me dis.
Sauf que dans chaque onglet j ai des controles, des étiquettes et des graph. Est ce que ca veut dire que je dois placer tout cela dans des sous formulaires auquel cas comment dois je procéder sans que ca me chamboule tout ce que j ai déjà fait.
Merci

[adelsunwind]

Bonsoir à tous quelqu un aurait il une astuce pour éviter mon temps d execution de mise à jour qui s allonge de plus en plus puisque mon code grossit....

[loufab]

Bonjour,

Ce qu'on peut dire d'un onglet c'est qu'il n'en affiche qu'un à la fois. On ne peut pas voir à la fois le premier et le second.

Donc dans ton current_form tu ne fais que les calculs pour l'onglet visible (en espérant qu'ils ne dépendent pas du calcul d'autres onglets )

Les autres calculs sont fait à la demande, donc sur l'activation de chaque onglet tu fais le calcul de l'onglet qui s'affiche.

L'activation n'est pas déclenché par le "sur click" mais par le "sur changement"
Pour savoir quel onglet est actif le me.nom_du_controle_onglet renvoie l'indice.

Code :

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

1
2
3
4
5
select case me.ctlTab0
case 0
   ' calcul pour l'onglet 1
case 1
 ....

Ps : n'oublie pas de passer le pointeur de la souris en mode sablier.

Cordialement,

[adelsunwind]

Merci Loufab.
Donc je dois considerer les case X comme des form_current pour chaque onglet.
Comment est ce que je fais pour les 15 variables utilisées dans form current qui étaient regroupées ensemble. Là est ce que je dois les déclarer dans chaque case ou est ce que je dois les laisser juste apres le form_current.
Par contre j ai pas saisi le :
" Ps : n'oublie pas de passer le pointeur de la souris en mode sablier."
Merci encore.
Merci à tous

[loufab]

Dans l'événement Sur changement de l'onglet tu places les calculs de chaque onglet dans leur Case respectif.
Tu peux déclarer les variables dans également dans chaque CAse ou tu en as besoin.
Tu auras donc :

Code :

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

1
2
3
4
5
6
7
8
9
select case me.ctlTab0   ' ctlTab0 est le nom de ton controle onglet
    Case 0  ' onglet 1
        dim var as ....
        ... traitement des calculs de l'onglet 1
    case 1  ' onglet 2
        dim var as ...
        ... traitement des calculs de l'onglet 2
... etc avec les autres onglets.
end select

Dans ton événement Current du formulaire fait simplement un appel à la procédure ci-dessus.

Code :

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

ctlTab0_change

Il fera le reste seul.

La souris en mode sablier ça signale à l'utilisateur qu'il y a un traitement en cours. En début du select tu places

Code :

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

application.Screen.MousePointer= 11  ' pointeur type sablier

après le end select tu place

Code :

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

application.Screen.MousePointer= 0   ' pointeur par défaut

Simple.