[Taha Okla]

السلام عليكم ورحمة الله وبركاته

في الفيجول بيسك فيك تتعامل مع أي نافذة كما تتعامل مع أي أداة على النافذة التي تتحكم منها..
فقط أجعل النافذة الأخرى حقيقة وليست صورة عنها .
يعني لما تريد اظهار النافذة (Form_result) أظهرا بأمر مباشر وبدون وسيط أو صورة عنها ..

كود :

Form_result.Show()

لو كان عندك نافذة Form1 وعليها Button1 , Button2
وعندك نافذة Form2 يوجد أداة TextBox1 , DataGridView1
وتريد الكتابة فيهما من النافذة Form1
فقط عليك أن تكتب الأمر بشكل مباشر وبدون أي حيلة;
وكـ مثال :

كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Form2.Show()
        Form2.TextBox1.Text = "Take easy"

        Dim dt As New DataTable
        dt.Columns.Add("ID")
        dt.Columns.Add("Name")
        dt.Columns.Add("Address")

        dt.Rows.Add("001", "Bador Shaker", "Baghdad")
        dt.Rows.Add("002", "Ahmed Shawqi", "Cairo")
        dt.Rows.Add("003", "Hafedh Ibrahim", "Cairo")

        Form2.DataGridView1.DataSource = dt
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Form2.Show()

        Dim dt As New DataTable
        dt.Columns.Add("ID")
        dt.Columns.Add("Name")
        dt.Columns.Add("Address")

        dt.Rows.Add("001", "Ahmed Rami", "Cairo")
        dt.Rows.Add("002", "Readh ALsunbati", "Cairo")
        dt.Rows.Add("003", "Ibrahim Khafaji", "Readh")
        dt.Rows.Add("004", "Ahmed Musaed ALsderi", "Readh")

        Form2.DataGridView1.DataSource = dt
    End Sub