[SaedAmer]

(01-04-22, 07:10 PM)hafid33 كتب :

(01-04-22, 05:30 AM)SaedAmer كتب : اعمل جدول جديد يكون ارشيف و ضع محتوايات الصف في string و احذف الصف من الدول الحالي و ضيفه مرة اخرة في الجدول الجديد

كيف احفظ هدا الصف هنا وفي قاعدة البيانات مثلا ارشيف كما قلت

---

او كيف انقل هدا الصف هنا باستعمال زر

هذا الكود لجلب قيمة الصف الي انت واقف عليه
الطريقة الاولى :

كود :

Dim poss As Integer = DataGridView2.CurrentRow.Index
Dim p0 = DataGridView2.Rows(poss).Cells(0).Value
Dim p1 = DataGridView2.Rows(poss).Cells(1).Value
Dim p2 = DataGridView2.Rows(poss).Cells(2).Value
Dim p3 = DataGridView2.Rows(poss).Cells(3).Value
Dim p4 = DataGridView2.Rows(poss).Cells(4).Value

الطريقة التانية :

كود :

      Dim ssmms As String = ""
       Dim xx As Integer = DataGridView2.CurrentRow.Index

       Dim x(DataGridView2.ColumnCount) As String
       For ii = 0 To DataGridView2.ColumnCount
           Try
               x(ii) = DataGridView2.Rows(xx).Cells(ii).Value.ToString
               Application.DoEvents()
           Catch
           End Try
       Next





       For ii = 0 To DataGridView2.ColumnCount
           'Dim x(DataGridView1.Rows(xx).Cells(ii).Value.ToString) As String
           'MsgBox(x(ii))
           Try

               ssmms = ssmms + (x(ii) & ",")


           Catch
           End Try
       Next

       MsgBox(ssmms)