Form1() : Form1(0) Form1(1) Fenêtre tableau.

Résolu
lunnorey
Messages postés
39
Date d'inscription
dimanche 11 octobre 2009
Statut
Membre
Dernière intervention
9 mai 2015
- 22 déc. 2011 à 11:22
lunnorey
Messages postés
39
Date d'inscription
dimanche 11 octobre 2009
Statut
Membre
Dernière intervention
9 mai 2015
- 23 déc. 2011 à 00:18
Bonjour,

Je souhaiterai savoir s'il existe un moins de lancer la même fenêtre plusieurs fois est que l'on puisse modifier une variable dans l'une d'elle.

Exemple de Faux Code :
        Form2.Show(0)
        Form2.TextBox1.Text = "test1"
        Form2.Show(1)
        Form2.TextBox1.Text = "test2"

Merci D'avance.

8 réponses

Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
71
22 déc. 2011 à 11:35
oui

bête tableau d'objet

Dim f as Form2
f = New Form2
f.Show(0)
f.TextBox1.Text = "test1"

f = New Form2
f.Show(0)
f.TextBox1.Text = "test2"


Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
3
Utilisateur anonyme
22 déc. 2011 à 19:35
Bonsoir,

Fais donc une List(Of Form2)
Ajoute (add) tes instances de Form2
Tu pourras ensuite les énumérer.
3
Utilisateur anonyme
22 déc. 2011 à 20:56
dim maliste as new list(of form2)
Dim f as Form2
f = New Form2
maliste.add(f)
f.show

Puis l'énumération :
for each fen as form2 in maliste ...
3
lunnorey
Messages postés
39
Date d'inscription
dimanche 11 octobre 2009
Statut
Membre
Dernière intervention
9 mai 2015
3
22 déc. 2011 à 11:45
Je sais pas ce que l'on ferai sans vous.
Merci
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
lunnorey
Messages postés
39
Date d'inscription
dimanche 11 octobre 2009
Statut
Membre
Dernière intervention
9 mai 2015
3
22 déc. 2011 à 13:58
Autres chose,

Je souhaiterai savoir comment les différentiés pour changé la variable.

Exemple faux code:
    Dim f As Form2

    Private Sub Button1_Click() Handles Button1.Click
        f = New Form2
        f.Show()
        f.TextBox2.Text = "Fen1"

        f = New Form2
        f.Show()
        f.TextBox2.Text = "Fen2"
    End Sub

    Private Sub Button2_Click() Handles Button2.Click
        For Each fen As Form2 In f '<--

                'Il me dit évidemment que f n'est pas un type de collection

            If fen.TextBox2.Text = "Fen1" Then
                fenfen.TextBox1.Text = TextBox1.Text
            End If
        Next
    End Sub


Merci d'avance.
0
lunnorey
Messages postés
39
Date d'inscription
dimanche 11 octobre 2009
Statut
Membre
Dernière intervention
9 mai 2015
3
22 déc. 2011 à 17:09
Je suis désolé mes pour que les gens regarde la page il ne faut pas que la question soit validé, mais quant le problème sera résolut je vous remettrai votre Réponde accepté. (ou si personne ne répond)

Merci Pour votre compréhension.
0
lunnorey
Messages postés
39
Date d'inscription
dimanche 11 octobre 2009
Statut
Membre
Dernière intervention
9 mai 2015
3
22 déc. 2011 à 19:56
Pouvez-vous me montrer un exemple s'il vous plait.
Merci d'avance.
0
lunnorey
Messages postés
39
Date d'inscription
dimanche 11 octobre 2009
Statut
Membre
Dernière intervention
9 mai 2015
3
23 déc. 2011 à 00:18
Merci a vous pour votre aide.
0