PDA

View Full Version : حرفه ای: پاس کاری مقدارها بین فرم ها



crying sphere
پنج شنبه 29 مهر 1389, 12:31 عصر
با سلام
کسی در این مورد چیزی می دونه؟ برای مثال من در یک فرمی کدی را گرقتم و در فرمی دیگر می خوام اطلاعاتی رو براساس اون کد از بانک بیرون بیارم . چطور باید این کد رو به فرم مورد نظرم پاس بدم؟ (چیزی مثل کار توابع)
کسی میتونه کمکم کنه؟

farhadt
پنج شنبه 29 مهر 1389, 12:34 عصر
یه متغییر public توی فرم دومت ایجاد کن و اطلاعات رو براش بفرسن:
مثال توی فرم دوم:


Public MyVar as Integer


توی فرم اول:


form2.MyVar=MyData

sari-1369
پنج شنبه 29 مهر 1389, 12:57 عصر
شما میتونی مقدار ورودی فرمتون رو توسط تابع New فرم دوم تعریف کنید .

فرضا شما تو فرم اول لیست دانشجو هارو دارین و میخواین توی فرم دومت کد دانشجو رو بفرستین و اطلاعات مربوط به اون دانشجو رو نشون بدین .

تابع New رو توی فرم دوم به این صورت تعریف میکنیم :

Public Sub New(ByVal Code_Daneshjo As Integer)
InitializeComponent()
'در این قسمت میتونین از کد دانشجو که دریاف کردین استفاده کنید. مثل:
Me.Text = Code_Daneshjo
End Sub



و حالا از فرم اولتون ، کد دانشجو رو به صورت زیر به فرم دوم میفرستین و اون رو نمایش میدین .


Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
Dim frm As New Frm_Moshakhasat_Daneshjo("کد دانشجو که باید به فرم 2 ارسال شود")
frm.Show()
End Sub