J'ai une application avec dedans plusieurs form qui sont active en cliquant
dans mon menu et je souhaite lorsque je clique sur un bouton de ma form2
récupérer dans ma form1 la valeur d'un label de ma form2 et mettre ma form1
au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en
recherchant sur le newsgroup
je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de
code pour m'expliquer ca serait super sympa
Dans mon menu
Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MenuItem_fiches.Click
Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de
référence à l'objet ?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
le problème c'est que le je ne peux mettre en application.run mon conteneur cela donne une erreur !
"Twix" a écrit dans le message de news:
oui et tu declare toutes tes forms de ton prog avec des variables comme dans mon exemples
"Twix" a écrit dans le message de news: eQfa$
ok pour le module mais ensuite le sub main je le déclare ou dans mon application ?
Module Demarrage Public F1 as Form1 Public F2 as Form2
Public Sub Main Application.Run(F1) End Sub End Module
dans le module justement (j'avais oublier de mettre "End Module", desole)
Et le application.run correspond à quoi par rapport à l'instruction .show
application.run(...) va te permettre de choisir quel form tu veux lancer au demarrage.
"LOIC" a écrit dans le message de news: %23C$
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en recherchant sur le newsgroup je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de code pour m'expliquer ca serait super sympa
Dans mon menu Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem_fiches.Click Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de référence à l'objet ? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim form_composant as composant
composant.textbox.text = label1.text = '1'
composant.show()
End Sub
Merci
le problème c'est que le je ne peux mettre en application.run mon conteneur
cela donne une erreur !
"Twix" <twixy@free.fr> a écrit dans le message de news:
e0uhfuu3EHA.2572@TK2MSFTNGP11.phx.gbl...
oui
et tu declare toutes tes forms de ton prog avec des variables comme dans
mon exemples
"Twix" <twixy@free.fr> a écrit dans le message de news:
eQfa$Xr3EHA.2012@TK2MSFTNGP15.phx.gbl...
ok pour le module mais ensuite le sub main je le déclare ou dans mon
application ?
Module Demarrage
Public F1 as Form1
Public F2 as Form2
Public Sub Main
Application.Run(F1)
End Sub
End Module
dans le module justement (j'avais oublier de mettre "End Module", desole)
Et le application.run correspond à quoi par rapport à l'instruction
.show
application.run(...) va te permettre de choisir quel form tu veux lancer
au
demarrage.
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de news:
%23C$2Enm3EHA.2196@TK2MSFTNGP14.phx.gbl...
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en
cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de
ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et
mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en
recherchant sur le newsgroup
je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout
de code pour m'expliquer ca serait super sympa
Dans mon menu
Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles MenuItem_fiches.Click
Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de
référence à l'objet ?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
le problème c'est que le je ne peux mettre en application.run mon conteneur cela donne une erreur !
"Twix" a écrit dans le message de news:
oui et tu declare toutes tes forms de ton prog avec des variables comme dans mon exemples
"Twix" a écrit dans le message de news: eQfa$
ok pour le module mais ensuite le sub main je le déclare ou dans mon application ?
Module Demarrage Public F1 as Form1 Public F2 as Form2
Public Sub Main Application.Run(F1) End Sub End Module
dans le module justement (j'avais oublier de mettre "End Module", desole)
Et le application.run correspond à quoi par rapport à l'instruction .show
application.run(...) va te permettre de choisir quel form tu veux lancer au demarrage.
"LOIC" a écrit dans le message de news: %23C$
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en recherchant sur le newsgroup je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de code pour m'expliquer ca serait super sympa
Dans mon menu Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem_fiches.Click Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de référence à l'objet ? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim form_composant as composant
composant.textbox.text = label1.text = '1'
composant.show()
End Sub
Merci
Twix
voici la solution avec une feuille MDI et des feuilles enfants (children) :
Module ModuleDemarrage Public MDI As New MDIForm Public F1 As New Form1 Public F2 As New Form2 Public F3 As New Form3
Public Sub Main() F1.MdiParent = MDI F2.MdiParent = MDI F3.MdiParent = MDI
MDI.Show() Application.Run(MDI) End Sub End Module
a+
"LOIC" a écrit dans le message de news: %23C$
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en recherchant sur le newsgroup je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de code pour m'expliquer ca serait super sympa
Dans mon menu Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem_fiches.Click Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de référence à l'objet ? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim form_composant as composant
composant.textbox.text = label1.text = '1'
composant.show()
End Sub
Merci
voici la solution avec une feuille MDI et des feuilles enfants (children) :
Module ModuleDemarrage
Public MDI As New MDIForm
Public F1 As New Form1
Public F2 As New Form2
Public F3 As New Form3
Public Sub Main()
F1.MdiParent = MDI
F2.MdiParent = MDI
F3.MdiParent = MDI
MDI.Show()
Application.Run(MDI)
End Sub
End Module
a+
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de news:
%23C$2Enm3EHA.2196@TK2MSFTNGP14.phx.gbl...
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en
cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de
ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et
mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en
recherchant sur le newsgroup
je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de
code pour m'expliquer ca serait super sympa
Dans mon menu
Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles MenuItem_fiches.Click
Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de
référence à l'objet ?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
voici la solution avec une feuille MDI et des feuilles enfants (children) :
Module ModuleDemarrage Public MDI As New MDIForm Public F1 As New Form1 Public F2 As New Form2 Public F3 As New Form3
Public Sub Main() F1.MdiParent = MDI F2.MdiParent = MDI F3.MdiParent = MDI
MDI.Show() Application.Run(MDI) End Sub End Module
a+
"LOIC" a écrit dans le message de news: %23C$
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en recherchant sur le newsgroup je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de code pour m'expliquer ca serait super sympa
Dans mon menu Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem_fiches.Click Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de référence à l'objet ? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim form_composant as composant
composant.textbox.text = label1.text = '1'
composant.show()
End Sub
Merci
LOIC
Apparamment y'a pas d'erreur de compil tout fonctionne bien (le module est bien configuré en démarrage) mais je n'obtiens pas de passage de paramètre d'un form à l'autre
pour tester Si je met un bouton sur ma form 2 et que je met dans onclick une instruction style form1.labelTest.text = Test Dans mon form 1 rine ne se passe !!
Y'a t'il quelque chose de spécial à faire dans les déclaration des form eux même ?
"Twix" a écrit dans le message de news: %
voici la solution avec une feuille MDI et des feuilles enfants (children) :
Module ModuleDemarrage Public MDI As New MDIForm Public F1 As New Form1 Public F2 As New Form2 Public F3 As New Form3
Public Sub Main() F1.MdiParent = MDI F2.MdiParent = MDI F3.MdiParent = MDI
MDI.Show() Application.Run(MDI) End Sub End Module
a+
"LOIC" a écrit dans le message de news: %23C$
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en recherchant sur le newsgroup je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de code pour m'expliquer ca serait super sympa
Dans mon menu Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem_fiches.Click Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de référence à l'objet ? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim form_composant as composant
composant.textbox.text = label1.text = '1'
composant.show()
End Sub
Merci
Apparamment y'a pas d'erreur de compil tout fonctionne bien (le module est
bien configuré en démarrage) mais je n'obtiens pas de passage de paramètre
d'un form à l'autre
pour tester Si je met un bouton sur ma form 2 et que je met dans onclick une
instruction style form1.labelTest.text = Test
Dans mon form 1 rine ne se passe !!
Y'a t'il quelque chose de spécial à faire dans les déclaration des form eux
même ?
"Twix" <twixy@free.fr> a écrit dans le message de news:
%23XsuylD4EHA.3756@TK2MSFTNGP14.phx.gbl...
voici la solution avec une feuille MDI et des feuilles enfants (children)
:
Module ModuleDemarrage
Public MDI As New MDIForm
Public F1 As New Form1
Public F2 As New Form2
Public F3 As New Form3
Public Sub Main()
F1.MdiParent = MDI
F2.MdiParent = MDI
F3.MdiParent = MDI
MDI.Show()
Application.Run(MDI)
End Sub
End Module
a+
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de news:
%23C$2Enm3EHA.2196@TK2MSFTNGP14.phx.gbl...
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en
cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de
ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et
mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en
recherchant sur le newsgroup
je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de
code pour m'expliquer ca serait super sympa
Dans mon menu
Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles MenuItem_fiches.Click
Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de
référence à l'objet ?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Apparamment y'a pas d'erreur de compil tout fonctionne bien (le module est bien configuré en démarrage) mais je n'obtiens pas de passage de paramètre d'un form à l'autre
pour tester Si je met un bouton sur ma form 2 et que je met dans onclick une instruction style form1.labelTest.text = Test Dans mon form 1 rine ne se passe !!
Y'a t'il quelque chose de spécial à faire dans les déclaration des form eux même ?
"Twix" a écrit dans le message de news: %
voici la solution avec une feuille MDI et des feuilles enfants (children) :
Module ModuleDemarrage Public MDI As New MDIForm Public F1 As New Form1 Public F2 As New Form2 Public F3 As New Form3
Public Sub Main() F1.MdiParent = MDI F2.MdiParent = MDI F3.MdiParent = MDI
MDI.Show() Application.Run(MDI) End Sub End Module
a+
"LOIC" a écrit dans le message de news: %23C$
Bonjour,
J'ai une application avec dedans plusieurs form qui sont active en cliquant dans mon menu et je souhaite lorsque je clique sur un bouton de ma form2 récupérer dans ma form1 la valeur d'un label de ma form2 et mettre ma form1 au premier plan.
J'ai cherché avec les public, directcast etc.. et j'ai pas trouvé en recherchant sur le newsgroup je n'arrive pas à faire ce que je veux donc si quelqu'un avait un bout de code pour m'expliquer ca serait super sympa
Dans mon menu Private Sub MenuItem30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem30.Click
Dim feuille As New recherche
feuille.MdiParent = Me
feuille.Show()
End Sub
Private Sub MenuItem_fiches_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem_fiches.Click Dim feuille_composant As New Composant
feuille_composant.MdiParent = Me
feuille_composant.Show()
End Sub
dans ma form2 alias recherche j'ai essayer ca et il ne me trouve pas de référence à l'objet ? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
