sql server資料庫中刪除的過程

 

      這是在vb中的一個對資料庫中資料的刪除過程，點擊按鈕後程式第一句則是將你要刪除的那條記錄的位置作為書籤儲存到myBookmark這個變數裡面，然後選擇確定刪除的話，首先執行if語句下的第一句

       mrc.MoveNext

即是將目前記錄指向下下一條記錄，這個“下一條”記錄如果已經是最後一條記錄的下一條即為空白記錄的地方（if mrc.EOF)，那麼則將目前記錄指向第一條記錄，因為目前記錄不可為空（再詳細點解釋的話我前面一片部落格已經做過論述，這個是關於EOF和BOF的理解），然後將MoverNext後的目前記錄書籤位置儲存在myBookmark變數裡，覆蓋原來的位置，然後又將當前位置轉移到你想刪除的那條資料上，執行刪除語句

      mrc.MoveLast

      mrc.Delete

      到這裡，就完成了指定記錄的刪除。接下來則是把剛才你刪除之前你要刪除的記錄的下一條記錄顯示出來，因為之前你已經把這條記錄儲存到了myBookmark裡面，所以再賦值回去就行了

      mrc.Bookmark=myBookmark

然後用自訂的viewData()函數將其顯示出來。

      第一個Else裡則是一開始MoveNext之後並不是指向空地區，首先是將MoveNext後的記錄（要刪除記錄的下一條記錄）書籤位置儲存在myBookmark裡面，然後

      MovePrevious

回到你想刪除的記錄，執行刪除指令

      mrc.Delete

然後再將刪除前的下一條記錄賦給書籤作為目前記錄

      mrc.Bookmark=myBookmark

然後顯示目前記錄

      Call viewData

最後一個Else就不用說了。