21-09-13, 05:43 PM
السلام عليكم و رحمة الله و بركاته
إليك مثال من مكتبتي
السلام عليكم و رحمة الله و بركاته
إليك مثال من مكتبتي
كود :
Dim myDataTable As myDataTable
'
'
' myDataTable بعد تعبئة
'
'
myDataTable.Columns.Add("RowNumber")
For i = 0 To myDataTable.Rows.Count - 1
myDataTable.Rows(i).Item("RowNumber") = i + 1
Next
'
' يحتوي على ترقيم تسلسلي سليم RowNumber الآن يوجد حقل باسم
'