Recuperer une variable d'une autre form

Bonjour a tous ...

je me casse la tête sur un truc tout bête ....

Comment faire pour récupérer une variable (string/Int etc ... ) d'une Form2 pour mettre celle ci dans une textbox form 1...

Avec des labels sa marche plutôt bien ... mais avec des textboxs ...

Code:

---

1 2 3 4 5 6 7 8

Public Class Form2 Public maformprinc As New Form1   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim test As String = TextBox1.Text maformprinc.TextBox1.Text = test End Sub End Class

---

Code:

---

1 2 3 4 5

Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Form2.Show() End Sub End Class

---

Merci d'avance !!

Bonsoir a tous,

Alors j avance un peu mais ... le soucis persiste ..

ma form1 ou je récupère les variable.

Code:

---

1 2 3 4 5 6

Public Sub chargerElements(ByVal conc As String, ByVal Nom As String, ByVal fixe As String, ByVal port As String, ByVal mail As String) Dim lenom As String = Nom TextBox1.Text = lenom MessageBox.Show(lenom) End Sub

---

Ma form2 ou je choisi un élément d'un listview

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Dim conc As String Dim nom As String Dim telF As String Dim telp As String Dim mail As String   Dim Chargementlist As New EtatsConcsDoss Dim pContact As New EtatsConcsDoss If ListView1.SelectedItems.Count > 0 Then Dim elements As ListViewItem = ListView1.SelectedItems(0) conc = elements.Text nom = elements.SubItems(2).Text telF = elements.SubItems(3).Text telp = elements.SubItems(4).Text mail = elements.SubItems(5).Text Chargementlist.chargerElements(conc, nom, telF, telp, mail) End If End Sub

---

Alors pour faire simple...

-Ma form2 charge les éléments d'une listview
-Je lance une procédure sub surchargé qui se trouve dans ma form1
-Je récupere les variables (testé avec un msgbox) et ... catastrophe il ne veut pas mettre ces variables dans les box ...

Une petite solution?

merci d'avance.

Salut
Peut être, ligne 4 u premier code

Code:

---

TextBox1.value= lenom

---

Citation:

---

Envoyé par ProgElecT

Salut
Peut être, ligne 4 u premier code

Code:

---

TextBox1.value= lenom

---

---

Merci pour ta réponse, mais j'ai déjà essayé ... "value n'est pas un membre textbox"

pourtant j'arrive bien a récupérer la variable de la form2... bref

Par contre avec label. Value sa marche ...

en tout merci

Pièce jointe 370144

Pièce jointe 370147

Bonjour,

Citation:

---

Envoyé par mickael62800

Code:

---

1 2 3 4 5 6 7 8

Public Class Form2 Public maformprinc As New Form1   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim test As String = TextBox1.Text maformprinc.TextBox1.Text = test End Sub End Class

---

Code:

---

1 2 3 4 5

Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Form2.Show() End Sub End Class

---

---

Analysons ton code

Tu lances form1
Tu cliques sur button1
Cela lance form2
qui cré une nouvelle instance de form1 appelé maformprinc (mais différente de form1)
Lorsque tu cliques sur button1 tu mets la valeur dans l'instance maformprinc
Mais comme tu n'as pas fait de show de maformprinc tu ne vois rien.


Voici un exemple simple (note : attention j'ai renommé les contrôles de chaque form pour la lisibilité du code)

Code:

---

1 2 3 4 5 6

Public Class Form1 Private Sub buttonForm1_Click(sender As System.Object, e As System.EventArgs) Handles buttonForm1.Click Dim f As Form2 = New Form2 textboxForm1.Text = f.saisie End Sub End Class

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Class Form2 Private s As String Private Sub ButtonForm_Click(sender As System.Object, e As System.EventArgs) Handles ButtonForm2.Click s = TextBoxForm2.Text Close() End Sub Public Function saisie() As String Me.ShowDialog() Return s End Function End Class

---

Avec plusieurs variables tu pourrais les passer par référence, mais il vaut mieux utiliser une classe et passer un objet.

Bon code ...

Merci RV26T, sa marche enfin.

Moi qui pensais que la procédure "Function" était utile que pour des calculs de math.....bah non

J'ai essayé avec des classes ect ... au final il me crée un autre objet et surtout sa devenait une usine a gaz ...

Encore Merci à RV26T et ProgElecT ;)

Bonjour

Citation:

---

Envoyé par mickael62800

Merci RV26T, sa marche enfin.

Moi qui pensais que la procédure "Function" était utile que pour des calculs de math.....bah non

Encore Merci à RV26T et ProgElecT ;)

---

En fait, c'est toujours le cas avec des calculs, parce que le rôle (ou la fonction ;) ) d'une fonction est de retourner une valeur. Et c'est le cas ici.