initialiser une variable à une valeur différente de 0

Question

Bonsoir,

j'ai besoin d'une variable dite num pour plusieurs forms sous vb6, je place donc une instruction :
public num as integer

qui a pour effet d'initialiser la variable num à 0 quand on ouvre le programme.

Comment faire pour débuter avec 10 par exemple ?

Merci d'avance.

cs_Galain · Answer

Salut 
Dès que tu as besoin de ta variable tu mets num = 10 dans ton code et c'est tout et elles sera vue par toutes les feuilles avec la valeur 10

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

cs_Galain · Answer

elle sans "s" bien sûr

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

NSUADI · Answer

ICONIC FIGURE

tu peux par exemple mettre a=10 dans le load de ta form

Ackby · Answer

merci mais le problème est que je veux incrémenter cette variable d'une unité au fur et à mesure que je déroule différentes formes à l'aide de l'instruction :

num = num + 1

si je mets num = 10 à chaque fois que j'irai dans la form en question, la vriable num sera automatiquement réinitialisée à 10

en fait au lieu d'avoir 1 2 3 4
je veux 11 12 13

NSUADI · Answer

ICONIC FIGURE

je veux incrémenter cette variable d'une unité au fur et à mesure que je déroule différentes formes

je comprends pas très bien ce que tu veux dire par là...

cs_Galain · Answer

Si je comprends bien supposons tu as 4 formes 
On les appelle F1, F2, F3 et f4
C'est F1 qui lance le programme

F1 s'ouvre : num = 10
tu ouvres F2 : num = num +1
tu ouvres F3 : num = num +1
tu ouvres F4 : num = num +1
Par contre il ne faut pas ré-ouvrir F1 sinon num serait égal à 10

- Autre chose l'instruction Public num as integer doit être mis dans un module et non une forme afin d'être accessible par toutes les formes du projet

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

Ackby · Answer

merci, j'ai bien mis public dim as integer dans un module mais je ne peux pas mettre num = 10 dans le module ; par ailleurs, je veux lancer le programme depuis n'importe quelle forme (f1, f2, f3 ou f4)

cs_Galain · Answer

Salut
1) Tu ne peux pas lancer un programme depuis n'importe quelle forme : on est en programmation événementielle. Tu as forcément une forme d'ouverture du programme et elle est unique
Dans l'exemple num 10 va dans la forme F1 et les trois autres formes ont num num +1 dans leur code de chargement
 2) Astuce
Tu reprends les 4 formes avec num = num +1
tu crées une cinquième forme en forme de démarrage du programme avec 4 boutons de commandes B1, B2 , B3 et B4 . Chacun des boutons permet de charger la forme correspondante (avec F1.Show pour code du bouton B1). Dans la forme de démarrage tu mets num = 10 ( Va dans les propriétés du projet pour spécifier la forme de démarrage du programme)
A chaque fois que tu ouvres une forme avec un bouton num augmente de 1
Pour ouvrir une autre forme tu fermes la forme courante et tu appuies sur le bouton de ton choix

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

radcur · Answer

salut

désolé mon VB6 est loin...

et la sub main? elle est unique et peut servir comme objet de démarrage.
public sub Main()
num = 10
load f1
end sub

et selon les actions nécessaires ensuite dans les formes

num = num +1

Initialiser une variable à une valeur différente de 0

9 réponses

Votre réponse

Discussions similaires