【正文】
e End Select End Sub Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer) If MsgBox(真的要對出本系統(tǒng)嗎? , vbQuestion + vbYesNo + vbDefaultButton2, 退出 ) = vbNo Then Cancel = 1 End If End Sub Private Sub mnuAbout_Click() Load frmSplash = True vbModal End Sub Private Sub mnuExit_Click() Unload Me End Sub Private Sub mnuFind_Click() = True End Sub Private Sub mnuLogin_Click() If MsgBox(若重新登錄,所有窗體都將關(guān) 閉!是否重新登錄? , vbQuestion + vbYesNo + vbDefaultButton2, 重新登錄 ) = vbYes Then Unload MDIMain End If End Sub Private Sub mnuStudent_Click() If mnUserType = 0 Then Else End If End Sub : 教師信息管理代碼 : Option Explicit Dim mbClose As Boolean 39。根據(jù)不同的用戶類型,使相應(yīng)的菜單項可見 Select Case mnUserType Case 0: 39。表示當(dāng)前登錄的用戶名 Public msUserName As String Private Sub MDIForm_Activate() 39。0管理員類型的用戶 。顯示 MDI 窗體 , 并將用戶類型和用戶名傳到 MDI 窗體中 Load MDIMain With MDIMain .mnUserType = .msUserName = pwd .Show End With Unload Me End If End Sub Private Sub Form_Load() = 0 End Sub 主界面代碼 : Option Explicit 39。登陸成功 39。登錄失敗 MsgBox 對不起,無此用戶或者密碼不正確!請重新輸入!! , vbCritical, 錯誤 = 0 = Len(txtUser) nTryCount = nTryCount + 1 If nTryCount = 3 Then MsgBox 您無權(quán)操作本系統(tǒng) !再見! , vbCritical, 無權(quán)限 Unload Me End If Else 39。用戶密碼錯誤的次數(shù),如果錯誤次數(shù)超過 3 次,則退出系統(tǒng) Static nTryCount As Integer If Then 39。 End Select On Error Resume Next If = adStateOpen Then strSQL 39。 pwd amp。 and serial=39。 user amp。選擇身份為 教師 strSQL = select * from teacher where name=39。 39。 amp。 39。 amp。根據(jù)不同的身份,選擇不同的表用以查 詢 Dim r As New Set r = Dim strSQL As String Select Case mnUserType Case 0: 39。取得用戶輸入的用戶名和密碼 Dim user As String, pwd As String user = txtUser pwd = txtPwd 39。0表示管理員類用戶; 1表示教師類用戶 Dim mnUserType As Integer Private Sub cboUserType_Change() mnUserType = End Sub Private Sub cboUserType_Click() mnUserType = End Sub Private Sub cmdCancel_Click() Unload Me End Sub Private Sub cmdOK_Click() 39。 第二章 系統(tǒng)設(shè)計 系統(tǒng)分析 本教師管理系統(tǒng)主要由以下幾大模塊構(gòu)成 . 一 .通用模塊 (教師管理 ,教師查詢 ,重新登陸 ,退出 ) 二 ..幫助模塊 系統(tǒng)流程和操作方式設(shè)計 主界面 教 師 管 理 教 師 查 詢 重 新 登 錄 退 出 幫 助 程序登陸 第三章 系統(tǒng)界面設(shè)計 登陸界面代碼設(shè)計 : Option Explicit 39。 如果要分析數(shù)據(jù)或?qū)?shù)據(jù)以特定的方式打印出來,請創(chuàng)建一個報表。 如果要簡單地直接在某個表中查看、輸入及更改數(shù)據(jù),請創(chuàng)建一個窗體。 如果要搜索并檢索符合指定條件的數(shù)據(jù),包括來自多個表中的數(shù)據(jù),就要創(chuàng)建查詢。 如果要保存數(shù)據(jù),請為每一種類型的信息創(chuàng)建一個表。s information technology and to achieve a leap forward of the information industry, give better play to the information industry to stimulate economic growth. Development of school teachers in the management process is to achieve data systems approach to the management of the artificial puter management changes in puter technology and management practices between teachers build bridges. Keyword : teacher management, management information systems, databases, puter management 第一章 引言 對于 一個學(xué)校 來說,大量 教師 信息難于通過傳統(tǒng)的方法進(jìn)行管理; 這就迫切需要利用計算機(jī)技術(shù)來幫助學(xué)校管理者來處理教師信息的日常管理 .教師管理系統(tǒng)是管理信息系統(tǒng)的一個典型用例 . 背景 教師管理系統(tǒng) 如今隨著教育事業(yè)的發(fā)展 ,學(xué)校對教師需求的增加 ,一個單位 ,教師人事信息 ,編制 ,排課工資等信息量將迅速的增加 ,傳統(tǒng)的手工的處理方式已經(jīng)跟不上信息爆炸般的擴(kuò)增 .所以開發(fā)一種可靠 ,高效的教師管理系統(tǒng)是很有必要的 . 開發(fā)教師管理系統(tǒng)的目的與原則 教師管理系統(tǒng)的主要目的是服務(wù)與中小學(xué) ,各高校 的管理者 ,方便其管理本校教師信息的軟件系統(tǒng) .其原則是做到 ,界面友好人性 ,操作簡單 ,可靠 . 開發(fā)環(huán)境介紹 開發(fā)平臺 本教師管理系統(tǒng)的開發(fā)平臺為微軟 windows xp visual basic 以及微軟的 Access 作為操作數(shù)據(jù)庫 . 數(shù)據(jù)庫設(shè)計工具 —— ACCESS 數(shù)據(jù)庫管理系統(tǒng) Microsoft Access 介紹 : 使用 Microsoft Access,可以在單一的數(shù)據(jù)庫文件中管理所有的信息。 關(guān)鍵字 :教師管理 ,管理信息系統(tǒng) ,數(shù)據(jù)庫 ,計算機(jī)管理 Abstract: Since the 20th century, the rapid development of social productive forces, science and technology, exchange of information is the depth and scope of increasing the volume of information rapid growth, the traditional information processing and decisionmaking tools have not the needs of the munity, the importance of information and information processing problems urgency unprecedented increase, in the face of increasingly plex and evolving. changes in the social environment, in particular the increasingly keen petition among enterprises situation, a person or an enterprise to survive in modern society, and development, we must have sufficient information and powerful information gathering and processing tools. For a school, a lot of information to teachers through traditional means。要 抓住當(dāng)前網(wǎng)絡(luò)經(jīng)濟(jì)興起的有利時機(jī),以實現(xiàn)我國信息技術(shù)和信息產(chǎn)業(yè)的跨越式發(fā)展,更好地發(fā)揮信息產(chǎn)業(yè)對國民經(jīng)濟(jì)增長的拉動作用。我國擁有廣闊的市場和豐富的人才資源,有幾十年的技術(shù)積累和經(jīng)驗積累,有一定的后發(fā)優(yōu)勢。教師管理系統(tǒng) 目 錄 摘 要 I ABSTRACT II 第一章 引言 1 背景 1 教師管理系統(tǒng) 1 開發(fā)教師管理系統(tǒng)的目的和原則 3 開發(fā)環(huán)境介紹 3 開發(fā)平臺 4 數(shù)據(jù)庫設(shè)計工具 —— ACCESS 數(shù)據(jù)庫管理系統(tǒng) 7 第二章 系統(tǒng)設(shè)計 9 系統(tǒng)分析 9 系統(tǒng)流程和操作方式設(shè)計 11 第三章 系統(tǒng)界面設(shè)計 12 系統(tǒng)界面設(shè)計 以及代碼分析 12 第四章 數(shù)據(jù)庫的設(shè)計 30 數(shù)據(jù)庫設(shè)計 30 數(shù)據(jù)庫概念和 發(fā)展 30 系統(tǒng)測試與評價 38 總 結(jié) 39 致 謝 40 參考文獻(xiàn) 41 摘 要 20 世紀(jì)以來,社會生產(chǎn)力迅速發(fā)展,科學(xué)技術(shù)突飛猛進(jìn), 人們進(jìn)行信息交流的深度與廣度不斷增加,信息量急劇增長,傳統(tǒng)的信息處理與決策的手段已不能適應(yīng)社會的需要,信息的重要性和信息處理問題的緊迫性空前提高了,面對著日益復(fù)雜和不斷發(fā)展,變化的社會環(huán)境,特別是企業(yè)間日趨劇烈的競爭形勢,一個人、一個企業(yè)要在現(xiàn)代社會中求生存, 求發(fā)展,必須具備足夠的信息和強(qiáng)有力的信息收集與處理手段。 對于 一個學(xué)校 來說,大量 教師 信息難于通過傳統(tǒng)的方法進(jìn)行管理; 這就迫切需要利用計算機(jī)技術(shù)來幫助學(xué)校管理者來處理教師信息的日常管理 .教師管理系統(tǒng)是管理信息系統(tǒng)的一個典型用例 . 管理信息系統(tǒng)是一個集信息技術(shù)、經(jīng)濟(jì)管理理論、統(tǒng)計學(xué)與運籌學(xué)、數(shù)據(jù)庫技術(shù)為一體的綜合性系統(tǒng),是一個資金技術(shù)密集型、勞動密集型、智力密集型的項目。管理信息系統(tǒng)的創(chuàng)新工作既不能妄自菲薄,更不能夜郎自大。 開發(fā) 學(xué)校教師 管理系統(tǒng)的過程就是要實現(xiàn)數(shù)據(jù)處理方式由人工管理向計算機(jī)管理的轉(zhuǎn)變,它在計算機(jī)技術(shù)和 教師 管理實踐活動兩者之間架設(shè)橋梁。 This urgent need for using puter technology to help school managers to deal with the day