دخول

**nabil.1710** · 09-10-16, 10:26 AM

السلام عليكم اساتذتنا

اريد كود نسخ البيانات من DataGridView1 الى DataGridView2

رجاء التعديل على المرفقات

و شكرا

**abumuhannadzym** · 09-10-16, 03:24 PM

اتوقع تقوم اولا بعمل قائمة مؤقته تخزن فيها البيانات من DataGridView1 وبعدها تستخدمها في اي مكتن
ولهذا نتمنا من المتمكنيين عكود عمل قادئمة تحمل متغير على شكل بيانات قعادة بيانات مؤقته

**ابراهيم النعيمي** · 09-10-16, 11:06 PM

السلام عليكم
في حدث (Click) للزر (Button2) ادرج الكود التالي

PHP كود :

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Try
            Me.CopyDataSet.ddd.Clear()
            For indexrow As Int16 = 0 To Me.DataGridView2.RowCount - 2
                Dim dr As DataRow
                dr = Me.CopyDataSet.ddd.NewRow
                dr("الاسم") = Me.DataGridView2.Rows(indexrow).Cells(1).Value
                dr("ايميل") = Me.DataGridView2.Rows(indexrow).Cells(2).Value
                Me.CopyDataSet.ddd.Rows.Add(dr)
            Next
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub 

تحياتي ..

**nabil.1710** · 10-10-16, 09:23 AM

(09-10-16, 11:06 PM)ابراهيم النعيمي كتب : السلام عليكم
في حدث (Click) للزر (Button2) ادرج الكود التالي

PHP كود :

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Try Me.CopyDataSet.ddd.Clear() For indexrow As Int16 = 0 To Me.DataGridView2.RowCount - 2 Dim dr As DataRow dr = Me.CopyDataSet.ddd.NewRow dr("الاسم") = Me.DataGridView2.Rows(indexrow).Cells(1).Value dr("ايميل") = Me.DataGridView2.Rows(indexrow).Cells(2).Value Me.CopyDataSet.ddd.Rows.Add(dr) Next Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical) End Try End Sub

تحياتي ..

جزاكم الله خيرا اخى
وزادكم الله من فضله
اضفت اخى الى الفورم textbox1 و اضفت لل DataGridView1 حقل اسمه عدد و اريد القيمة التى بال textbox1 تضاف الى عدد داخل DataGridView1

و شكرا اخى على الاهتمام

**ابراهيم النعيمي** · 10-10-16, 10:52 AM

السلام عليكم
هل تريد ان تتكرر قيمة ال(TextBox1) في جميع صفوف (DataGridView1) في حقل (عدد)؟ و هل تم اضافة حقل (عدد) الى الجدول (ddd) في قاعدة البيانات و لل (DataTable) في ال (DataSet) ام ان حقل (عدد) غير مرتبط بقاعدة البيانات مثل بقية الحقول؟

تحياتي ..

**nabil.1710** · 10-10-16, 11:34 AM

(10-10-16, 10:52 AM)ابراهيم النعيمي كتب : السلام عليكم
هل تريد ان تتكرر قيمة ال(TextBox1) في جميع صفوف (DataGridView1) في حقل (عدد)؟ و هل تم اضافة حقل (عدد) الى الجدول (ddd) في قاعدة البيانات و لل (DataTable) في ال (DataSet) ام ان حقل (عدد) غير مرتبط بقاعدة البيانات مثل بقية الحقول؟

تحياتي ..

نعم اخى الكريم تم اضافة عدد فى قاعدة البيانات و تم ربطه و أريد ان تتكرر قيمة ال(TextBox1) في جميع صفوف (DataGridView1) في حقل (عدد)

و شكرا اخى على سرعة الرد
و نسأل الله أن ينفع بك كل طالب علم

**ابراهيم النعيمي**

السلام عليكم
اذا يكون الكود بالشكل التالي:

PHP كود :

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Try
            Me.CopyDataSet.ddd.Clear()
            For indexrow As Int16 = 0 To Me.DataGridView2.RowCount - 2
                Dim dr As DataRow
                dr = Me.CopyDataSet.ddd.NewRow
                dr("الاسم") = Me.DataGridView2.Rows(indexrow).Cells(1).Value
                dr("ايميل") = Me.DataGridView2.Rows(indexrow).Cells(2).Value
                dr("عدد") = Me.TextBox1.Text
                Me.CopyDataSet.ddd.Rows.Add(dr)
            Next
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub 

باضافة السطر التالي فقط:

PHP كود :

               dr("عدد") = Me.TextBox1.Text 

مع ملاحظة تعديل الـ (DataSet) كما في الصورة
تحياتي...

**nabil.1710** · 10-10-16, 02:51 PM

(10-10-16, 01:53 PM)ابراهيم النعيمي كتب : السلام عليكم
اذا يكون الكود بالشكل التالي:

PHP كود :

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Try Me.CopyDataSet.ddd.Clear() For indexrow As Int16 = 0 To Me.DataGridView2.RowCount - 2 Dim dr As DataRow dr = Me.CopyDataSet.ddd.NewRow dr("الاسم") = Me.DataGridView2.Rows(indexrow).Cells(1).Value dr("ايميل") = Me.DataGridView2.Rows(indexrow).Cells(2).Value dr("عدد") = Me.TextBox1.Text Me.CopyDataSet.ddd.Rows.Add(dr) Next Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical) End Try End Sub
باضافة السطر التالي فقط:

PHP كود :

dr("عدد") = Me.TextBox1.Text
مع ملاحظة تعديل الـ (DataSet) كما في الصورة
تحياتي...

جزاكم الله خيرا تم المطلوب على اكمل وجه شكرا لك اخى

**ابراهيم النعيمي** · 10-10-16, 08:04 PM

الشكر لله

تحياتي ..

**nabil.1710** · 22-10-16, 08:20 PM

(10-10-16, 08:04 PM)ابراهيم النعيمي كتب : الشكر لله

تحياتي ..

السلام عليكم اخى ابراهيم

هذا الكود افدنى كثيرا و جزاكم الله خيرا

ولكن فضلا منك

انا اضفت لل DataGridView حقل باسم ( الاجمالى ) و اريد ان يكون به ناتج ضرب الحقلين ( عدد * سعر )

و شكرا على مجهودك

دخول
إسم المستخدم
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة

المواضيع المحتمل أن تكون متشابهة .
الموضوع :		الكاتب	الردود :	المشاهدات :	آخر رد
	تصدير البيانات إلى ملف RTF	مصمم هاوي	4	842	15-08-25, 04:13 PM آخر رد: أبو خالد الشكري
	[VB.NET] ما هو أفضل موقع استضافة لقواعد البيانات MSSQL ؟	mmaalmesry	0	799	16-07-25, 10:45 PM آخر رد: mmaalmesry
	مساعدة في كيفية ترحيل البيانات من داتا قريدفيو إلى داتا قريدفيو في فيجوال بيسك	ahmedfa71	13	2,293	09-07-25, 11:24 PM آخر رد: أبو خالد الشكري
	مشكلة في حفظ البيانات	مصمم هاوي	2	1,028	30-06-25, 08:51 AM آخر رد: مصمم هاوي
	بطء في جلب البيانات	مصمم هاوي	9	1,012	08-05-25, 07:51 AM آخر رد: مصمم هاوي
	تعديل كود تحديث البيانات	مصمم هاوي	1	790	26-04-25, 06:07 PM آخر رد: مصمم هاوي
	لايمكن تعرف على تنسيق قاعدة البيانات	الدريساوي	2	703	26-04-25, 12:24 AM آخر رد: الدريساوي
	مساعدة في طريقة تحميل الفيديوهات المخزنة في قاعدة البيانات	foad8920	0	665	24-04-25, 12:58 PM آخر رد: foad8920
	إغلاق الفورم مع حذف جميع البيانات الموجودة به	صالح عبدالله	10	1,051	19-04-25, 08:54 PM آخر رد: Kamil
	ارجو تعديل الكود جلب البيانات عن طريق اجراء مخزن - مرفق مثال	new_programer	0	626	05-02-25, 01:51 AM آخر رد: new_programer