【正文】 輸入！, vbOKOnly + vbExclamation, 警告 = Exit Sub End If例二：If CInt(Trim()) CInt(Trim()) + CInt(Trim()) Then MsgBox 出勤次數(shù)過少！, vbOKOnly + vbExclamation, 警告 = Exit Sub End If例三：strSql = Select , from employee a,department b where = strSql, dbConn, adOpenForwardOnly, adLockReadOnly If Then MsgBox 沒有員工資料，請先輸入資料！, vbOKOnly + vbExclamation, 警告 = False Exit Sub End If3）使用觸發(fā)器，在底層保證數(shù)據(jù)安全性功能：使姓名中不能出現(xiàn)數(shù)字。同時，我們逐漸掌握了對VB與SQL軟件的應(yīng)用，讓我們進一步的提升了自己的知識。表頭項居中 = flexFillRepeat = 0 = 0 = 1 = 1 = 4 39。 strCheck amp。 cboCheckYear amp。 amp。,39。 39。 39。按姓名查詢 If Len(Trim(Text1)) = 0 Then strName = Else strName = and =39。性別 男 女 = 0 39。 amp。 amp。 amp。uid=ZFS。由于本系統(tǒng)管理的對象簡單，且每個數(shù)據(jù)內(nèi)容之間都具有關(guān)聯(lián)性，涉及過程并不是很復(fù)雜。對典型功能鼓勵使用存儲過程、函數(shù)和觸發(fā)器的設(shè)計與應(yīng)用。設(shè)計環(huán)境或器材、原理與說明：VB SQL?。樱牛遥郑牛摇。玻埃埃霸O(shè)計過程（步驟）或程序代碼：1 需求分析在人才過剩的今天，企業(yè)對于有用人才的需求逐步加大，企業(yè)內(nèi)部的人事變動和部門規(guī)劃也開始加速，傳統(tǒng)的人事檔案已經(jīng)不能滿足各個企業(yè)的人員流動速度，迫使人們起用新的管理方法來管理員工的相關(guān)信息。%[09]%39。 單擊“完成”按鈕。 amp。 amp。 strEdu amp。表頭項居中 = flexFillRepeat = 0 = 0 = 1 = 1 = 4 = 1 39。 End If 39。 cboCheckYear amp。 04 amp。 39。,39。指定的年月 strCheck = and in(39。 1 amp。,16,1) ROLLBACK RETURN END設(shè)計體會與建議：在起初，我們根本不知道該如何著手，VB是我們接觸不多的軟件，我們對它的應(yīng)用，它的語言，它各種代碼的使用都不是很了解。 由于是第一次設(shè)計數(shù)據(jù)庫系統(tǒng)，我們期間也遇到了種種困難，比如姓名中不能出現(xiàn)數(shù)字、存儲過程及觸發(fā)器的使用等。 \)39。 cboCheckYear amp。 cboCheckYear amp。 amp。,39。 39。年月都為空時 strCheck = Else 39。按工號查詢 If Len(Trim(MskId)) = 0 Then strId = Else strId = and = 39。 strSex amp。 End If 39。 End If If = 0 Then strTitle = Else strTitle = and =39。 5 應(yīng)用程序設(shè)計員工信息管理系統(tǒng)基于用戶驗證登錄的方式實現(xiàn)員工個人信息管理和員工考勤信息管理。錯誤！姓名中不可出現(xiàn)數(shù)字39。信息化時代的到來成為不可抗拒的潮流，人類文明正在進入一個嶄新的時代。要有數(shù)據(jù)完整性設(shè)計，應(yīng)包括必要的數(shù)據(jù)完整性校驗、一致性檢查等。本次課程設(shè)計題目：“員工信息管理系統(tǒng)”，主要目的是編制一個登陸系統(tǒng)，連接數(shù)據(jù)庫系統(tǒng)，用以實現(xiàn)員工個人信息與考勤信息的管理。設(shè)置服務(wù)器名稱，數(shù)據(jù)庫名稱，登錄名（此時假設(shè)密碼為空） = dsn=rsgl。新增功能模塊包含2個功能模塊：員工個人信息的添加、員工考勤信息的添加編輯功能模塊包含2個功能模塊：員工個人信息的刪除、按月份進行員工考勤信息編輯與刪除查詢功能模塊包含2個功能模塊：員工個人信息查詢、按月份進行員工考勤信息查詢系統(tǒng)操作流程圖（）:： Y登錄密碼框判斷密碼員工信息管理系統(tǒng)其他管理結(jié)束開始N保存操作結(jié)果 設(shè)計結(jié)果與分析(可以加頁)：員工信息查詢 ()：員工信息查詢界面主要代碼如下: Private Sub Command1_Click() Dim strId As String Dim strName As String Dim strDept As String Dim strTitle As String Dim strDuty As String Dim strEdu As String Dim strSex As String 39。 39。 amp。 1 amp。 39。 Year(Date) amp。 cboCheckYear amp。 05 amp。 39。,39。) End If End If 39。設(shè)置列寬 (0) = 1000 (1) = 0 (2) = 1200 (3) = 1200 (4) = 1200 (5) = 820 (6) = 820 (7) = 820 (8) = 820 (9) = 900 39。此管理系統(tǒng)只是進行一些簡單的員工管理，還有很多功能可以添加，比如工資發(fā)放，福利分配等，由于時間和能力上的原因不能進行對該系統(tǒng)的完善，但是設(shè)計中也已一定程度上的考慮了以后的功能擴充，在功能增加的基礎(chǔ)上使數(shù)據(jù)庫和前臺設(shè)計的調(diào)整最小化。%[09]%39。 strId amp。 12 amp。 cboCheckYear amp。 amp。,39。) End If Else If cboCheckMonth = Then 39。 amp。列標題 (0, 0) = 工號 (0, 1) = (0, 2) = 姓名 (0, 3) = 性別 (0, 4) = 學(xué)歷 (0, 5) = 部門 (0, 6) = 職務(wù) (0, 7) = 職稱 39。 amp。 39。 39。pwd= ConnectToDatabase =