OVH Cloud OVH Cloud

Question de débutant

3 réponses
Avatar
Benoit VALENZA
Bonjour à tous
je débute depuis 2h sur VB6

j'ai crée un projet comprenant 2 feuilles

feuille 1 : Name "depart"
feuille 2 : Name "arrivée"

Sur ma premiere feuille j'ai un champ texte vide
et un bouton qui m'affiche la feuille 2

Sur ma feuille 2 j'ai un champ texte et un bouton de sortie

Ce que je voudrais faire c'est taper du texte ds la feuille 1
et le voir apparaitre ds la feuille 2.
Ca ne marche qu'à moitié, je suis obligé d'appuyer sur la barre
d'espace pour que le champ texte de la feuille 2 soit actualisé

Voici ce que j'ai tapé ds la feuille 1:

Bouton : arrivee.show

Et dans la feuille 2 :
Champ texte :
var = depart.Text1.Text
Text1.Text = var

Je ne sais pas si je suis très clair
je vous remercie par avance pour vos explications

BV

3 réponses

Avatar
François Picalausa
Bonjour/soir,

Essaye ceci:

'Dans une feuille, form1 comportant un textbox, text1 et un commandbutton,
command1:
Option Explicit 'Force la déclaration des variables, ce qui évite bien des
problèmes

Private Sub Command1_Click()
Form2.Show 'affiche form2
End Sub

Private Sub Text1_Change()
Form2.Text1.Text = Text1.Text
'le texte de la textbox de la deuxième feuille = notre texte
End Sub

'Dans une autre feuille, form2 comportant un textbox, text1 et un
commandbutton, command1:
Private Sub Command1_Click()
Unload Me
'= unload form2 = déchargement de la feuille
End Sub

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"Benoit VALENZA" a écrit dans le message
de news:bgtqe4$gsk$
Bonjour à tous
je débute depuis 2h sur VB6

j'ai crée un projet comprenant 2 feuilles

feuille 1 : Name "depart"
feuille 2 : Name "arrivée"

Sur ma premiere feuille j'ai un champ texte vide
et un bouton qui m'affiche la feuille 2

Sur ma feuille 2 j'ai un champ texte et un bouton de sortie

Ce que je voudrais faire c'est taper du texte ds la feuille 1
et le voir apparaitre ds la feuille 2.
Ca ne marche qu'à moitié, je suis obligé d'appuyer sur la barre
d'espace pour que le champ texte de la feuille 2 soit actualisé

Voici ce que j'ai tapé ds la feuille 1:

Bouton : arrivee.show

Et dans la feuille 2 :
Champ texte :
var = depart.Text1.Text
Text1.Text = var

Je ne sais pas si je suis très clair
je vous remercie par avance pour vos explications

BV


Avatar
François Picalausa
Bonjour/soir,

Si les deux feuilles sont modeless, comme dans mon exemple, rien n'empêche
l'utilisateur d'entrer du texte dans form1 et qu'il s'affiche en direct dans
form2 qui avait été affichée au préalable...

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"Zoury" a écrit dans le message de
news:%
Private Sub Text1_Change()



Est-ce bien un bon endroit pour y affecte la valeur du text1 de la
form1? Il me semble que le Form_Load aurait été plus approprié. ;O)


Avatar
Zoury
ah! bon point! :O)

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
"François Picalausa" wrote in message
news:
: Bonjour/soir,
:
: Si les deux feuilles sont modeless, comme dans mon exemple, rien n'empêche
: l'utilisateur d'entrer du texte dans form1 et qu'il s'affiche en direct dans
: form2 qui avait été affichée au préalable...
:
: --
: François Picalausa (MVP VB)
: FAQ VB : http://faq.vb.free.fr
: MSDN : http://msdn.microsoft.com
:
:
: "Zoury" a écrit dans le message de
: news:%
: >> Private Sub Text1_Change()
: >
: > Est-ce bien un bon endroit pour y affecte la valeur du text1 de la
: > form1? Il me semble que le Form_Load aurait été plus approprié. ;O)
:
: