試卷生成系統—計算機畢業設計-資料下載頁

【導讀】第五章開發總結........

　　

【正文】 iJuan(int_Current_NO).int_QuesNO 1 If MyShiJuan(int_Current_NO).MyQuestion(i).str_A_Doc Then MyShiJuan(int_Current_NO).MyQuestion(i).str_A_Doc, str_File amp。 Trim(Str(i)) amp。 End If Next str_File = amp。 \temp\ amp。 \data\, str_File ShellExecute , open, str_File, , , 5 AppActivate prev_A Microsoft Word SendKeys %tmm%r^s 39。運行 Word 中的宏以合并試卷 SendKeys %fx DoEvents Call Delay(1) str_File End Sub ‘保存試卷以及試卷的答案 Private Sub Command2_Click() Dim str_File As String Dim FSO As New FileSystemObject 39。 = 導出試卷。 39。 Command1_Click = Word 文檔 (.doc)|*.doc str_File = Trim() If str_File = Then Exit Sub amp。 \temp\, str_File MsgBox 答案導出成功，已保存為 amp。 str_File End Sub Private Sub Command3_Click() str_File = amp。 \temp\ ShellExecute , open, str_File, , , 5 AppActivate prev_A Microsoft Word SendKeys %fv 39。運行 Word 進行打印 39。SendKeys %fx End Sub Private Sub Command4_Click() Dim FSO As New FileSystemObject Dim str_File As String On Error GoTo Err str_File = amp。 \temp\ If (str_File) = False Then str_File End If str_File = amp。 \temp\temp\ If (str_File) = False Then str_File Else str_File amp。 *.* End If If MyShiJuan(int_Current_NO).int_QuesNO = 0 Then Exit Sub = True = True For i = 0 To MyShiJuan(int_Current_NO).int_QuesNO 1 If MyShiJuan(int_Current_NO).MyQuestion(i).str_Q_Doc Then MyShiJuan(int_Current_NO).MyQuestion(i).str_Q_Doc, str_File amp。 Trim(Str(i)) amp。 End If If MyShiJuan(int_Current_NO).MyQuestion(i).str_P_Doc Then MyShiJuan(int_Current_NO).MyQuestion(i).str_P_Doc, str_File amp。 Trim(Str(i)) amp。 End If Next str_File = amp。 \temp\ amp。 \data\, str_File ShellExecute , open, str_File, , , 5 AppActivate prev_Q Microsoft Word SendKeys %tmm%r^s 39。運行 Word 中的宏以合并試卷 SendKeys %fx DoEvents Call Delay(1) str_File Exit Sub Err: MsgBox End Sub 第五章 開發總結 經過 1 個多月的學習和實踐，基本上完成了試卷生成系統的整體設計和開發，并具備一定的使用價值。但是由于時間、技術等各方面因素，本系統仍不完善，有很多問題需要解決。 1） 系統總體規劃欠缺：系統在開發過程中就感到總體規劃存在一定問題，如后臺數據庫表的冗余，導致對數據庫的操作復雜。這個問題是開發到中后期發現的，發現的時候以及為時過晚，若當時改正，需要重新開發，這時才認識到軟件開發過 程的重要性。 2） 系統界面美觀欠缺：界面單調，整體布局不太合理，這個問題時由于開發過程中著重關注技術的原因，導致界面不象商業軟件一樣美觀。 3） 該系統功能還不夠完善，統計結果的顯示不太合理，不能一幕了然。 該系統的不盡如人意的地方和功能上的缺陷，這些我都會進一步的改善。 參考文獻 1 陳明 . 軟件工程學教程 .科技出版社， 2021 2 薩師煊，王珊 . 數據庫系統概論 . 第三版 . 高等教育出版社， 2021 3 飛思科技產品研發中心 . visual basic 數據庫應用開發 .電子工業出版社， 2021 4 飛思科技產品研發中心 . visual basic 開發者手冊 . 電子工業出版社 , 2021 5 申 旻 . visual basic 高手突破 . 清華大學出版社， 2021， 302 6 Steve Teixeira， Xaviver Pacheco 著，龍勁松，王瑜，謝尚書譯 . visual basic 開發人員指南 . 機械工業出版社 .2021 7 喬林 .參透 Delphi／ Kylix . 中國鐵道出版社 .2021 8 李維 .Inside 深入核心 VCL 架構剖析 . 電子工業出版社 .2021 9 張立科編寫組 .Windows API 函數參考手冊 .人民郵電出版社 .2021 嚴蔚敏，吳偉民 .數據結構 .第二版 .清華大學出版社 .2021 10 王珍 玲 。實用軟件工程教程 高等教育出版社 2021 11 （英） Ian Sommerville 機械工業出版社 2021 12 美 Cantu,U. 王輝等譯 visual basic 從入門到精通 電子工業出版社 2021 13 李維 面向對象開發實踐之路（ visual basic 版） (BORLAND 資深顧問著名 visual basic 專家李維最新力作 ) 電子工業出版社 14 秦斌 等 visual basic 數據庫系統開發與應用 中國水利水電出版社 2021 .1 15 劉藝 visual basic 面向對象編程思想 機械工業出版社 2021 basic 程序設計第二版 譚浩強 清華大學出版社 2021 17. visual 程序設計教程 . 胡同森 趙劍鋒等 . 浙江科學技術出版社 , (第二版 ) 周蘇 王文 著 科學出版社 2021 Basic 程序設計與開發技術 求是科技 人民郵電出版社 致 謝 我首先感謝我的指導老師呂老師，在他嚴格的要求下我懂得了開發軟件要有一種極其認真負責的態度。無論做什么事都要大膽的去想去做，這樣會有好的創意，才能更有作為。 在這里我還要感謝我們宿舍的其它 5 個同學。他們和我共同生活了四年，在生活和學習上給了 我很大的幫助。 They both knew it. And if she hadn39。t won an ecology essay petition and a prize of places for two aboard Sea Shepherd, neither of them would be here. She rested her hand on Gary39。s shoulder and looked at him cheekily. You may be a pain in the neck sometimes, but I39。m glad you39。re ing with me. As Southampton slid astern, Sea Shepherd nosed into the thumping waters of the English Channel. At that moment the sun squinted through a crack in the cloud. On the horizon the sky39。s grey paint was peeling, revealing blue. A good omen? Gary followed Susan down the panionway. See you at dinner, he said, before entering the cabin he shared with Norman. As one of the girls, Susan had Vanessa for a room mate. Next door were Yves and Darren. Susan hesitated outside her cabin, fiddled with her cardigan, ran a b through her hair. Then, head held high, she made her entrance. Vanessa wasn39。t there. Susan relaxed, smiling at herself. The smile faded fast. She39。s taken the bottom bunk! I was here first. Susan stared, glared at the fancy nightdress laid out on the pillow. Did she have the nerve to move it? No, not quite. Fuming, she started to unpac k. Sweaters, Tshirts, jeans, shorts and a dress. She yanked open the wardrobe door. A row of eye catching outfits hung neatly on hangers. It39。s like a fashion store, Susan muttered, shoving the hangers aside to make space for her own clothes. In the bathroom she opened the mirrorfronted cabi on the wall. It was crammed with bottles and jars. Perfume, shampoo, creams ... Susan slammed the cabi shut and pulled a face in the glass. Meanwhile Gary was trying to make friends with Norman. Hard wor k. Norman proved to be a very serious young man, much given to using long words. Must39。ve swallowed a dictionary, Gary thought. But he kept up the conversation. T