【導讀】維護以及前端應用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫，而對于后者則要求應用程序功能完備、易使用等特點。正和改進，直到形成用戶滿意的可行性系統(tǒng)。在visual環(huán)境下采用“自上。了一個整體自動化管理模式，從軟件工程的角度進行了科學而嚴謹?shù)年U述。2VisualFoxpro編程環(huán)境簡介----------------------------------------------------6. 3圖書管理系統(tǒng)總體規(guī)劃-----------------------------------------------------------------10. 數(shù)據(jù)表的結構、表單、報表---------------------------------------------------------10. 4圖書管理系統(tǒng)具體實現(xiàn)-----------------------------------------------------------------15. 系統(tǒng)分析與設計-----------------------------------------------------------------------15

　　

【正文】 35 頁 共 49 頁 在項目管理器中選“代碼”選項卡，打開“程序”下拉菜單，右擊“ ”，在彈出的快捷菜單中選“設置主文件”，設置“ ”為系統(tǒng)的主文件。也可以在主窗口菜單欄“項目”下拉菜單中選擇“設置主文件”命令。此時“設置主文件”前會現(xiàn)一“√”號，項列表中的“ main”會以粗體顯示，如圖所示。 （見圖 ） 圖 設置主文件圖 云豐小學圖書管理系統(tǒng) 第 36 頁 第 36 頁 共 49 頁 5 致謝 經(jīng)過設計其功能基本符合需求，能夠完成書籍的采編，會員的管理，借閱和歸還圖書，以及查詢和操作人員的權限分配等功能，可以正確地打印出相關的報表，并提供了系統(tǒng)維護的功能，使用戶方便進行數(shù)據(jù)的備份和恢復、數(shù)據(jù)刪除并且加入計算器、記事本和一個漂亮的時鐘等。同時也考慮到了用圖書編碼和會員編碼以減少數(shù)據(jù)臃腫的問題，對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決，并在多項聯(lián)合查詢開動腦筋，找到了一些小竅門和用“宏替換”來解決問題。 由于編者理論水平的局限 ,開發(fā)經(jīng) 驗的缺乏以及時間因素 ,本軟件還尚未完全完善 ,但整體的創(chuàng)作思路及數(shù)據(jù)流程已經(jīng)基本完善 .本系統(tǒng)中各個管理模塊基本已經(jīng)實現(xiàn) ,未完成的模塊我將在老師的指導下繼續(xù)努力使其功能日趨完善。謝謝！ 云豐小學圖書管理系統(tǒng) 第 37 頁 第 37 頁 共 49 頁 6 參考文獻 [1] 吳迪、曲蒙編著 . 《中文 Visual Foxpro 程序設計指南》（第十二章） .清華出版社 .1999 年 2月（第一版） . [2] 王國輝、董韶華、韓旭編著 . 《 Visual Foxpro 精彩編程 200 例》（第 46 例） . 機械工業(yè)出版社 .2020 年 9月（第一版） . [3]郝鋒、何曙光編著 .《 Visual Foxpro 》（函數(shù)部分） . 電子工業(yè)出版社 .2020 年 3 月（第一版） . [4] 王國輝、董韶華、韓旭編著 . 《 Visual Foxpro 精彩編程 200 例》（第 57 例） . 機械工業(yè)出版社 .2020 年 9月（第一版） . [5] 王國輝、董韶華、韓旭編著 . 《 Visual Foxpro 精彩編程 200 例》（第 41 例） . 機械工業(yè)出版社 .2020 年 9月（第一版） . [6] 王國輝、董韶華、韓旭編著 . 《 Visual Foxpro 精彩編程 200 例》（第 94 例） . 機械工業(yè)出版社 .2020 年 9月（第一版） . [7]李紅．數(shù)據(jù)庫原理和應用．北京：高等教育出版社， [8] 鄭人杰、殷人昆、陶永雷《實用軟件工程》第二版 .清華大學出版社 [9] Soren Requirements Styles and Techniques[M]. BeiJing: Publishing House of Electronics Industry,2590. [10] Roger Engineering A Practitioner’s Approach, 5th ed[M].北京：清華大學出版社， . [11] 杜民等 編著《 Visual Basic 程序設計與開發(fā)指南》 .高等教育出版社 [12] 張龍祥等《面向對象程序設計》 人民郵電出版社 [13] 吳昌平主編 《 Visual Basic 程序設計》 人民郵電出版社 [14] [美 ]馬丁 著 敏捷軟件開發(fā)：原則、模式與實踐 清華大學出版社 [15] 薩師煊，王 珊 .數(shù)據(jù)庫系統(tǒng)概論 [M].北京： 高等教育出版社 .. [16] Paul Testing A Craftsman’s Approach(second Edition)[M].China Machine Press,2020,170175. 云豐小學圖書管理系統(tǒng) 第 38 頁 第 38 頁 共 49 頁 附錄（ 1） 響應“ Init”的事件 set dele on 響應“掛失” Command1 的單擊事件 set dele on select b_book set filter to 狀態(tài) =allt() sele b_book set order to 圖書編號 count to csum for 狀態(tài) =allt() if csum==0 nanswer=messagebox(39。確實要刪除此用戶嗎？！ 39。,4+32,系統(tǒng)提示 ) do case case nanswer=6 sele v_vip dele case nanswer=7 return endcase else messagebox(39。此用戶所借圖書沒有全部歸還，請全部歸還圖書后掛失！ 39。,系統(tǒng)提示 ) return endif 云豐小學圖書管理系統(tǒng) 第 39 頁 第 39 頁 共 49 頁 sele v_vip =39。39。 響應“退出” Command2 的單擊事件 響應“打印” Command3 的單擊事件 select v_vip if empty() messagebox(請先選擇會員 !!!,48,權限管理 ) return endif report form b_book to print preview for 狀態(tài) = =39。39。 響應“ Destroy”的事件 select v_vip 響應“ Unload”的事件 use v_vip exclusive pack 附錄（ 2） 新建帳戶 代碼： 響應“確定” Command1的單擊事件 tname=alltrim() amp。amp。用戶名 tpass1=alltrim()amp。amp。第一次密碼 tpass2=alltrim()amp。amp。第二次密碼 set order to u_name amp。amp。指定控制索引文件 云豐小學圖書管理系統(tǒng) 第 40 頁 第 40 頁 共 49 頁 if empty(tname) or empty(tpass1) or empty(tpass2) amp。amp。判斷操作員字段是否為空 messagebox(請輸入用戶名和密碼！ ,48,系統(tǒng)提示 ) else seek tname amp。amp。查找輸入的操作員姓名 set exact on amp。amp。設置字符精確比較 if found() messagebox(用戶名重復 ,請重新輸入！ ,16,添加用戶 ) =39。39。 =39。39。 =39。39。 else if tpass1tpass2 messagebox(密碼必須一致 ) =39。39。 =39。39。 return endif if tpass1==tpass2 appe blank tid=39。user39。+allt(str(reccount())) repl u_name with tname, u_pass with tpass1,u_id with tid messagebox(用戶已創(chuàng)建成功，請到用戶管理中修改用戶權限?。?！) =39。39。 云豐小學圖書管理系統(tǒng) 第 41 頁 第 41 頁 共 49 頁 =39。39。 =39。39。 endif endif endif set exact off amp。amp。設置字符非精確比較 響應“退出” Command2的單擊事件 編輯權限 代碼： 響應“ form1” Init 的事 件 = amp。amp。賦值給 glywh 等 = = = = = = = = = = = = = = = 云豐小學圖書管理系統(tǒng) 第 42 頁 第 42 頁 共 49 頁 = = = = = = = = = = = = = = 響應“ form1” Activate 的事件 public l l=.f. amp。amp。執(zhí)行表單的 ifenable 事件 store .f. to ,alue,.value,。 ,.value,。 ,.value,。 ,云豐小學圖書管理系統(tǒng) 第 43 頁 第 43 頁 共 49 頁 ,e, store .f. to , 響應“ form1” Ifenable 的事件 store l to ,thisform.,bled,。 ,thisfor,abled,。 ,thisfor, amp。amp。設置控件是否有效 store .f. to ,thisform.,d, 響應“確定 ” mand1 的單擊事件 czyname=alltrim() nAnswer=messagebox(39。確定要保存嗎？ 39。,4+32,39。權限管理 39。) if nAnswer=6 locate for u_name=czyname amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。amp。 repl xtgl with .t. 云豐小學圖書管理系統(tǒng) 第 44 頁 第 44 頁 共 49 頁 repl xtcsh with repl xtgl with repl xtcsh with repl cjyh with repl bjyh with repl scyh with repl sjbf with repl sjhf with repl czgj with repl tsgl with .t. repl lrtsxx with repl tjdy with repl hygl with .t. repl zchy with repl hygs with repl mddy with repl jhgl with .t. repl