[محمد اسماعيل]

(24-01-18, 09:50 PM)محمود صالح كتب : اخي صمم الدتا قريد كما في الصورة

مثال الاول


الكود

PHP كود :

Public Class EX_1

    Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        DGV1.Rows.Add("احمد", 500)
        DGV1.Rows.Add("عمر", 900)
        DGV1.Rows.Add("محمد", 1300)
        For I As Integer = 0 To DGV1.Rows.Count - 2
            DGV1.Rows(I).HeaderCell.Value = (I + 1).ToString
        Next
    End Sub
    Private Sub DGV1_ColumnHeaderMouseClick(sender As Object, e As DataGridViewCellMouseEventArgs) Handles DGV1.ColumnHeaderMouseClick
        For I As Integer = 0 To DGV1.Rows.Count - 2
            DGV1.Rows(I).HeaderCell.Value = (I + 1).ToString
        Next
    End Sub
End Class 


مثال الثاني 


الكود

PHP كود :

Public Class EX_2

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        DGV1.RowHeadersVisible = False
        DGV1.Rows.Add("", "احمد", 500)
        DGV1.Rows.Add("", "عمر", 900)
        DGV1.Rows.Add("", "محمد", 1300)
        For I As Integer = 0 To DGV1.Rows.Count - 2
            DGV1.Rows(I).Cells(0).Value = (I + 1).ToString
        Next
    End Sub

End Class 


مثال الثالث


الكود

PHP كود :

Public Class EX_3

    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        DGV1.Rows.Add("احمد", 500)
        DGV1.Rows.Add("عمر", 900)
        DGV1.Rows.Add("محمد", 1300)

        For I As Integer = 0 To DGV1.Rows.Count - 2
            DGV1.Rows(I).HeaderCell.Value = (I + 1).ToString
        Next

        NO_SORTORDER(DGV1)

   End Sub

    Public Sub NO_SORTORDER(ByVal DataGridView As DataGridView)
        For Each DGV As DataGridViewColumn In DataGridView.Columns
            DGV.SortMode = DataGridViewColumnSortMode.NotSortable
        Next
    End Sub
End Class 


وجرب تشغل المثال بعد التعديل

انت شخص كريم جدا لصبرك وتعبك معايا وفقك اللّة لكل خير

الكود الي اشتغل معايا

كود :

 For I As Integer = 0 To DataGridView1.Rows.Count - 1
               DataGridView1.Rows(I).Cells(1).Value = (I + 1).ToString
           Next

ملاحظة علي الطريقة

1- لازم اضيف الاجراء دة في كل حدث لود للفورم وحدث البحث والحذف والاضافة
2- عند الاضافة الايدي والعنصر الجديد يكون الرقم من عمود الترقيم التلقائي بخلاف نظام الترتيب بالاجراء السابق


 عشان كدة كنت افضل الترقيم التلقائي