Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic renvoi d'une variable d'un form à l'autre ?!

renvoi d'une variable d'un form à l'autre ?!

3 réponses
Avatar
Eric
bonjour à tous

j'essaie de faire créer une fonction, mais je n'y arrive pas ;(
pourtant c'est tout bête (j'imagine)

voilà ce que je veux faire,

depuis saisie1.frm, j'ouvre un saisie2.frm, dans saisie2.frm, l'utilisateur
devra choisir une valeur parmi plusieurs, en validant le choix, saisie2.frm
se ferme et doit renvoyer cette valeur dans saisie2.frm

voici un brouillon de code :

------------------------------------
Dans saisie1.frm

Private Sub enregistre_Click()
saisie2.Show 1
if valeurchoisie = 0 then
' ------->valeurchoisie est la valeur qui est saisie dans saisie2.fr,
....
end if
if valeurchoisie = 1 then
....
end if
end sub

---------------------------------------
Dans saisie2.frm

Private Sub enregistre_Click()
valeurchoisie = txtsaisi
unload saisie2
exit sub
end sub

voilà

je ne sais pas comment définir ma variable valeurchoisie pour qu'elle
retourne sa valeur dans le code de saisie1

si quelqu'un peut m'aider, un grand merci

meilleures salutations à tous et bonnes fêtes

Eric
--
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
X
Bonsoir, tu dis:

voilà ce que je veux faire, depuis saisie1.frm, j'ouvre un saisie2.frm, dans
saisie2.frm, l'utilisateur
devra choisir une valeur parmi plusieurs, en validant le choix, saisie2.frm
se ferme et doit renvoyer cette valeur dans saisie2.frm [FORM1 JE PRESUME]

Réponse :

Public ma_variable as String ' 1
sub form1_load() ' 2
load form2 ' 3
form2.show ' 4
msgbox ma_variable ' ici = "bonjour de la form2" ' 5
end sub
'
sub form2_load() ' 6
form1.ma_variable = "bonjour de form2" ' 7
unload form2 ' 8
end sub ' 9

cycle:
1,2,3,4 -> 6,7,8,9 -> 5
--------------------------------


"Eric" a écrit dans le message de news:

| bonjour à tous
|
| j'essaie de faire créer une fonction, mais je n'y arrive pas ;(
| pourtant c'est tout bête (j'imagine)
|
| voilà ce que je veux faire,
|
| depuis saisie1.frm, j'ouvre un saisie2.frm, dans saisie2.frm,
l'utilisateur
| devra choisir une valeur parmi plusieurs, en validant le choix,
saisie2.frm
| se ferme et doit renvoyer cette valeur dans saisie2.frm
|
| voici un brouillon de code :
|
| ------------------------------------
| Dans saisie1.frm
|
| Private Sub enregistre_Click()
| saisie2.Show 1
| if valeurchoisie = 0 then
| ' ------->valeurchoisie est la valeur qui est saisie dans saisie2.fr,
| ....
| end if
| if valeurchoisie = 1 then
| ....
| end if
| end sub
|
| ---------------------------------------
| Dans saisie2.frm
|
| Private Sub enregistre_Click()
| valeurchoisie = txtsaisi
| unload saisie2
| exit sub
| end sub
|
| voilà
|
| je ne sais pas comment définir ma variable valeurchoisie pour qu'elle
| retourne sa valeur dans le code de saisie1
|
| si quelqu'un peut m'aider, un grand merci
|
| meilleures salutations à tous et bonnes fêtes
|
| Eric
| --
|
|
|
Avatar
Eric
un grand merci

c'est exactement ca¨

eric

"X" <.> a écrit dans le message de
news:%
Bonsoir, tu dis:

voilà ce que je veux faire, depuis saisie1.frm, j'ouvre un saisie2.frm,


dans
saisie2.frm, l'utilisateur
devra choisir une valeur parmi plusieurs, en validant le choix,


saisie2.frm
se ferme et doit renvoyer cette valeur dans saisie2.frm [FORM1 JE PRESUME]

Réponse :

Public ma_variable as String ' 1
sub form1_load() ' 2
load form2 ' 3
form2.show ' 4
msgbox ma_variable ' ici = "bonjour de la form2" ' 5
end sub
'
sub form2_load() ' 6
form1.ma_variable = "bonjour de form2" ' 7
unload form2 ' 8
end sub ' 9

cycle:
1,2,3,4 -> 6,7,8,9 -> 5
--------------------------------


"Eric" a écrit dans le message de news:

| bonjour à tous
|
| j'essaie de faire créer une fonction, mais je n'y arrive pas ;(
| pourtant c'est tout bête (j'imagine)
|
| voilà ce que je veux faire,
|
| depuis saisie1.frm, j'ouvre un saisie2.frm, dans saisie2.frm,
l'utilisateur
| devra choisir une valeur parmi plusieurs, en validant le choix,
saisie2.frm
| se ferme et doit renvoyer cette valeur dans saisie2.frm
|
| voici un brouillon de code :
|
| ------------------------------------
| Dans saisie1.frm
|
| Private Sub enregistre_Click()
| saisie2.Show 1
| if valeurchoisie = 0 then
| ' ------->valeurchoisie est la valeur qui est saisie dans saisie2.fr,
| ....
| end if
| if valeurchoisie = 1 then
| ....
| end if
| end sub
|
| ---------------------------------------
| Dans saisie2.frm
|
| Private Sub enregistre_Click()
| valeurchoisie = txtsaisi
| unload saisie2
| exit sub
| end sub
|
| voilà
|
| je ne sais pas comment définir ma variable valeurchoisie pour qu'elle
| retourne sa valeur dans le code de saisie1
|
| si quelqu'un peut m'aider, un grand merci
|
| meilleures salutations à tous et bonnes fêtes
|
| Eric
| --
|
|
|




Avatar
X
On peut utiliser aussi les modules, mais personnellement je suis contre, ça
rend enore plus lourd, et la taille, et la compréhension, les variables
publics sont bien plus pratiques :o)



"Eric" a écrit dans le message de news:

| un grand merci
|
| c'est exactement ca¨
|
| eric
|
| "X" <.> a écrit dans le message de
| news:%
| > Bonsoir, tu dis:
| >
| > voilà ce que je veux faire, depuis saisie1.frm, j'ouvre un saisie2.frm,
| dans
| > saisie2.frm, l'utilisateur
| > devra choisir une valeur parmi plusieurs, en validant le choix,
| saisie2.frm
| > se ferme et doit renvoyer cette valeur dans saisie2.frm [FORM1 JE
PRESUME]
| >
| > Réponse :
| >
| > Public ma_variable as String ' 1
| > sub form1_load() ' 2
| > load form2 ' 3
| > form2.show ' 4
| > msgbox ma_variable ' ici = "bonjour de la form2" ' 5
| > end sub
| > '
| > sub form2_load() ' 6
| > form1.ma_variable = "bonjour de form2" ' 7
| > unload form2 ' 8
| > end sub ' 9
| >
| > cycle:
| > 1,2,3,4 -> 6,7,8,9 -> 5
| > --------------------------------
| >
| >
| > "Eric" a écrit dans le message de news:
| >
| > | bonjour à tous
| > |
| > | j'essaie de faire créer une fonction, mais je n'y arrive pas ;(
| > | pourtant c'est tout bête (j'imagine)
| > |
| > | voilà ce que je veux faire,
| > |
| > | depuis saisie1.frm, j'ouvre un saisie2.frm, dans saisie2.frm,
| > l'utilisateur
| > | devra choisir une valeur parmi plusieurs, en validant le choix,
| > saisie2.frm
| > | se ferme et doit renvoyer cette valeur dans saisie2.frm
| > |
| > | voici un brouillon de code :
| > |
| > | ------------------------------------
| > | Dans saisie1.frm
| > |
| > | Private Sub enregistre_Click()
| > | saisie2.Show 1
| > | if valeurchoisie = 0 then
| > | ' ------->valeurchoisie est la valeur qui est saisie dans saisie2.fr,
| > | ....
| > | end if
| > | if valeurchoisie = 1 then
| > | ....
| > | end if
| > | end sub
| > |
| > | ---------------------------------------
| > | Dans saisie2.frm
| > |
| > | Private Sub enregistre_Click()
| > | valeurchoisie = txtsaisi
| > | unload saisie2
| > | exit sub
| > | end sub
| > |
| > | voilà
| > |
| > | je ne sais pas comment définir ma variable valeurchoisie pour qu'elle
| > | retourne sa valeur dans le code de saisie1
| > |
| > | si quelqu'un peut m'aider, un grand merci
| > |
| > | meilleures salutations à tous et bonnes fêtes
| > |
| > | Eric
| > | --
| > |
| > |
| > |
| >
| >
|
|