[EMADW]

هل استطيع من فورم 2 استدعاء داتا كريت فيو اموجودة على فورم 1 بنفس عملها على الفورم 1
من خلال زر بوتن

[مصمم هاوي]

كود :

لاستدعاء داتا قريدفيو موجودة على
Form 1 من Form 2.

1. عن طريق تمرير الداتا قريدفيو كمعامل إلى
Form 2:

_ في الفورم 1
Dim frm2 As New Form2(DataGridView1)
frm2.Show()

-  في الفورم 2
Public Sub New(dgv As DataGridView)
   InitializeComponent()
   Me.dgv = dgv
End Sub

Private dgv As DataGridView

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   ' يمكنك الآن استخدام dgv كما لو كانت في فورم 2
   dgv.Rows.Add("بيانات جديدة")
End Sub
```
2. عن طريق جعل الداتا قريدفيو عامة
(Public) في Form 1:

_ في الفورم 1
Public dgv As DataGridView

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
   dgv = DataGridView1
End Sub

_ في الفورم 2
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   Dim frm1 As Form1 = CType(Application.OpenForms("Form1"), Form1)
   frm1.dgv.Rows.Add("بيانات جديدة")
End Sub
```
3. عن طريق إنشاء دالة عامة
(Public) في Form 1 تقوم بإضافة
حرب هذا الكود:

_ في الفورم 1
Public Sub AddDataToDGV(data As String)
   DataGridView1.Rows.Add(data)
End Sub

- في الفورم 2
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   Dim frm1 As Form1 = CType(Application.OpenForms("Form1"), Form1)
   frm1.AddDataToDGV("بيانات جديدة")
End Sub