圖書借閱管理系統實例(專業版)

　　

【正文】 amp。 amp。 amp。 組合框中的選項值列表 , 該方法不具備靈活性 修改 cboClass 的屬性值如下 : RowSource Type 1 － 值 Row Source 甲班 , 乙班 , 丙班 , 丁班 2 . 在 ―學生基本數據 ‖選項卡中 , 加入數據導航和查找按鈕 , 并讓鼠標移至其上方時變 為一只手。 焦點要離開前關閉中文輸入法 ⑨ 雙擊 t x tA ddr 編輯框 , 在打開的代碼編輯器中 , 首先編寫其 When 事件代碼 : = IMESTATUS (1) 再編寫其 Valid 事件代碼 : = IMESTATUS (0) ⑩ 修改 cboDepno 的屬性值如下 : amp。 表記錄指針不在最末筆 amp。 隱藏 ―已借出 ‖標簽 amp。 將桌面窗口最大化 amp。 將狀態欄開啟 amp。 使用戶在 ―文本框 ‖中輸入完最后一個字符時 , 自動跳到下一字段 SET SAFETY OFF SET STATUS BAR OFF amp。 關閉本表單 CLEAR EVEN TS amp。 在存儲過程的代碼編輯窗口中 , 編輯代碼如下 : ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ FUNCTION class1 ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ ＊ 14 LOCAL char c har = ″″ DO CA SE CASE SUBST R ( 學生基本資料 .stuid , 1 , 1 ) =″5″ char =″五 ″ CASE SUBST R ( 學生基本資料 .stuid , 1 , 1 ) =″2″ char =″二 ″ ENDCASE DO CA SE CASE 學生基本資料 .depno =″01″ char = char + ″化工 ″ CASE 學生基本資料 .depno =″02″ char = char +″土木 ″ CASE 學生基本資料 .depno =″03″ char = char +″電子 ″ CASE 學生基本資料 .depno = ″04″ char = char +″機械 ″ CASE 學生基本資料 .depno = ″05″ char = char +″電機 ″ CASE 學生基本資料 .depno = ″06″ char = char +″工管 ″ CASE 學生基本資料 .depno = ″07″ char = char + ″國貿 ″ CASE 學生基本資料 .depno = ″08″ char = char +″建筑 ″ CASE 學生基本資料 .depno = ″09″ char = char +″企管 ″ ENDCASE DO CA SE CASE 學生基本資料 .grade = 1 char = char +″一 ″ CASE 學生基本資料 .grade = 2 char = char +″二 ″ CASE 學生基本資料 .grade = 3 char = char +″三 ″ CASE 學生基本資料 .grade = 4 char = char +″四 ″ CASE 學生基本資料 .grade = 5 char = char +″五 ″ CASE 學生基本資料 .grade = 6 char = char +″六 ″ ENDCASE DO CASE CASE 學生基本資料 .class = 1 15 char = char +″甲 ″ CASE 學生基本資料 .class = 2 char = char +″乙 ″ CASE 學生基本資料 .class = 3 char = char +″丙 ″ CASE 學生基本資料 .class = 4 char = char +″丁 ″ ENDCASE RETURN char 2 . 編輯存儲過程 trans_ code, 用于完成根據書號計算其 ―類別 ‖信息。 2. 在查看借閱記錄的同時 ， 可實現相應的還書、借書操作。 1 .2 .1 主窗體 主窗體的運行界面 , 參見圖 。 (3 ) loan 表的索引 ， 見表 。 (4)以最小的邏輯單位儲存數據 ， 其中 “ 班級 ” 字段便必須分解成 “ 年級 ” 和 “ 班級 ” 兩個字段。 (2) 班級名冊 ,參見圖 。 需印制借書證 、 班級名冊 、 書籍明細表 、 標簽、逾期名單、書籍借閱排行榜 等報表。 (4 ) 由要求的第 5 條可搜集到下列數據項 : 科別代號、科別名稱。 (3) student 表的索引 ， 參見表 。 圖 book 表的函數依賴關系 表 book 表的字段結構 字段 1 2 3 4 字段名 CODE BOOKNAME WRITER PUBLISHER 類型 字符 字符 字符 字符 寬度 6 40 20 20 字段標題 書籍編號 書籍名稱 作者 出版商 默認值 格式 ! 輸入屏蔽 A A9999 5 6 BUYDATE NUMBER 日期 數值 8 4 購買日期 D AT E ( ) 借閱次數 7 ISLOAN 邏 輯 1 是否借出 .F . 排序 升 升 升 降 索 引 名 CODE BOKNAME WRITER NUMBER 表 book 表的索引 類 型 主索引 普通索引 普通索引 普通索引 表 達 式 CODE BOOKNAME WRITER NUMBER 4 .―科別名稱 ‖表 (depName) 。 10 2 . 拖動 “ 學號 ” 標簽時 ， 鼠標的形狀變為一個人 ， 拖至 “ 垃圾 ” 桶則刪除該學生記錄 ， 且 刪除時 “ 垃圾 ” 桶出現動畫效果。 12 圖 第三個選項卡 (查看 , 本書已借出 ) 圖 第三個選項卡 ( 修改 ) 圖 第三個選項卡 (查詢及書類代碼顯示 ) 13 1 .3 系 統 實 現 1 .3 .1 建立數據庫與數據庫表 1 . 在 ― E : \ VFP練習 ‖文件夾中 ,建立文件夾 Library , 然后在 Library建立文件夾 Data。 amp。 amp。 amp。 amp。 amp。 amp。 amp。amp。 將第一條按鈕 Enabled amp。 表 命令按鈕屬性事件代碼 按鈕名 事件名稱 GO TOP 事 件 代 碼 Clic k This Form .istop =.T . amp。 重新顯示表單上各對象之資料 代碼同 cm dT op 的 MouseMove 事件代碼 GO BOTTOM ThisForm .istop =.F . amp。 ① 為主窗體添加兩個新屬性 ， 其 Name及屬性值如下 : isAdd .F . oldR ecord 0 ② 添加線框控件 shape1( 用作按鈕的背景 ) , 并設置其屬性如下 : BackColor 64 , 128 , 128 BorderStyle 1 － 不透明 ( 默認值 ) Left Height 386 156 Top Wid th 121 180 SpecialEffect 0 － 3 維 ③ 添加命令按鈕 , 并設置其屬性如下 : Name cmdAdd DisabledForeColor 64 , 128 , 128 Ca ption Font Bold \ A 新增 .T . Fon tName 宋體 FontSize 14 For eColor 0 , 128 , 128 T oolTip Te xt 新增數據 ④ 添加命令按鈕 , 并設置其屬性如下 : Name cmdSave DisabledForeColor 64 , 128 , 128 Ca ption Enabled \ S 保存 .F . FontBold FontSize .T . 14 FontName ForeColor 宋體 0 , 128 , 128 ToolTipText 儲存數據 ⑤ 添加命令按鈕 , 并設置其屬性如下 : Name cm dCancel Cancel .T . Caption \ C 取消 DisabledForeColor 64 , 128 , 128 Enabled FontName .F . 宋體 Font Bold FontSize .T . 14 ForeColor 0 , 128 , 128 ToolTip Te xt 取消數據 ⑥ 添加命令按鈕 , 并設置其屬性如下 : Name cm dList Cancel .T . Caption \ R 名冊 DisabledForeColor 64 , 128 , 128 Enabled FontName .F . 宋體 Font Bold FontSize .T . 14 ForeColor 0 , 128 , 128 T o