【文章內(nèi)容簡(jiǎn)介】 name/*選出 借了圖書逾期未歸還的借書證號(hào)和圖書名 */ from 借閱信息 10 where 還書日期 is null and ((2021year(借出日期 ))*365+(1month(借出日期 ))*30+(12day(借出日期 )))30 13．這個(gè)月未借過書的借書證 . select 借書證號(hào) ,姓名 /*選出 這個(gè)月未借過書的借書證 號(hào)和姓名 */ from reader where 借書證號(hào) not in (select 借書證號(hào) from 借閱信息 where month(借出日期 )=12 ) 14． 這兩個(gè)月哪種書出借最多？ select sname /*選出這兩個(gè)月哪種書借出最多 */ from 借閱信息 group by(sname) having count(sname)=all (select count(sname) from 借閱信息 通過這次課程設(shè)計(jì)，我掌握了 Accesss 數(shù)據(jù)庫(kù)的編程方法，掌握了 Visual Basic\中文版視化面向?qū)ο蟮木幊陶Z(yǔ)言的使用方法。對(duì)目前流行的軟件開發(fā)方法和手段，有了一定的認(rèn)識(shí)，豐富了軟件開發(fā)的經(jīng)驗(yàn)，提高了編制程序的水平，加深理解了許多課程中、書本上學(xué)到的知識(shí)和理論。同 時(shí)通過編寫畢業(yè)設(shè)計(jì)論文，我還掌握了軟件文檔的書寫方法和書寫格式。 因?yàn)槌醮伍_發(fā)一個(gè)系統(tǒng)，所以此系統(tǒng)還有許多不完善的地方。由于時(shí)間有限，和我的編程水平和經(jīng)驗(yàn)不足，有些功能并沒有完全實(shí)現(xiàn)，有些功能實(shí)現(xiàn)的并不理想。在已經(jīng)完成的程序中，也存在許多不盡人意的算法和數(shù)據(jù)結(jié)構(gòu)。而這也讓我充分認(rèn)識(shí)到了軟件編制的困難程度。對(duì)軟件的編制速度，復(fù)雜程度有了充分的認(rèn)識(shí)。 整個(gè)庫(kù)存管理系統(tǒng)已經(jīng)開發(fā)完畢。在開發(fā)的過程中，確實(shí)遇到了不少的困難和阻礙，首先，由于第一次接觸這樣的系統(tǒng)開發(fā)，當(dāng)時(shí)上手時(shí)一片迷茫，根本不知道要做些什么事情，從何做 起，怎么做，其次，書本上的理論知識(shí)終究不同于實(shí)際的操作，真正讓我把項(xiàng)目設(shè)置的整個(gè)流程反映在系統(tǒng)中著實(shí)還是有一定的困難的。因?yàn)楫吘箾]有真正地實(shí)踐過，對(duì)于整個(gè)流程還只是停留在書本上看到的，老師上課講到的。不過，經(jīng)過一段時(shí)間的調(diào)查和研究，翻閱大量的資料以及導(dǎo)師的細(xì)心指導(dǎo)，由此開始慢慢地上了軌道，也漸漸地理清了思路，了解了自己應(yīng)該如何開始，于是為自己制訂了一份進(jìn)度安排，一步步地按照這個(gè)進(jìn)度施行計(jì)劃。同時(shí)，指導(dǎo)老師也讓我們先做一份系統(tǒng)分析，那么在真正的設(shè)計(jì)時(shí)就可以有個(gè)導(dǎo)向，以此達(dá)到事半功倍的效果。確實(shí)，事實(shí)證明，這是 非常需要的。在后期的程序設(shè)計(jì)中，這份系統(tǒng)分析起到了舉足輕重的份量，使我們?cè)诰唧w設(shè)計(jì)中有了更為清晰的目標(biāo)。但是，在此過程中，也并不是一帆風(fēng)順的，特別是在編程方面，遇到了很多的困難，以前雖說沒學(xué)過 VB,但是真要使用這個(gè)開發(fā)工具開發(fā)一個(gè)系統(tǒng)并不是易事，有時(shí)候，有些在系統(tǒng)中的功能我們構(gòu)想的很好，很完美，但在實(shí)際的操作中，并不能完全實(shí)現(xiàn)，很多時(shí)候，雖然把程序編寫出來了，但在執(zhí)行的時(shí)候卻不斷地報(bào)錯(cuò)，往往是這個(gè)功能可以實(shí)現(xiàn)了，那段程序卻又出現(xiàn)了錯(cuò)誤，所以，在這段過程中，需要經(jīng)過無(wú)數(shù)次的修改，不斷地學(xué)習(xí)，反反復(fù)復(fù)的實(shí)踐，最 終才完成了這個(gè) 11 系統(tǒng)的開發(fā)。 在這次課程設(shè)計(jì)中，我要特別感謝 鄭 教師，在您的大力幫助下不僅僅是完成了此系統(tǒng)的開發(fā)而且學(xué)會(huì)了一門編程語(yǔ)言，使我的能力得到了提高。 及運(yùn)行結(jié)果分析 用戶登錄界面 通過 該界面登錄圖書管理系統(tǒng)和進(jìn)行密碼修改。 （ 1）在 您選擇修改密碼 時(shí)， 將進(jìn)入如下界面： 在 單擊 “ 確定 ” 按鈕后，如果兩次新密碼輸入一致，將 返回一個(gè)信息框，提 12 示 密碼修改 成功 。如果不一致， 也將返回一個(gè)信息框提示兩次輸入的新密碼不一致。 （ 2）在您選擇登錄時(shí)，將根據(jù)用戶權(quán) 限提供相應(yīng)操作。如果登錄的用戶是普通用戶， 進(jìn)入主界面 將不能進(jìn)行圖書信息和讀者信息的修改。如下圖 。如果登錄的用戶是管理員，進(jìn)入主界面可以進(jìn)行所有操作，如下圖： 查詢界面 進(jìn)入主界面后， 在 您選擇查詢 時(shí) ，將來到查詢界面 。在這里，您可以選擇查詢方式，如果您選擇按書名查詢，并輸入書名后點(diǎn)擊“確定”，將查到如下結(jié)果： 13 當(dāng)然您也可以選擇其他查詢，如按作者查詢，按分類查詢，查詢已借書數(shù)等。查詢完畢后，您可以選擇“返回”，重新回到主界面，也可以選擇“退出 ” ，退出本系統(tǒng)。 借閱界面 在主界 面， 您也可以選擇借閱，來到借閱界面。在這里，您可以查詢要借的圖書是否被別人借走。如被借走，您將不能借閱，同時(shí)“添加”按鈕顯示灰色，不能點(diǎn)擊。 如果沒被借走，您可以點(diǎn)擊“添加”借閱此書。 14 點(diǎn)擊“添加”后 ，進(jìn)入如下界面，登記借閱信息： 在 單擊 “ 確定 ” 按鈕后，如果 輸入正確， 將 返回一個(gè)信息框，提示 借閱信息已 成功 登記 ，如下圖。如果該讀者已借 5 本書，點(diǎn)擊 “ 確定 ” 按鈕后，將返回信息框，提示 15 借閱完畢后，您可以選擇“返回”，重新回到主界面，也可以選擇“退出 ” ，退出本系統(tǒng)。 還書界面 在主 界面， 您也可以選擇還書，來到 還書 界面。 在這里，您可以 輸入借書證號(hào)，所還書號(hào)點(diǎn)擊“確定”，找到要還的圖書。來到如下界面，登記還書信息。 16 輸入還書日期后，點(diǎn)擊“確定” ， 如果您借書時(shí)間超過一個(gè)月，系統(tǒng)將 返回一個(gè)信息框， 提示您需要繳納罰款。最后系統(tǒng) 提示 還書信息已 成功 登記。 還書完畢后，您可以選擇“返回”，重新回到主界面，也可以選擇“退出 ” ，退出本系統(tǒng)。 更新圖書和讀者信息界面 如果您是管理員 在主界面，還可以選擇 更新圖書和讀者信息 ，來到 如下 界面。在這里，您可以 選擇更新圖書信息和讀者 信息。 17 （ 1）如果您要更新圖書信息，點(diǎn)擊后，來到如下界面： 在這里您可以點(diǎn)擊“添加”，通過如下界面，錄入新的圖書信息。 18 您也可以在設(shè)置條件里確切的找到圖書，對(duì)其進(jìn)行修改和刪除，點(diǎn)擊“修改”后，進(jìn)入如下界面，修改后點(diǎn)擊“確定”。 同時(shí)，您也可以點(diǎn)擊“刪除”，刪除圖書信息。點(diǎn)擊后， 返回一個(gè)信息框，提示 是否要?jiǎng)h除，如果您點(diǎn)擊“是”，就將該 圖書信息 刪除了。 19 最后還可以點(diǎn)擊“返回”，回到圖 。 （ 2）如果您要更新讀者信息，點(diǎn)擊后，來到如下界面： 同樣在這里您可以點(diǎn)擊“添加”，通過如下界面， 錄入新的讀者信息。在錄入新的讀者信息時(shí)，系統(tǒng) 自動(dòng)將其借書證號(hào)作為 ID，密碼默認(rèn)為 666666 添加到用戶表中，方便讀者登錄本系統(tǒng) 。 您還可以在設(shè)置條件里確切的找到讀者信息，對(duì)其進(jìn)行修改和刪除，點(diǎn)擊“修改”后，進(jìn)入如下界面，修改后點(diǎn)擊“確定”。 20 同時(shí)，您也可以點(diǎn)擊“刪除”，刪除 讀者 信息。點(diǎn)擊后， 返回一個(gè)信息框，提示 是否要?jiǎng)h除，如果您點(diǎn)擊“是”，就將該 讀者信息 刪除了。 最后點(diǎn)擊“返回”，回到圖 。 （代碼） 附錄一（登錄界面） Private Sub Command3_Click() Unload Me End Sub Private Sub Form_Activate() yhdl3 = 0 End Sub Private Sub Command1_Click() yhdl3 = yhdl3 + 1 = select Password from 用戶 where ID =39。 + + 39。 AND Password =39。 + + 39。 21 yhdl2 = If yhdl2 = 0 Then MsgBox 用戶名或密碼錯(cuò)誤，請(qǐng)重新輸入 , , 提示 If yhdl3 2 Then MsgBox 您已輸錯(cuò) 3次，已無(wú)法登陸！ , , 提示 Unload Me End If Exit Sub Else = select 權(quán)限 from 用戶 where ID =39。 + + 39。 Set = Adodc2 yhdl = If yhdl = 普通用戶 Then = False Else End If End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub 登錄 _Click() yhdl3 = yhdl3 + 1 = select Password from 用戶 where ID =39。 + + 39。 AND Password =39。 + + 39。 yhdl2 = If yhdl2 = 0 Th