【導(dǎo)讀】廣泛交流甚至導(dǎo)致了信息爆炸，“信息時(shí)代”這一詞匯似乎己經(jīng)被普遍接受。得發(fā)展，掌握信息技術(shù)已變成一個(gè)基本要素。部門(mén)的辦公效率。隨著校園計(jì)算機(jī)網(wǎng)絡(luò)的建立，其日常的業(yè)務(wù)、公文管理等信。息量不斷膨脹，低效辦公方式與不斷增長(zhǎng)的辦公業(yè)務(wù)量之間的矛盾日益尖銳，3．學(xué)生管理4．教師管理5．會(huì)議管理。

　　

【正文】 學(xué)生姓名 刪除數(shù)據(jù)表中的內(nèi)容。 修改學(xué)生學(xué)籍 update 學(xué)生學(xué)籍 set [性別 ] =39。 amp。 amp。 39。,[籍貫 ] =39。 amp。 amp。 39。,[年齡 ] =39。 amp。 amp。 39。,[民族 ] =39。 amp。 amp。 39。,[出生年月 ] =39。 amp。 amp。 39。,[政治面貌 ] =39。 amp。 amp。 39。,[處罰 ] =39。 amp。 amp。 39。,[獎(jiǎng)勵(lì) ] =39。 amp。 amp。 39。,[專業(yè) ] =39。 amp。 amp。 39。where 姓名 = 39。 amp。 amp。 39。 當(dāng)用戶在 TextBox2， TextBox3?TextBox10 中輸入新的信息，點(diǎn)擊修改學(xué)生學(xué)籍信息，系統(tǒng)根據(jù)用戶的姓名更新數(shù)據(jù)庫(kù)表。 教師 管理模塊設(shè)計(jì) 功能分析 用戶可以查詢出教師的信息（姓名，基本工資，獎(jiǎng)金，課時(shí)），根據(jù)教師信息可以計(jì)算出教師的工資，也可以查詢出教師的總工資，并且可以導(dǎo)出到 Excel表格 。 教師管理 界面如下圖 57 圖 57 教師管理窗體 第 18 頁(yè) 共 25 頁(yè) 編碼實(shí)現(xiàn) 教師工資計(jì)算 分別在 TextBox1 ， TextBox2， TextBox3下輸入如下內(nèi)容 = Val() * 20 + Val() + Val() 如上所示總工資 =基本工資 +獎(jiǎng)金 +課時(shí) *20（ 20為假設(shè)每節(jié)課為 20元） 要實(shí)現(xiàn) 導(dǎo)出到 Excel 表格的功能，首先編寫(xiě)一個(gè)功能函數(shù) CreaTable()，此函數(shù)是設(shè)計(jì)一個(gè) Excel 的格式 如下： 首先設(shè)定列名分別為名字，課時(shí)，基本工資，獎(jiǎng)金，總工資，簽名。如設(shè)計(jì)名字列： (名字 , GetType(String)) 。 接下來(lái)設(shè)計(jì)要導(dǎo)出的內(nèi)容（如張三） row!名字 = 張三 ， row!課時(shí) = 20，row!基本工資 = 1000， row!獎(jiǎng)金 = 500， row!總工資 = 1900， row!簽名 = 接著調(diào)用這個(gè)功能函數(shù)，實(shí)現(xiàn)導(dǎo)出到 Excel： xlBook = ().Add xlSheet = (sheet1) Dim Table As New DataTable() Table = CreaTable() 將所得到的表的列名 ,賦值給單元格 Dim Col As DataColumn Dim Row As DataRow For Each Col In colIndex = colIndex + 1 (1, colIndex) = 得到的表所有行 ,賦值給單元格 For Each Row In rowIndex = rowIndex + 1 colIndex = 0 For Each Col In colIndex = colIndex + 1 (rowIndex,colIndex)= Row() 接下來(lái)設(shè)計(jì)表格的字體，字體加粗 ，表格邊框樣式 .Range(.Cells(1, 1), .Cells(1, colIndex)). = 黑體 第 19 頁(yè) 共 25 頁(yè) .Range(.Cells(1, 1), .Cells(1, colIndex)). = True .Range(.Cells(1,1), .Cells(rowIndex,colIndex)).Style = 1 通訊錄 模塊設(shè)計(jì) 功能分析 通過(guò)該模塊用戶可 以方便的查找到 所有 聯(lián)系人， 也可以通過(guò)條件查詢查找到需要的聯(lián)系人， 提高工作效率，并且 用戶 可以修改，添加，刪除聯(lián)系人 。 通訊錄 界面如下圖 58，修改通訊錄如下圖 59： 圖 58 通訊錄窗體 圖 59 修改通訊錄窗體 第 20 頁(yè) 共 25 頁(yè) 編碼實(shí)現(xiàn) 在這個(gè)窗體下，用戶可以查詢到所有聯(lián)系人信息，同時(shí)也可以根據(jù)聯(lián)系人姓名只查詢一個(gè)聯(lián)系人的信息，如下： Dim mand As New SqlCommand(select * from 通訊錄 )這個(gè)是查詢所有 聯(lián)系人 信息的語(yǔ)句。 Dim mand As New SqlCommand(select * from 通訊錄 where 姓名 =39。 amp。 User amp。 39。 )這個(gè)是根據(jù) 聯(lián)系人 姓名的查詢語(yǔ)句。 用戶同時(shí)可以修改 聯(lián)系人 （添加，刪除和修改）如下 添加新的聯(lián)系人 str = insert into 通訊錄 (姓名 ,移動(dòng)電話 ,工作單位 ,居住地址 ,電子郵件 ,辦公電話 ,住宅電話 ) values(39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。) = conn = = str = m (ds, 通訊錄 ) 當(dāng)用戶在 TextBox1， TextBox2?TextBox 8 中輸入姓名 ,移動(dòng)電話?住宅電話后點(diǎn)擊添加聯(lián)系人信息，新的聯(lián)系人信息添加到數(shù)據(jù)庫(kù)表中。 刪除聯(lián)系人 = delete from 通訊錄 where 姓名 = 39。 amp。 amp。 39。系統(tǒng)根據(jù)用戶輸入的要?jiǎng)h除的聯(lián)系人的姓名刪除數(shù)據(jù)表中的內(nèi)容。 修改聯(lián)系人 = update 通訊錄 set [移動(dòng)電話 ] =39。 amp。 amp。 39。,[工作單位 ] =39。 amp。 amp。 39。,[居住地址 ] =39。 amp。 amp。 39。,[電子郵件 ] =39。 amp。 amp。 39。,[辦公電話 ] =39。 amp。 amp。 39。,[住宅電話 ] =39。 amp。 amp。 39。where 姓名 = 39。 amp。 amp。 39。 = m 當(dāng)用戶在 TextBox3， TextBox4? TextBox8中輸入新的信息，點(diǎn)擊修改 聯(lián)系人 信息，系統(tǒng)根據(jù)用戶的姓名更新數(shù)據(jù)庫(kù)表。 第 21 頁(yè) 共 25 頁(yè) 會(huì)議管理 模塊設(shè)計(jì) 功能分析 會(huì)議管理模塊能夠讓用戶查詢會(huì)議通知，歷史會(huì)議內(nèi)容。在這個(gè)模塊用戶可以隨時(shí)查詢到是否 有會(huì)議 （數(shù)據(jù)庫(kù)管理員是否更新了后臺(tái)數(shù)據(jù)庫(kù)信息），以前曾經(jīng) 的會(huì)議的主要內(nèi)容 （方便教師做工作總結(jié)）。 會(huì)議管理 界面如下圖 510 圖 510 會(huì)議管理窗體 編碼實(shí)現(xiàn) 首先連接數(shù)據(jù)庫(kù)“辦公自動(dòng)化” Dim conn As New SqlConnection(Server=RACHEL\SQLEXPRESS。 amp。 _ Database=辦公自動(dòng)化 。 amp。 _Integrated Security=SSPI ) 定義 mand為查詢數(shù)據(jù)庫(kù)中 信息查詢 表中的實(shí)時(shí)信息 Dim mand As New SqlCommand(select 會(huì)議通知 from 信息查詢 ) = = conn Dim dr As New SqlDataAdapter = mand Dim ds As New DataSet ds = New DataSet(ds) (ds, 會(huì)議通知 ) = ds = 會(huì)議通知 最后在 DataGridView1 中顯示查詢出來(lái)的內(nèi)容。查詢 每次會(huì)議內(nèi)容 功能同上，只是在查詢時(shí)使用 select 會(huì)議內(nèi)容 from 信息查詢 第 22 頁(yè) 共 25 頁(yè) 時(shí)間提醒 模塊設(shè)計(jì) 功能分析 用戶通過(guò)該模塊可以知道當(dāng)前的時(shí)間，日期，可以設(shè)定需要完成的任務(wù)以及時(shí)間 。 時(shí)間提醒界面如下圖 511 圖 511 時(shí)間提醒窗體 編碼實(shí)現(xiàn) 輸入要提醒的時(shí)間以及事件 str = insert into 時(shí)間提醒 (時(shí)間 ,事件 ) values(39。 amp。 amp。 39。, 39。 amp。 amp。 39。) = conn 刪除時(shí)間 = delete from 時(shí)間提醒 where 時(shí)間 = 39。 amp。 amp。 39。 = m 6 軟件測(cè)試 系統(tǒng)編程完結(jié)后 ，對(duì)界面外觀和功能等進(jìn)行檢測(cè)。首先針對(duì)每一個(gè)模塊進(jìn)行測(cè)試，通過(guò)具體數(shù)據(jù)測(cè)試每個(gè)模塊是否可以正常使用，包括界面的按紐、表格等；還有檢測(cè)執(zhí)行程序的結(jié)果是否與正確結(jié)果的一致，測(cè)試功能的過(guò)程是一個(gè)“測(cè)試 — 修改 — 再測(cè)試 — 再修改”的過(guò)程，直到整個(gè)系統(tǒng)能正常運(yùn)行，所有功能能正常實(shí)現(xiàn)。 在 測(cè)試過(guò)程中，出現(xiàn)過(guò)一些不符合標(biāo)準(zhǔn)的情況，經(jīng)過(guò)修改，都基本與開(kāi)題報(bào)告的標(biāo)準(zhǔn)符合，能夠完成正常的功能。 第 23 頁(yè) 共 25 頁(yè) 由于經(jīng)驗(yàn)欠缺或其它某些原因，本次 完成的軟件不 可能 是完美無(wú)缺的。 測(cè)試只能盡量 避免錯(cuò)誤的 產(chǎn)生和消除已經(jīng)產(chǎn)生的錯(cuò)誤，使程序中的錯(cuò)誤密度達(dá)到盡可能低的程度 ， 減少錯(cuò)誤的引入，但是不可能完全杜絕軟件中的錯(cuò)誤 。經(jīng)過(guò)測(cè)試，本模塊基本能符合要求，也能實(shí)現(xiàn)各功能。 結(jié) 論 本次畢業(yè)設(shè)計(jì)是以 和 SQL Server2021 為基礎(chǔ)，開(kāi)發(fā)的一套基于 C/S 模式的 系辦辦公自動(dòng)化系統(tǒng) 。本次設(shè)計(jì)完成了系統(tǒng)的基本功能，能 夠通過(guò)本系統(tǒng)實(shí)現(xiàn)對(duì) 學(xué)生（聯(lián)系人） 的信息的錄入、修改、刪除和查詢， 設(shè)計(jì)了 教師管理功能，方便教師查詢，計(jì)算工資 ， 使 教師 能掌握 自己工資 信息 。設(shè)計(jì)了信息（會(huì)議）管理 功能，時(shí)間提醒功能 ，讓教師隨時(shí) 了解新的信息。設(shè)計(jì)了郵件發(fā)送功能，安全快捷 的發(fā)送郵件， 提高學(xué)校辦公效率 ；。 本次畢業(yè)設(shè)計(jì)由于時(shí)間和能力有限，不能針對(duì)每項(xiàng) 學(xué)校行政 工作進(jìn)行設(shè)計(jì)，系統(tǒng)功能上不夠完善。在以后的開(kāi)發(fā)過(guò)程中，可根據(jù)具體需要擴(kuò)展系統(tǒng)功能，使系統(tǒng)更適合 學(xué)校的行政 管理。