[الرائد]

كود :

Try
   Dim sql As String = " DELETE FROM [table1] WHERE [id]=" & Int(Me.DataGridView1.CurrentRow.Cells(0).Value)
   '                                                                                         ^^^^^^^^^^^^^^
   '                                                                                            ID رقم
   Dim comm As New OleDb.OleDbCommand(sql, conn)

   conn.Open()
   Dim result As Integer = comm.ExecuteNonQuery
   conn.Close()

   If result > 0 Then
       Me.DataGridView1.Rows.Remove(Me.DataGridView1.CurrentRow)
       MsgBox("لقد تم حذف السجل بنجاح")
   Else
       MsgBox("لم أجد السجل المراد حذفه")
   End If

Catch ex As Exception
   MsgBox("فشلت عملية الحذف")
End Try

السلام عليكم أخواني الكرام أنا استخدم الكود اعلاه لحذف البيانات 
حين أقوم باعادة حفظ بيانات أخرى أجد أن رقم المعرف id  في الداتا جريد يبدأ من الرقم الاخير الذي حذف 

اي أن رقم id للسطر كان 1 و 2 و 3 , فقمت بحذف جميع الأسطر أجد بعد حفظ بيانات جديدة أنها لم تبدأ الحفظ من السطر 1 بل بدأت من السطر 4 .
كما أنني تفحصت القاعدة في access ووجدت أنها فارغة