السلام عليكم
عندي ليست بوكس باسم (ListClas) في الشاشة الرئيسة (Form_main)
وليست بوكس باسم (ListClas) في الفورم (Form_result)
المطلــوب:
أريد عند اختيــار صـف دراســي من (ListClas) الموجود في الشاشة الرئيسة (Form_main) -
يتم تعبئـة الداتا قريدفيو (dgv1) الموجود في الفورم (Form_result) بأسمـاء طلبــة الصــف الدراســي المحدد
لأنني أريـد إلغــاء الــ (ListClas) الموجـود في الفورم (Form_result).
أرجــو التعديـل على المثال
للأسف لم أستطع إرفاق المثال في المرفقات
وشكـراً لكم أحبتـي الكرام
https://www.gulf-up.com/9004606pggag
لو وضعت المثال في رابط مباشر انتظر قليلا
(18-02-24, 05:19 PM)قناص المدينة كتب : [ -> ]لو وضعت المثال في رابط مباشر انتظر قليلا
بارك الله فيك وجزاك كل خير على المرور.
ولكن حجم الملف لا يمكن ارفاقه
السلام عليكم ورحمة الله وبركاته
في الفيجول بيسك فيك تتعامل مع أي نافذة كما تتعامل مع أي أداة على النافذة التي تتحكم منها..
فقط أجعل النافذة الأخرى حقيقة وليست صورة عنها .
يعني لما تريد اظهار النافذة (Form_result) أظهرا بأمر مباشر وبدون وسيط أو صورة عنها ..
لو كان عندك نافذة 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
(18-02-24, 08:45 PM)Taha Okla كتب : [ -> ]السلام عليكم ورحمة الله وبركاته
في الفيجول بيسك فيك تتعامل مع أي نافذة كما تتعامل مع أي أداة على النافذة التي تتحكم منها..
فقط أجعل النافذة الأخرى حقيقة وليست صورة عنها .
يعني لما تريد اظهار النافذة (Form_result) أظهرا بأمر مباشر وبدون وسيط أو صورة عنها ..
لو كان عندك نافذة 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
بارك الله فيك وجزاك كل خير أستاذ طه على التوجيه الطيب والشرح المفيد.
وسأحاول إتباع الخطوات التي قلتها وأخبرك النتيجة
(18-02-24, 11:50 PM)3sem كتب : [ -> ] (18-02-24, 01:13 AM)مصمم هاوي كتب : [ -> ]السلام عليكم
عندي ليست بوكس باسم (ListClas) في الشاشة الرئيسة (Form_main)
وليست بوكس باسم (ListClas) في الفورم (Form_result)
المطلــوب:
أريد عند اختيــار صـف دراســي من (ListClas) الموجود في الشاشة الرئيسة (Form_main) -
يتم تعبئـة الداتا قريدفيو (dgv1) الموجود في الفورم (Form_result) بأسمـاء طلبــة الصــف الدراســي المحدد
لأنني أريـد إلغــاء الــ (ListClas) الموجـود في الفورم (Form_result).
أرجــو التعديـل على المثال
للأسف لم أستطع إرفاق المثال في المرفقات
وشكـراً لكم أحبتـي الكرام
https://www.gulf-up.com/9004606pggag
هذا هـــــو ما أريـدهُ بالضبط
بــاركـــــــ اللهُ فيكــــــ وجزاكـــــــ كلَّ خيــراً
وفرجَ عليكـــــ كُرب الدنيـا والآخــرة
وفتـحَ عليكــــــ فتوحً العارفيـن