Bookmark 書籤)和move指標的應用

2021-07-03 09:41:37 字數 1706 閱讀 2788

在我敲學生時,遇到了書籤bookmark 和movefirst、moveprevious、movenext、movelast,一開始我真是一頭霧水,最後**了一番總算理解了。那麼對資料庫的刪過程,是如何實現的呢,下面以修改學籍窗體裡的刪除按鈕為例,有不對的還請學的好的指出……

private sub deletecommand _click()

mybookmark = mrc.bookmark '把記錄集的指標賦給乙個字元變數

str2$ = msgbox("確認是否刪除當前資料?", vbokcancel, "刪除當前記錄")

if str2$ = vbok then '假如你點了確認按鈕

mrc.movenext '顯示刪除後下一條記錄

if mrc.eof then '如果刪除的是最後一條有兩種情況1.

最後一條(僅有一條)

2.最後一條(但前邊還有)

mrc.moveprevious

mrc.moveprevious

if mrc.bof then '1.有且僅有一條記錄的處理

mrc.movenext

mrc.delete

msgbox "最後一條記錄已經刪除!", vbokonly + vbexclamation, "警告"

unload me

else '判斷是最後一條(但前邊還有)

mrc.movefirst

'這裡紅色字型的三行書籤的作用是:

mybookmark = mrc.bookmark

'使刪除記錄後回到第一條記錄

mrc.movelast

mrc.delete

'指標回到最後一行,並刪除

mrc.bookmark = mybookmark

call viewdata

'呼叫viewdata函式,使表顯示當前(也就是第一條)記錄。

end if

else '有很多記錄 ,也不是最後一條記錄的處理

mybookmark = mrc.bookmark

mrc.moveprevious

mrc.delete

mrc.bookmark = mybookmark

call viewdata

end if

end if

end sub

public sub viewdata() '把臨時表中當前記錄賦給文字框

txtsid.text = mrc.fields(0)

txtname.text = mrc.fields(1)

combo***.text = mrc.fields(2)

txtborndate.text = format(mrc.fields(3), "yyyy-mm-dd") '規定日期格式形如:2015-06-20

comboclassno.text = mrc.fields(4)

txttel.text = mrc.fields(5)

txtrudate.text = format(mrc.fields(6), "yyyy-mm-dd")

txtaddress.text = mrc.fields(7)

txtcomment.text = mrc.fields(8)

end sub

右值引用和move語義

標籤 c 11 c lvalue rvalue 2013 10 04 20 49 2909人閱讀收藏 舉報 c 6 目錄 lvalue 具有儲存性質的物件,即lvalue物件,是指要實際占用記憶體空間 有記憶體位址的那些實體物件,例如 變數 variables 函式 函式指標等。rvalue 相比較...

書籤推廣的特點和技巧

書籤推廣的特點和技巧 很多做 優化的朋友都在說,社會化書籤是一種不錯的推廣方式,簡單 方便 快捷。可是,我漸漸地發現,真正能把社會化書籤做到極致做出成果的人沒有幾個。做了有三年多的 推廣了,從最早接觸的網路書摘到後來的書籤 收藏夾,再到後來的sns 微博,以致到現如今的社會化分享 這些我都統稱為社會...

利用move和actived事件實現相對模態窗體

在sap b1的使用過程中,發現他存在相當多的優點。今天只說他的相對模態窗體。一般情況下我們所開發的winform程式,在對彈出窗體進行處理時,都比較不樂意用彈出窗體。因為如果使用模態窗體,就失去了程式的多工特性 如果不使用模態窗體,又怕因為使用者誤操作造成麻煩。我以前在做程式時一直處理兩難之中。而...