圖書館管理信息系統(tǒng)實(shí)施報(bào)告-閱讀頁
2025-06-02 21:52本頁面
【正文】 ENDIF else IF ALLTRIM(mm1)ALLTRIM(mm2) MESSAGEBOX(密碼兩次不一致，請(qǐng)重新輸入 ,48,提示 ) ENDIF ENDIF endif 2.“返回”按鈕 作用 ： 關(guān)閉此系統(tǒng)。 命令內(nèi)容： LOCATE FOR ALLTRIM(mc)=ALLTRIM( 圖書名稱 ) .or. ALLTRIM(mc)=ALLTRIM(圖書作者 ) .or. ALLTRIM(mc)=ALLTRIM(圖書編號(hào) ) IF not FOUND() MESSAGEBOX(沒有此書，請(qǐng)重新輸入！ ,48,信息提示窗口 ) Endif THISFORM. REFRESH 2.“退出”按鈕 作用 ： 退出此系統(tǒng)。 22 精誠錘煉，詮釋商道 —— 吉首大學(xué)商學(xué)院院訓(xùn) 圖書查詢系統(tǒng)系統(tǒng)實(shí)施報(bào)告 22 命令內(nèi)容： LOCATE FOR ALLTRIM(mc)=ALLTRIM( 圖書編號(hào) ) .or. ALLTRIM(mc)=ALLTRIM(圖書名稱 ) .or. ALLTRIM(mc)=ALLTRIM(圖書作者 ) IF not FOUND() MESSAGEBOX(沒有此書，請(qǐng)重新輸入！ ,48,信息提示窗口 ) endif 2.“退出”按鈕 作用 ： 退出此系統(tǒng)。 命令內(nèi)容： LOCATE for ALLTRIM(圖書編號(hào) )=ALLTRIM(mc) .or. ALLTRIM(圖書名稱 )=ALLTRIM(mc) .or. ALLTRIM(圖書作者 )=ALLTRIM(mc) IF not FOUND() MESSAGEBOX(沒有此書，請(qǐng)重新輸入！ ,48,信息提示窗口 ) endif 24 精誠錘煉，詮釋商道 —— 吉首大學(xué)商學(xué)院院訓(xùn) 圖書查詢系統(tǒng)系統(tǒng)實(shí)施報(bào)告 24 thisform. Refresh 2.“退出”按 鈕 作用 ： 退出此系統(tǒng)。 命令內(nèi)容： GO top thisform. mand2. enabled=.f. thisform. mand3. enabled=.f. thisform. mand1. enabled=.t. thisform. mand4. enabled=.t. 25 精誠錘煉，詮釋商道 —— 吉首大學(xué)商學(xué)院院訓(xùn) 圖書查詢系統(tǒng)系統(tǒng)實(shí)施報(bào)告 25 thisform. Refresh 2.“上一記錄”按鈕 作用 ： 定位到上一記錄，激活“下一記錄”和“尾記錄” ，輸出上一記錄 ， 若已是 第一條記錄，窗口提示“ 已到第一條記錄 ！”，并定位到 第一條記錄 記錄，鎖死“首記錄”和“上一記錄”。 命令內(nèi)容： SKIP thisform. mand2. enabled=.t. thisform. mand3. enabled=.t. 26 精誠錘煉，詮釋商道 —— 吉首大學(xué)商學(xué)院院訓(xùn) 圖書查詢系統(tǒng)系統(tǒng)實(shí)施報(bào)告 26 IF EOF() =messagebox(已到最后一條記錄 ！ ,48,信息提示窗口 ) GO bott thisform. mand1. enabled=.f. thisform. mand4. enabled=.f. ENDIF thisform. Refresh 4.“尾記錄”按鈕 作用 ： 定位到尾記錄，鎖死“尾記錄”和“下一記錄”，激活“首記錄”和“上一記錄”，輸出尾記錄內(nèi)容。 命令內(nèi)容： 27 精誠錘煉，詮釋商道 —— 吉首大學(xué)商學(xué)院院訓(xùn) 圖書查詢系統(tǒng)系統(tǒng)實(shí)施報(bào)告 27 五 、程序和系統(tǒng)調(diào)試 經(jīng)過我們的一系列測(cè)試和試用，并沒有出現(xiàn)錯(cuò)誤現(xiàn)象，系統(tǒng)實(shí)施成
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1