【正文】
六、參考文獻(xiàn)[1]龔沛曾, Basic 程序設(shè)計(jì)教程( 版)[J]. 北京:高等教育出版社,[2]黃明, Basic 課 程設(shè)計(jì)[M]. 北京:電子工業(yè)出版社,[3]劉文濤. Visual Basic +Access 數(shù)據(jù)庫(kù)開發(fā)與實(shí)例[J].北京:清華大學(xué)出版社, [4] 語(yǔ) 言程序設(shè)計(jì)[M].北京:電子工業(yè)出版社, [5]朱慶生,JAVA 程序設(shè)計(jì)之網(wǎng)絡(luò)編程[M],北京:清 華大學(xué)出版社。(2) 增加數(shù)據(jù)轉(zhuǎn)換接口,使得本系統(tǒng)能與學(xué)校圖書管理系統(tǒng)數(shù)據(jù)庫(kù)進(jìn)行無(wú)縫連接。不過(guò)也有一些不足之處需要好好改進(jìn)。介紹學(xué)校圖書管理系統(tǒng)根據(jù)實(shí)際的需求及發(fā)展情況進(jìn)行設(shè)計(jì)與開發(fā)情況,及介紹本系統(tǒng)設(shè)計(jì)應(yīng)用平臺(tái)及技術(shù)支持講述本系統(tǒng)設(shè)計(jì)理念及具體設(shè)計(jì)情況,講解本系統(tǒng)具體制作方法及核心代碼。當(dāng)然仍存在許多問(wèn)題不能解決地盡善盡美,還需不斷地繼續(xù)與探索。這段時(shí)間中,從接到設(shè)計(jì)課題到具體設(shè)計(jì)再到完成系統(tǒng)開發(fā),是一個(gè)不斷地遇到問(wèn)題與解決問(wèn)題的過(guò)程。頁(yè)面設(shè)計(jì)還有進(jìn)一步改善的地方,我會(huì)在今后的學(xué)習(xí)工作中著重加強(qiáng)這方面的鍛煉。在每個(gè)設(shè)計(jì)階段我都能學(xué)到一些新知識(shí),對(duì)我的動(dòng)手能力提高很大。比如以前開發(fā)軟件的時(shí)候,一般做的就是編碼工作,實(shí)現(xiàn)比較簡(jiǎn)單的功能。從而獲得一種本領(lǐng):就是融會(huì)貫通各種語(yǔ)言。但是該系統(tǒng)還有許多不盡如人意的地方,在今后有待進(jìn)一步改善。其功能基本符合用戶需求。系統(tǒng)在提供驗(yàn)證碼時(shí)候要加入一些干擾的條件的,不過(guò)這些人的肉眼是很容易分辨,但機(jī)器人程序不能分辨,很好的防止某人利用機(jī)器人程序?qū)ο到y(tǒng)的惡意操作增加了系統(tǒng)的安全性。驗(yàn)證碼可以很好的解決了怎樣防止惡意用戶利用惡意軟件對(duì)系統(tǒng)頁(yè)面的瘋狂提交、以及暴力破解密碼進(jìn)行登陸的問(wèn)題。圖 43代碼如下:Private Sub Command1_Click() On Error Resume Next = Not = Not = Not If = 添加 Then = 確認(rèn) Else = 添加 End IfEnd SubPrivate Sub Command2_Click()On Error Resume Next If Then End SubPrivate Sub Command3_Click()數(shù)學(xué)與信息科學(xué)學(xué)院課程設(shè)計(jì)稿紙12 On Error Resume Next = Not = Not = Not If = 修改 Then = 確認(rèn) Else = 修改 End IfEnd SubPrivate Sub Command4_Click() On Error Resume Next = 添加: = 修改 = True: = True = True: = TruePrivate Sub Command5_Click() End SubPrivate Sub Form_Load() = + /End SubPrivate Sub Label10_Click()End Sub(2)供貨查詢信息圖 44數(shù)學(xué)與信息科學(xué)學(xué)院課程設(shè)計(jì)稿紙13代碼如下:Private Sub Command1_Click() On Error Resume Next = Not = Not = Not If = 添加 Then = 確認(rèn) Else = 添加 End IfEnd SubPrivate Sub Command2_Click() On Error Resume Next If Then End SubPrivate Sub Command3_Click() On Error Resume Next = Not = Not = Not If = 修改 Then = 確認(rèn) Else = 修改 End IfEnd SubPrivate Sub Command4_Click() On Error Resume Next = 添加: = 修改 = True: = True = True: = True = True 數(shù)學(xué)與信息科學(xué)學(xué)院課程設(shè)計(jì)稿紙14End SubPrivate Sub Command5_Click() End SubPrivate Sub Form_Load() = + /End Sub(3)報(bào)表預(yù)覽圖 4—5圖 46其代碼如下:圖書供貨信息:Private Sub Command1_Click() On Error Resume Next = Not = Not 數(shù)學(xué)與信息科學(xué)學(xué)院課程設(shè)計(jì)稿紙15 = Not If = 添加 Then = 確認(rèn) Else = 添加 End IfEnd SubPrivate Sub Command2_Click() On Error Resume Next If Then End SubPrivate Sub Command3