آنتقال اطلاعات بين دو فرم(فوري)

[vb.net2008]

سلام.
فرض كنيد توي برنامه ام دوتا فرم وجود داره. كه يه دكمه تو فرم اولي هست كه در صورت انتخاب اون دكمه كاربرو هدايت مي كنه به فرم دومي و يكسري اصلاعات ازش ميگيره. حالا مي خوام اطلاعاتي كه كاربر توي فرم دومي مشخص كرده رو توي فرم اولي نمايش بدم. بايد چه طوري اطلاعات رو به فرم اولي انتقال بدم :متفکر:

[bastakboys]

توی فرم دوم در رویداد مورد نظر مثلا کلیل بوتون بنویس


form1.label1.text=textbox1.text



و برای همه پارامتر هایی که می خواهی می تونی این کار را بکنی

[vb.net2008]

ممنون اما من اينو امتحان كردم جواب نميده

[ali.hojjati]

توی فرم دوم در رویداد مورد نظر مثلا کلیل بوتون بنویس


form1.label1.text=textbox1.text


و برای همه پارامتر هایی که می خواهی می تونی این کار را بکنی


ممنون اما من اينو امتحان كردم جواب نميده

همون طور که دوستمون جواب دادن این روش کار سازه ولی اگه جواب نداده سورس را قرار بدین تا ایرادشو برطرف کنیم.

[salam333]

خيال راحته اگه با VB.net استفادم ميكني My.Formsبعد فرم مورد نظر رو انتخاب كن وازآن هر چيزي كه توي آن فرم هست انتخاب كن

[vb.net2008]

سلام. از همگي ممنونم. ببينيد تا اونجاي كه دوستمون گفتن درسته اما موقعي كه مي خوام فرم دومي رو ببندم و فرم اولي(add_sanad) رو كه زير اين فرم دومي هست، ببينم هيچ اطلاعاتي (اطلاعاتي رو كه توي فرم دومي بوده رو) نشون نمي ده. فرم اولي رو چه طور ظاهر كنم؟


Private Sub Ok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ok.Click
If Type.Text = "Sanad" Then

Add_Sanad.Name_Kol.Text = Grid_Kol.CurrentRow.Cells("Nam_Hesab").Value
Add_Sanad.Cod_Kol.Text = Grid_Kol.CurrentRow.Cells("Kod_Hesab").Value
If Grid_Moein.Rows.Count > 0 Then

Add_Sanad.Name_Moein.Text = Grid_Moein.CurrentRow.Cells("Nam_Hesab_Moein").Value
Add_Sanad.Cod_Moein.Text = Grid_Moein.CurrentRow.Cells("cod_Hesab_Moein").Value
End If

If Grid_Tafzili.Rows.Count > 0 Then

Add_Sanad.Name_Tafzili.Text = Grid_Tafzili.CurrentRow.Cells("Nam_Hesab_Tafzili").Value
Add_Sanad.Cod_Tafzili.Text = Grid_Tafzili.CurrentRow.Cells("Kod_Hesab_Tafzili").Value
End If

End If

Close()
End Sub