在敲學生的時候發現了乙個問題，按照書上的**敲完之後執行程式，發現變數未定義的情況，對應的**位置是
private sub cmddelete_click()
dim str2$
'記下當前記錄位置
mybookmark = mrc.bookmark
'提示是否刪除
str2$ = msgbox("是否刪除當前記錄？", vbokcancel, "刪除當前記錄")
'判斷按鈕型別
if str2$ = vbok then
'移動到資料集下一條記錄
mrc.movenext
'判斷資料集物件是否為空
if mrc.eof then
'移動到資料集的第一條記錄
mrc.movefirst
'記載當前記錄的位置
mybookmark = mrc.bookmark
'移動到最後一條記錄
mrc.movelast
'刪除記錄
mrc.delete
mrc.bookmark = mybookmark
'呼叫函式顯示資料
call viewdata
else
'記載當前位置
mybookmark = mrc.bookmark
'移動到前一條記錄
mrc.moveprevious
'刪除記錄
mrc.delete
'回到原來位置
mrc.bookmark = mybookmark
'呼叫函式顯示資料
call viewdata
end if
else
mrc.bookmark = mybookmark
call viewdata
end if
end sub
刪除了後面的as string後就可以正常執行了。
學生資訊管理系統
學生資訊管理系統，顧名思義就是為了管理學生的相關資訊做的一款軟體。雖然這次有原始碼供我們參考，但是從中我學習到了如何從開始到完工去做一款軟體，下邊我從做一項軟體專案的前後順序來總結我的學生資訊管理系統。一，分析需求 首先在做這款軟體是，我們先想象乙個成品，他的功能有哪些，每個功能完成哪項任務，這就是...
學生資訊管理系統
1.背景描述 學校招生辦在錄取當年新生時為新生建立了乙個新生基礎資訊類studentbase,其中包含每位新生的基本資料 學號 long mnum 姓名 char mname 20 性別 int m 其中0表示男，1表示女 年齡 int mage 住址 char maddr 30 新生主修專業所在系...
學生資訊管理系統
學生資訊管理系統由13個窗體1乙個mdi窗體乙個模組組成，窗體主要實現了登陸 新增 修改 檢視等功能，模組主要是存放全域性變數和各種函式。在敲這個系統之前，我覺得有個問題需要考慮一下，要是想一邊敲一邊除錯的話，那前面就得把資料庫等配置好了，如果想敲完再除錯的話，那就什麼時候配置好資料庫都可以。我當時...