問題1:當資料庫中記錄為空時,開啟「修改學籍資訊」窗體會報錯
解決方法:
'檢測此時student_info表中記錄集是否為空
'如果為空,則開啟」新增學籍資訊「窗體
'如果不為空,則開啟「修改學籍資訊」窗體
private sub modifysinfomenu_click()
'定義資料庫連線的字串
dim strtxtsql as string
dim strmsgtxt as string
'建立用於檢測student_info表記錄是否為空的物件
dim rstobjcount as adodb.recordset
'建立記錄msgbox返回值的物件
dim intmsg as integer
'資料庫連線語句
strtxtsql = "select * from student_info"
'得到student_info的記錄集,並將其賦給rstobjcount
set rstobjcount = executesql(strtxtsql, strmsgtxt)
'檢測student_info表中記錄是否為空
if rstobjcount .recordcount = 0 then
intmsg= msgbox("記錄集為空,是否現在就填寫", vbokcancel, "警告")
'如果選擇是,則開啟「新增資訊」窗體
if intmsg = vbok then
frmaddsinfo.show
exit sub
else
exit sub
end if
else
frmmodifysinfo.show
end if
end sub
在主窗體frmmain的「修改學籍資訊」選單命令下新增如下**
記憶體管理 問題集錦一
1 以下 有什麼問題嗎?如果沒有的話,obj obj2的引用計數分別是多少?如果有問題的話存在什麼問題?class obj class alloc init 引用計數 為 1 class obj2 obj 這裡只是賦值 obj hello obj release 引用計數 減為 0 obj2 hel...
作業系統記憶體管理問題集錦
1.可採用哪幾種方式將程式裝入記憶體?它們分別適用於何種場合?a.首先由編譯程式將使用者源 編譯成若干目標模組,再由鏈結程式將編譯後形成的目標模組和所需的 庫函式鏈結在一起,組成乙個裝入模組,再由裝入程式將裝入模組裝入記憶體 b.裝入模組的方式有 絕對裝入方式,可重定位方式和動態執行時裝入方式 c....
學生管理系統問題總結 續
前些日子,驗收了學生管理系統的專案。本以為自己優化的已經很好了,但是在高人的指點下依然有提公升的空間!下面就來說說需要注意的問題,和自己後期的一些優化!1 縮排的問題。大家都知道,乙個大型的程式會有很多很多的 所以一定要做好縮排。這樣可以保持 語句清晰的邏輯性,在後期除錯的時候更加方便。2 注釋的問...