[VB.NET] استدعاء داتا كريت فيو من فورم اخر

كود :
لاستدعاء داتا قريدفيو موجودة على 

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