總覺得學生的模組中的executesql函式很重要，所以對這個函式進行乙個翻譯：
'定義的乙個函式過程，這個函式是用來臨時記錄資料庫中的資料的
public
function executesql(byval sql as
string, msgstring as
string) as adodb.recordset
'executes sql and returns recordset
'定義資料庫的鏈結方式
dim cnn as adodb.connection
'定義資料庫的臨時記錄集
dim rst as adodb.recordset
dim stokens() as
string
'當遇到錯誤的時候，跳轉到 executesql_error
onerror
goto executesql_error
'split函式是將一段字串，按定義的字元分割成幾部分。如t=split（insert,delete,update）
'結果為：t(0)=insert t(1)=delete t(2)=update
stokens = split(sql)
'定義乙個新的鏈結
set cnn = new adodb.connection
cnn.open connectstring
'instr函式主要是用來查詢用的，函式的用法如下
'string1的作用是查詢的源文件，也就是你要查詢的東西要在裡面找
'string2就是你要查詢的東西
'start_position就是從**開始查詢，如果不寫預設第乙個從左向右查詢。如若要向右查詢，則將數字寫成負數
'此語句的意思就是 查詢stokens（0）中是否含有insert,delete,update
'ucase$為vb中的函式，就是將所有字母轉換為大寫
if instr("insert,delete,update", ucase$(stokens(0))) then
'execute 方法，執行在 commandtext 屬性中指定的查詢、sql 語句或儲存過程。
'對於按行返回的 command:
'set recordset = command.execute(recordsaffected, parameters, options)
'對於不按行返回的 command:
'command.execute recordsaffected, parameters, options
'返回值
'返回 recordset 物件引用。
'vb裡execute是個方法，執行遠端請求或者sql查詢的
'所以此查詢為不安行查詢的execute語句，執行的sql查詢
cnn.execute sql
'返回查詢結果
msgstring = stokens(0) & " query successful"
else
'建立乙個新的資料集
set rst = new adodb.recordset
'這句話的意思就是開啟臨時記錄集，記錄sql中的所有資料，游標型預設為0，及從頭到尾取得所有結果，
'加鎖型別預設為1，也就是只能讀取資料，不能更改資料
'還有更多的游標型別和加鎖型別請檢視(
rst.open trim$(sql), cnn, adopenkeyset, adlockoptimistic
'返回記錄物件
set executesql = rst
msgstring = "查詢到" & rst.recordcount & _
" 條記錄 "
endif
executesql_exit:
set rst = nothing
set cnn = nothing
exit
function
executesql_error:
msgstring = "查詢錯誤: " & _
err.description
resume executesql_exit
endfunction
學生資訊管理系統之模組的理解
傳遞引數sql傳遞查詢語句，msgstring傳遞查詢資訊。自身以乙個資料集物件的形式返回 public function executesql byval sql as string,msgstring as string as adodb.recordset dim cnn as adodb.c...
對學生管理系統的心得
事過境遷，我的學生管理系統終於有了眉目，很開心，開心之餘，不忘寫一篇部落格來慶祝一下 下面，我就來說一下我對管理系統的理解 首先我先說一下學生管理系統執行過程 1 模組裡面的sub main 在這個過程裡，它首先是重新定義了乙個登陸窗體，顯示這個窗體，注意，第一步還沒完呢 進入第二步 2 接著第一步...
學生資訊管理系統 系統模組
系統模組主要分為三個小模組 1 新增使用者 2 修改密碼 3 推出登陸 其中知識點相對比較多的在新增使用者窗體中 1 新增使用者模組的主要功能就是為資料庫新增新的使用者 a 判斷文字框中是否為空 b 若不為空，判斷輸入的使用者名稱是否在資料庫中已經存在 起初對於這句話並不是很理解，在查詢之後發現其實...