Passage par variable entre 2 form

j'ai un form1 contenant 2 zones de texte, une datagridview et un bouton sachant que ce bouton permet d'ouvrir form2 contenant aussi 2 zones textes avec:

Code:

---

1 2 3 4

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click form2.Show() End Sub

---

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub DataGridView1_CellClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick Try TextBox1.Text = DataGridView1.SelectedRows(0).Cells(0).Value TextBox2.Text = DataGridView1.SelectedRows(0).Cells(1).Value Catch ex As Exception MsgBox(ex.ToString) End Try End Sub

---

Je veux modifier ce code pour que les deux zones de texte de la form2 contiennent les valeurs de la 3e et la 4e colonne de la datagridview automatiuement en ouvrant ce form2

Code:

---

1 2 3

TextBox1.Text = DataGridView1.SelectedRows(0).Cells(2).Value TextBox2.Text = DataGridView1.SelectedRows(0).Cells(3).Value

---

merci d'avance

J'ai ajouté ceci mais ça marche pas

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Private Sub form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load cn.Open() Dim a As New DataTable("tab1") Dim req As New OleDb.OleDbDataAdapter("select nom,prenom from tab1 where code= '" & form1.TextBox1.Text & "' ", cn) Dim ds As New DataSet req.Fill(ds) Dim a As Object() = ds.Tables(0).Rows(2).ItemArray Dim a2 As Object() = ds.Tables(0).Rows(3).ItemArray TextBox1.Text = a(0).ToString() TextBox2.Text = a2(0).ToString() End Sub

---

Tu devrais surcharger la méthode Show de Form2 pour lui passer les bons paramètres

Code:

---

1 2	form2.Show(text1,text2);

---

Il me vient un doute, est ce que cette méthode est virtuel ?
Sinon un init avant l'affichage par exemple.

Bonjour,

Effectivement tu peux surcharger la méthode new de ta Form2

Dans Form2

Code:

---

1 2 3 4 5 6 7 8

Public Sub New(ByVal Texte1 As String, ByVal Texte2 As String) ' Cet appel est requis par le concepteur. InitializeComponent() ' Ajoutez une initialisation quelconque après l'appel InitializeComponent(). TextBox1.Text = Texte1 TextBox2.Text = Texte2 End Sub

---

L'appel depuis form1

Code:

---

Dim f As form2 = New form2(DataGridView1.SelectedRows(0).Cells(2).Value, DataGridView1.SelectedRows(0).Cells(3).Value)

---

Euh par contre marie_7
http://www.developpez.net/forums/d14...sage-variable/

Il y a des choses semblable non ?

merciii