【正文】 信息。 圖書(shū)信息修改界面： 界面主要用于顯示要修改的圖書(shū)信息，因此在該界面中要有查找和修改的功能，如除了圖書(shū)信息錄入界面中的所有元素外，還要有“查詢”、“上一條”、“下一條記錄”等按鈕。 讀者信息修改界面： 用于顯示并修改已錄入的讀者信息，因此界面中除了讀者注冊(cè)界面中的元素外，還要有一些查詢的功能，如：“查詢”、 “上一條”、“下一條”等按鈕。 修改用戶界面： 主要用于修改用戶注冊(cè)密碼，因此界面除了需要輸入用戶名和舊密碼，并需有 輸入和確定新密碼的文本框。 根據(jù)以上的分析，圖書(shū)信息管理系統(tǒng)只需建立 5個(gè)數(shù)據(jù)表。所有項(xiàng)目的創(chuàng)建在“項(xiàng)目管理器”中進(jìn)行， 先創(chuàng)建“項(xiàng)目管理器”。在“創(chuàng)建”對(duì)話框中輸入文件名，用表設(shè)計(jì)器建立 .dbf 后綴的表文件。下面是“圖書(shū)信息管理系統(tǒng)”的主程序： set talk off amp。不處理已刪除的記錄 set cent on set date to ansi close all release window 常用 modify window screen title 圖書(shū)信息管理系統(tǒng) zoom window screen max =rgb(80,180,150) =.t. deactivate window 項(xiàng)目管理器 public cyonghu,cmima,jiage cyonghu= cmima= mypath=left(sys(16),rat(\,sys(16))) set defa to (mypath) set path to data。關(guān)閉“菜單設(shè)計(jì)器”并保存為 的菜單文件。屬性 autocenter 值為 .t.,borderstyle 值為2， titlebar 值為 0。 添加計(jì)時(shí)器 timer1,它實(shí)現(xiàn)的功能是動(dòng)態(tài)滾動(dòng)的 label1，其 interval屬性值為 200，timerevent 功能實(shí)現(xiàn)的代碼為： if 220 amp。 界面的應(yīng)用： 雙擊“圖書(shū)信息管理系統(tǒng)”應(yīng)用程序圖標(biāo)，打開(kāi)登陸界面，在“輸入密碼”文本框中輸入密碼后，單擊“確認(rèn)”調(diào)用主菜單和工具欄，關(guān)閉 VFP 主窗口中的所有元素。圖 。 添加形狀 shape1shape2，其 height 屬性值為 2， specialeffect 屬性值為 0。 設(shè)計(jì)圖書(shū)信息修改界面 圖書(shū)修改界面的功能主要是用于 修改已錄入的圖書(shū)信息，在設(shè)計(jì)該界面時(shí)可通過(guò)文本框顯示要修改的信息，然后單擊“修改”按鈕后可直接進(jìn)行修改。 添加標(biāo)簽 label1label11，其 caption 屬性值如圖， backstyle 屬性值為 0，其中l(wèi)abel11用于統(tǒng)計(jì)圖書(shū)記錄的總數(shù)， label8用于顯示當(dāng)前是第幾條記錄。 初始化文本框 text1text6 和 edit1。 界面的應(yīng)用介紹： 執(zhí)行“圖書(shū)管理”的“修改圖書(shū)信息”命令，打開(kāi)“修改圖書(shū)記錄”界面，在該界面右上角顯示已錄入的記錄總數(shù)和當(dāng)前為第幾條記錄。在設(shè)計(jì)時(shí)，對(duì)圖書(shū)的信息可使用文本框進(jìn)行錄人，在錄入時(shí)只輸入書(shū)號(hào)即可自動(dòng)顯示其他相應(yīng)的信息，并在列表中顯示當(dāng)前要售出的書(shū)名和價(jià)格，圖 為圖書(shū)銷(xiāo)售界面的設(shè)計(jì)圖。 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 28 頁(yè) 圖 圖書(shū)銷(xiāo)售界面 添加文本框 text1text7，其中 text1 用于輸入書(shū)號(hào)，其 init event 實(shí)現(xiàn)代碼為： =” ISBN” interactivechange event 功能實(shí)現(xiàn)代碼為： sale booksinfo amp。設(shè)置圖書(shū)銷(xiāo)售的默認(rèn)冊(cè)數(shù) text6用于輸入銷(xiāo)售 此書(shū)的冊(cè)數(shù)， text7用于顯示當(dāng)前圖書(shū)的銷(xiāo)售價(jià) 添加單選按鈕組 optiongroup1,功能用于設(shè)置打折圖書(shū)，其 interactivechange event 功能實(shí)現(xiàn)代碼為： if =1 =allt() 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 29 頁(yè) =0 =0 =0 endif if =1 =val(allt())* =0 =0 =0 endif if =1 =val(allt())* =0 =0 =0 endif if =1 =val(allt())* =0 =0 =0 endif 添加列表框 list1,其功能是用于顯示和統(tǒng)計(jì)即將出售的圖書(shū)。該界面用表格顯示查詢到的銷(xiāo)售記錄，通過(guò)銷(xiāo)售時(shí)間查詢銷(xiāo)售記錄，并按書(shū)名、作者或出版社對(duì)銷(xiāo)售圖書(shū)進(jìn)行統(tǒng)計(jì)。 添加標(biāo)簽 label1label3，其 caption 屬性值如圖。 where 銷(xiāo)售日期 =date() =1 =” salels” =1 添加按鈕組 mandgroup1,其 buttoncount 屬性值為 3 添加“查詢”按鈕 mand1，其 click event 功能實(shí)現(xiàn)的代碼為： sele 書(shū)名，作者，出版社，銷(xiāo)售數(shù)量 from saleinfo into cursor salels。 group by 作者 order by 總銷(xiāo)售量 desc =1 =tjls endif if ==1 sele 書(shū)名 ,作者 ,出版社 ,count(銷(xiāo)售數(shù)量 ) as 總銷(xiāo)售量 from salels into cursor tjls。amp。 圖 報(bào)表設(shè)計(jì)界面 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 36 頁(yè) 報(bào)表的制作步驟： 在“項(xiàng)目管理器”中的“文檔”選項(xiàng)卡中選擇“報(bào)表”項(xiàng)。 在打開(kāi)的對(duì)話框中選擇字段。 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 37 頁(yè) 設(shè)計(jì)讀者注冊(cè)界面 讀者注冊(cè)界面主要是用于對(duì)需借閱圖書(shū)的讀者進(jìn)行注冊(cè)，可通過(guò)文本框來(lái)輸入相應(yīng)的讀者信息，圖 為讀者注冊(cè)界面的設(shè)計(jì)圖。 添加文本框 text1text6 和編輯框 edit1，其中 text1text5 和 edit1 用于讀者的基本信息， text6 用于錄入讀者的押金， text1 的 init event 代碼為： 添加下拉列表 bo1,用于選擇讀者性別，其初始化 init event 實(shí)現(xiàn)代碼為： =” 男“ (“ 男“ ) (“ 女“ ) 添加“確定”按鈕 mand1，其 click event 功能實(shí)現(xiàn)的代碼為： 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 38 頁(yè) use readerinfo if allt()== messagebox(請(qǐng)輸入完整的必要信息！ ,64,提示 ) else if allt()== messagebox(請(qǐng)輸入完整的必要信息！ ,64,提示 ) else if allt()== messagebox(請(qǐng)輸入完整的必要信息！ ,64,提示 ) else if allt()== messagebox(請(qǐng)輸入完整的必要信息！ ,64,提示 ) else append blank repl 讀者編號(hào) with allt() repl 姓名 with allt() repl 年齡 with allt() repl 聯(lián)系電話 with allt() repl 詳細(xì)住址 with allt() repl 壓金 with val(allt()) repl 備注 with allt() repl 注冊(cè)日期 with date() if allt()== repl 性別 with allt() 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 39 頁(yè) else repl 性別 with allt() endif endif endif endif endif use 添加“ 重填”按鈕 mand2，其 click event 功能實(shí)現(xiàn)的代碼為： = = = = = = =男 = 添加“返回”按鈕，其 click event 功能實(shí)現(xiàn)的代碼為： 添加形狀 shape shape shape3， specialeffect 屬性值為 0，其中 shape1 作為功能按鈕的邊框， backcolor 屬性值為“ 7， 233， 216”； shape2 作為文本框的邊框，backstyle 屬性值為 0； shape3 的屬性 height 值為 2。 圖 修改讀者信息界面 界面中的各控件主要屬性設(shè)置以及功能實(shí)現(xiàn)的代碼： 在“項(xiàng)目管理器”中創(chuàng)建表單并保存為 dzxg，屬性 autocenter 值為 .t.， borderstyle值為 2， titlebar 值為 0。 添加下拉列表 bo1,其 init event 實(shí)現(xiàn)代碼為： =“男” (“ 男” ) (“ 女” ) 表單的初始化。 界面的應(yīng)用介紹： 執(zhí)行“讀者管理”的“修改讀者信息”命令，彈出“修改讀者信息”界面，在該界面中可使用“快速定位”和逐個(gè)查詢來(lái)查找需要修改的學(xué)生信息。在查詢時(shí)可按書(shū)名、作者或出版社進(jìn)行查詢，并用表格顯示查詢到的圖書(shū)信息，圖 圖書(shū)查詢?cè)O(shè)計(jì)界面。 添加單選按鈕組 optiongroup1,屬性 buttoncount 值為 3,其中 option1 的 caption為“按書(shū)名查詢”， option2 的 caption 為“按作者查詢”， option3 的 caption 為“按出版社查詢”。 添加表格 grid1,用于顯示查詢到的圖書(shū)，其 afterrowcolchange event 功能實(shí)現(xiàn)的 代碼為： LPARAMETERS nColIndex shuhao=allt() =shuhao sele lendinfo locate for allt(書(shū)號(hào) )=(借閱情況 )==預(yù)約 if !eof() =1 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 46 頁(yè) =1 =0 else =0 =1 =0 endif 表單初始化。 .(借閱情況 )=預(yù)約 北京航空航天大學(xué)畢業(yè)設(shè)計(jì) (論文 ) 第 47 頁(yè) if eof() append blank repl 書(shū)號(hào) with allt() repl 讀者編號(hào) with allt() repl 預(yù)約日期 with date() repl 借閱情況 with 預(yù)約 else messagebox(您已經(jīng)預(yù)約此本書(shū)！ ,64,提示 ) = endif else messagebox(最多只能預(yù)約 3本圖書(shū)，您已經(jīng)預(yù)約 3 本了！ ,64,提示 ) endif endif if ==1 count for allt(讀者編號(hào) )=allt