【正文】
的 .現(xiàn)在一般的教師評(píng)語(yǔ)管理都是采用計(jì)算機(jī)作為工具的實(shí)用的計(jì)算機(jī)評(píng)語(yǔ)生成管理程序來(lái)幫助學(xué)生管理員進(jìn)行更有效的學(xué)生評(píng)語(yǔ)寫(xiě)作。 在這里我還要感謝我們宿舍的其它 5 個(gè)同學(xué)。 from amp。 Space(2) amp。 amp。 = adUseClient sql, conn, adOpenKeyset, adLockPessimistic i End If Else MsgBox 請(qǐng)選擇要?jiǎng)h除的學(xué)生! , vbOKOnly + vbExclamation, End If Exit Sub End Sub Private Sub delxmfl_Click() Command13_Click End Sub Private Sub exitsys_Click() Unload Me End Sub Private Sub findstudent_Click() End Sub Private Sub Form_Load() Dim connectionstring As String Dim sql As String On Error GoTo openerror = adUseClient sql = select * from 學(xué)生管理 order by 學(xué)號(hào) 39。 amp。 str2 amp。記錄用戶輸入 Dim prompt As String 39。 (0) Wend End Sub Private Sub Command2_Click() xing = InputBox(輸入老師姓或姓名: ) Text1(1).Text = Text1(1).Text amp。記錄學(xué)期 Dim selstu As Boolean Dim selxm As Boolean Dim xing As String 39。 39。 _ (2) amp。 order by 學(xué)期 sql, conn, adOpenKeyset, adLockPessimistic If = False Then Else MsgBox 該生沒(méi)有評(píng)語(yǔ)! , vbOKOnly + vbExclamation, Exit Sub End If = 39。 Space(5) amp。 Space(5) amp。 Space(5) amp。 Space(5) amp。判斷輸入的用戶名是否為空 MsgBox 沒(méi)有這個(gè)用戶 , vbOKOnly + vbExclamation, Else sql = select * from 系統(tǒng)管理 where 用戶名 =39。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫(kù)。 關(guān)鍵字 :評(píng)語(yǔ) 管理 ,MIS,visual basic ,數(shù)據(jù)庫(kù) Abstract Teachers ment management system for teachers to use puter management information students wrote ments a puter application technology innovation, Management has not yet popular in the puter before the intermediary personnel manual transcription by teachers are the way to operate. Now the general ments of teachers are using puters as a management tool for puter ments generated management procedures to help students managers more effective students writing ments. Comment management system is a typical management information system (MIS), including its main development background to the establishment and maintenance of the database and frontend application development 2. The request for the establishment of strong data consistency and integrity, good for the security of the data. For the latter request applications functions, such as easy to use features. After analysis, we use Microsoft visual basic development tool panies, the use of its various objectoriented development tools, especially data that can be easily accessible and concise window manipulation database intelligent objects, the first prototype application system in a short time and then, putation of the initial prototype system needs to constantly revise and improve until the formation of a viable system of user satisfaction. Keyword : ments management MIS,visual basic database 第一章 引言 1. 1 課題背景 教師評(píng)語(yǔ)管理系統(tǒng)用計(jì)算機(jī)管理教師給學(xué)生撰寫(xiě)評(píng)語(yǔ)信息的一種計(jì)算機(jī)應(yīng)用技術(shù)的創(chuàng)新 ,在計(jì)算機(jī)還未普及之前中介管理都是 由教師人員手工抄寫(xiě)的方式來(lái)操作的 .現(xiàn)在一般的教師評(píng)語(yǔ)管理都是采用計(jì)算機(jī)作為工具的實(shí)用的計(jì)算機(jī)評(píng)語(yǔ)生成管理程序來(lái)幫助學(xué)生管理員進(jìn)行更有效的學(xué)生評(píng)語(yǔ)寫(xiě)作。 39。 班級(jí) If = True Then sql = select * from 學(xué)生管理 where 學(xué)生姓名 =39。 (2) Wend = Else MsgBox 沒(méi)有找到目標(biāo)! , vbOKOnly + vbExclamation, End If End If If = True Then sql = select * from 學(xué)生管理 where 學(xué)號(hào) =39。 (2) Wend = Else MsgBox 沒(méi)有找到目標(biāo)! , vbOKOnly + vbExclamation, End If End If If = True Then sql = select * from 學(xué)生管理 where 班級(jí) =39。 (2) Wend = Else MsgBox 沒(méi)有找到目標(biāo)! , vbOKOnly + vbExclamation, End If End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub List1_Click() Dim i As Long Dim sql As String Dim rsclick As New i = CLng() ID = Left(, 6) If i 0 Then = adUseClient sql = select * from 學(xué)生操行 where 學(xué)號(hào) =39。 第 amp。 (3) amp。記錄學(xué)號(hào) Dim txttbl As String 39。 caoxing End Sub Private Sub Command1_Click() Text1(1).Text = Text1(1).Text amp。 xing amp。 from amp。記錄用戶輸入 Dim prompt As String 39。 amp。 (0) Wend 優(yōu) 良 中 差 = False = False list2state = False setmandstate (1) = False = False = False = False = False = False = False selstu = False 39。 vbCrLf amp。 Space(10) amp。經(jīng)過(guò)大量的測(cè)試和試用,作者深信本軟件達(dá)到了方便和實(shí)用的設(shè)計(jì)目的,并在軟件界面和易用實(shí)用等方面有著獨(dú)到之處。實(shí)用軟件工程教程 高等教育出版社 2020 11 (英) Ian Sommerville 機(jī)械工業(yè)出版社 2020 12 美 Cantu,U. 王輝等譯 visual basic 從入門(mén)到精通 電子工業(yè)出版社 2020 13 李維 面向?qū)ο箝_(kāi) 發(fā)實(shí)踐之路( visual basic 版) (BORLAND 資深顧問(wèn)著名 visual basic 專家李維最新力作 ) 電子工業(yè)出版社 14 秦斌 等 visual basic 數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)與應(yīng)用 中國(guó)水利水電出版社 2020 .1 15 劉藝 visual basic 面向?qū)ο缶幊趟枷? 機(jī)械工業(yè)出版社 2020 basic 程序設(shè)計(jì)第二版 譚浩強(qiáng) 清華大學(xué)出版社 2020 17. visual 程序設(shè)計(jì)教程 . 胡同森 趙劍鋒等 . 浙江科學(xué)技術(shù)出版社 , (第二版 ) 周蘇 王文 著 科學(xué)出版社 2020 Basic 程序設(shè)計(jì)與開(kāi)發(fā)技術(shù) 求是科技 人民郵電出版社 畢業(yè)設(shè)計(jì) 教師評(píng)語(yǔ)管理系統(tǒng) 班級(jí) 學(xué)號(hào) 姓名 摘 要 ???????????????????????????? 1 Abstract???????????????? ???????????2 第一章 引言 ????????????????????????? 4 1. 1 課題背景 ?????????????????????????? 4 1. 2 系統(tǒng)簡(jiǎn)介?????????????????????? ???? 5 第二章 系統(tǒng)的分析???????????????????? ??? 6 2. 1 系統(tǒng)開(kāi)發(fā)的目標(biāo)和思想?????????????????? ?? 6 2. 2 系統(tǒng)的可行性分析???????????????????? ?? 8 第三章 系統(tǒng)的設(shè)計(jì) ????????????????? ??????1 8 3. 1 系統(tǒng)的功能結(jié)構(gòu)設(shè)計(jì)????????????????????? 18 3. 2 系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì) 3. 3 界面設(shè)計(jì)與代碼設(shè)計(jì)?????????????????????????? 23 ?????????????????????? 24 結(jié)束語(yǔ) ??????????????????????????????4 6 致謝 ???????????????????????????????4 7 參考文獻(xiàn) ??????????????????? 摘 要 教師評(píng)語(yǔ)管理系統(tǒng)用計(jì)算機(jī)管理教師給 學(xué)生撰寫(xiě)評(píng)語(yǔ)信息的一種計(jì)算機(jī)應(yīng)用技術(shù)的創(chuàng)新 ,在計(jì)算機(jī)還未普及之前中介管理都是由教師人員手工抄寫(xiě)的方式來(lái)操作的 .現(xiàn)在一般的教師評(píng)語(yǔ)管理都是采用計(jì)算機(jī)作為工具的實(shí)用的計(jì)算機(jī)評(píng)語(yǔ)生成管理程序來(lái)幫助學(xué)生管理員進(jìn)行更有效的學(xué)生評(píng)語(yǔ)寫(xiě)作。而對(duì)于后者則要求應(yīng)用程序功能完備 ,易使用等特點(diǎn)。 amp。 39。 39。 39。 39。 vbCrLf