المشاركات : 195
المواضيع 87
الإنتساب : Oct 2018
السمعة :
0
الشكر: 81
تم شكره 100 مرات في 68 مشاركات
السلام عليكم
ازاى اعمل نقل لصف فى داتا جريد فيو متصلة بقاعدة بيانات اكسيس الى داتا جريد فبو فارغة فى فورم اخر واذا رغبت فى اعادتها الى مكانها الاول يمكننى ذلك
المشاركات : 1,556
المواضيع 14
الإنتساب : Apr 2013
السمعة :
253
الشكر: 3551
تم شكره 4875 مرات في 1243 مشاركات
(25-12-18, 08:02 PM)احمد خطاب كتب : السلام عليكم
ازاى اعمل نقل لصف فى داتا جريد فيو متصلة بقاعدة بيانات اكسيس الى داتا جريد فبو فارغة فى فورم اخر واذا رغبت فى اعادتها الى مكانها الاول يمكننى ذلك
وعليكم السلام ،،
هل الداتاقريدفيو 2 والداتاقريدفيو 1 ،، الأعمدة متساوية (بمعنى مثل بعض)
يا رحمن الدنيا والآخرة ورحيمهما
المشاركات : 195
المواضيع 87
الإنتساب : Oct 2018
السمعة :
0
الشكر: 81
تم شكره 100 مرات في 68 مشاركات
السلام عليكم اخى الفاضل
نعم متساويين
المشاركات : 1,556
المواضيع 14
الإنتساب : Apr 2013
السمعة :
253
الشكر: 3551
تم شكره 4875 مرات في 1243 مشاركات
الداتاقريدفيو1 يوجد بها صفوف ،، وتريد عند النقر على الصف ينقلها إلى الداتاقريدفيو2
'هذا السطر مهمته لو الداتاقريدفيو1 فارغة من الصفوف يتجاهل تنفيذ وتكملة الكود :
كود :
If DataGridView1.Rows.Count = 1 Or Nothing Then Exit Sub
'هذا الكود مهمته لو الداتاقريدفيو2 فارغة من الاعمدة يقوم بإنشاء الاعمدة كما هي في الداتاقريدفيو1 :
كود :
If DataGridView2.Columns.Count = 0 Then
For Each cell As DataGridViewColumn In DataGridView1.Columns
DataGridView2.Columns.Add(DirectCast(cell.Clone, DataGridViewColumn))
Next
End If
'هذا السطر مهمته ينقل الصف المحدد من الداتاقريدفيو1 إلى الداتاقريدفيو2
كود :
DataGridView2.Rows.Add(DataGridView1.CurrentRow.Cells.Cast(Of DataGridViewCell).Select(Function(c) c.Value).ToArray)
يا رحمن الدنيا والآخرة ورحيمهما
المشاركات : 195
المواضيع 87
الإنتساب : Oct 2018
السمعة :
0
الشكر: 81
تم شكره 100 مرات في 68 مشاركات
السلام عليكم صديقى العزيز
اشكر حضرتك شكر خاص جزاك الله عنى كل الخير وكل الجزاء الجميل
المشاركات : 1,556
المواضيع 14
الإنتساب : Apr 2013
السمعة :
253
الشكر: 3551
تم شكره 4875 مرات في 1243 مشاركات
العفو ،، بالتوفيق للجميع
يا رحمن الدنيا والآخرة ورحيمهما