[احمد خطاب]

السلام عليكم 
ازاى اعمل نقل لصف فى داتا جريد فيو متصلة بقاعدة بيانات اكسيس الى داتا جريد فبو فارغة فى فورم اخر واذا رغبت فى اعادتها الى مكانها الاول يمكننى ذلك

[حريف برمجة]

(25-12-18, 08:02 PM)احمد خطاب كتب : السلام عليكم 
ازاى اعمل نقل لصف فى داتا جريد فيو متصلة بقاعدة بيانات اكسيس الى داتا جريد فبو فارغة فى فورم اخر واذا رغبت فى اعادتها الى مكانها الاول يمكننى ذلك

وعليكم السلام ،،

هل الداتاقريدفيو 2 والداتاقريدفيو 1 ،، الأعمدة متساوية (بمعنى مثل بعض)

[احمد خطاب]

السلام عليكم اخى الفاضل 
نعم متساويين

[حريف برمجة]

الداتاقريدفيو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)

[احمد خطاب]

السلام عليكم صديقى العزيز
اشكر حضرتك شكر خاص جزاك الله عنى كل الخير وكل الجزاء الجميل

[حريف برمجة]

العفو ،، بالتوفيق للجميع