【文章內容簡介】 form 權限認證表單 .scx release thisform 用戶權限認證的核心是 “ 確認權限 ” 標簽控件的過程代碼 ,它是用于判斷用戶是否存在的關鍵。對于存在的用戶 ,通過權限認證 之后 ,將會進入該用戶所執(zhí)行的功能模塊 ,否則將不再作任何操作。 布局效果如圖 所示： 圖 權限認證圖 確認權限的標簽控件的過程代碼 : locate all for alltrim (密碼表 .用戶姓名 )==alltrim() if found() if alltrim()==alltrim(密碼表 .用戶密碼 ) 本科畢業(yè)設計（論文） 16 do form 系統主表單 .scx else =+1 if =3 messagebox(口令不正確 !+chr(13)+對不起 ,你無權使用 !,48,登錄信息 ) release thisform else messagebox(口令不正確 !請重新輸入 !,48,登錄信息 ) = endif endif endif 系統主窗口有兩種風格 ,一種風格是用命令按鈕調用其他窗口或執(zhí)行其他程序 ,另一種風格是用主菜單的方式調用其他窗口或執(zhí)行其他程序。每一風格都有特點。在這里 ,我們采用在主窗口中用選項按鈕調用其他窗口的風格 ,同時 ,這些選項按鈕在系統主窗口出現時呈動態(tài)運行狀態(tài) ,由右向左逐漸推出 ,最后穩(wěn)定顯示在用戶面前 ,形成非常友好的用戶界面， 布局效果 如圖 所示 : 。 圖 3 圖 系統主表單圖 在表單中插入了一個計時器控件 Timer1,用于控件選項按鈕的動態(tài)推出 ,并本科畢業(yè)設計（論文） 17 設置它的 Interval 屬性值為 60。 (4)乘客訂票購票表單 航班售票訂票窗口是一具有專門用途的窗口 ,它中涉及到了數據表之間的關聯操作。如圖 所示 : 圖 數據關聯圖 將數據環(huán)境中的 “ 乘客信息數據表 ” 中的全部字段選中，并一次性地全部拖到表單中，形成一個表格控件“ grd 乘客信息數據表 ” 。 然后插入幾個標簽和兩個命令按鈕組控件 mandgroup，組合框控件的主要作用是通過對“航班信息數據表 ” 中可用的航班 號進行選擇，并存儲到“ 乘客 信息數據表 ” 的“航班號 ”字段之中。這樣，表單的完整的布局效果如圖 所示： 圖 訂票購票表單圖 其中 “ 新乘客訂票 ” 命令按鈕的過程代碼如下 : 本科畢業(yè)設計（論文） 18 sele 乘客信息數據表 if =新乘客訂票 =保存新乘客記錄 =str(reo()) .setfocus append blank else =新乘客訂票 =修改訂票記錄 endif sele 航班座位等級分配與座位占用表 locate all for alltrim( 航 班 座 位 等 級 分 配 與 座 位 占 用 表 . 座位號 )==alltrim( .) =* “ 修改訂票記錄 ” 命令按鈕的過程代碼如下 : if =修改訂票記錄 =取消修改 =保存修改 =str(reo()) else =修改訂票記錄 =新乘客訂票 tablerevert() endif go val() (5)乘客查詢和退票表單 在航班售票管理系統中，乘客售票或訂票就是進行數據記錄 ,數據記錄一經本科畢業(yè)設計（論文） 19 形成，往往存在數據查詢的問題。有乘客訂票，就有乘客退票，因此我們需要創(chuàng)建一個乘客查詢與退票管理的表單。整體布局如圖 所示 : 圖 乘客查詢和退票表單圖 “ 查詢乘客 ” 命令按鈕的過程代碼如下 : .setfocus locate all for alltrim( 乘 客 信 息 數 據 表 . 身份證號 )==alltrim() if found() y=reo() go y messagebox(乘客已經找到 ,提示乘客先辦理完相關手續(xù) ,否則不能退票 !) else messagebox(未能找到該乘客 ,請確認 !) endif “ 確認退票 ” 命令按鈕的過程代碼 : locate all for alltrim ( 乘 客 信 息 數 據 表 . 身 份 證號 )==alltrim() if found() if messagebox(當前乘客確實要退票嗎 ?!,32+4+256,開戶確認 )=6 y=reo() go y 本科畢業(yè)設計（論文） 20 sele 航班座位等級分配與座位占用表 locate all for alltrim( 航 班 座 位 等 級 分 配 與 座 位 占 用 表 . 座位號 )==alltrim() x=reo() go x = release x sele 乘客信息數據表 = .recordsource delete next 1 pack .recordsource= release y else messagebox(該乘客未退票 ,座位仍被占用 !) endif else messagebox(對不起 ,該乘客未找到 ,請確認身份證號碼 !) endif (6)飛行時刻表綜合查詢表單 一個飛行時刻表會給乘客在進行航班信息查詢時帶來極大的方便，航班飛行時刻表的綜合查詢功能應該比較強大，以盡量滿足乘客的需要，因此，這里我們將制作的表單可以實現按 5 個方面對航班的信息進行查詢，如按航班號查詢、按發(fā)出城市進行查詢、按到達城市進行查詢、按發(fā)出時間進行查詢、按到達時間進行查詢。 “ 執(zhí)行查詢 ” 命令按鈕的過程代碼如下 : sele 航班信 息數據表 本科畢業(yè)設計（論文） 21 do case case =1 set filter to 航班號 =alltrim() case =2 set filter to 發(fā)出城市 =alltrim() case =3 set filter to 到達城市 =alltrim() case =4 set filter to 發(fā)出時間 =alltrim() case =5 set filter to 到達時間 =alltrim() endcase 整體布局如圖 所示 : 圖 飛行時刻表綜合查詢表單圖 (7)制作系統維護選擇表單 本科畢業(yè)設計（論文） 22 一個系統需要進行設置、數據整理和用戶權限的維護等，因此我們需制作一個系統維護選擇表單。 系統維護選擇是通過三個選項按鈕來執(zhí)行的 ,整體布局如圖 所示 : 圖 系統維護選擇表單圖 在用戶權限維護的操作中，首先需要用戶選擇操作，如添加新用戶、刪除舊用戶或修改原用戶的密碼等 ,無論哪一種操作 ,均需要輸入操作者的密碼 ,在操 作者的密碼通過后才能進行相關的操作。 在系統使用初期 ,用戶需要對航空公司的每一個航班的每一個座位進行編號、設置等級并確認標價，這一過程稱為系統的初始化過程，因此，我們需要制作一個表單 (即窗口 )，來執(zhí)行系統的初始化過程。 在一個航班管理系統中 ,隨著航班售票業(yè)務的開展，系統中存在大量的數據，因此，對于系統中的數據 ,往往需要定期地進行清理 ,即刪除一些過時的數據。對于一些數據的刪除 ,往往需要按條件進行 ,因此 ,我們制作一個按條件刪除的數據清理表單。 (8)報表打印的窗口 在對數據庫進行操作時，數據和文檔的輸出通常有兩 種方式：屏幕顯示和打印機打印。屏幕顯示因受其尺寸和不能永久性保存的限制而不能廣泛使用， 因而通過打印機打印就成為數據庫數據及文檔輸出不可替代的手段。報表就是用戶使用打印機輸出數據庫數據及文檔的一種實用的方式。 下面是一個航班數據信息表的報表 ,如圖 : 本科畢業(yè)設計（論文） 23 . 圖 報表打印圖 創(chuàng)建報表可以有幾種方法，例如報表設計器、報表向導。使用報表設計器創(chuàng)建報表，可以充分發(fā)揮設計者的想象力 ,使報表的設計具有實用性、美觀性、但要掌握控件的使用；使用報表向導創(chuàng)建報表方便快捷 ,但 是很難避免 “ 向導 ” 的約束。這個報表就是用報表向導做的。 航空售票管理系統主程序設置 系統主程序是數據庫應用系統的總控部分，是系統首先要執(zhí)行的程序。它是最高一級的程序，具體用來設計全局變量、系統標題、系統目標、調用“系統主頁”表單。具體在“航空售票管理系統”中的主程序“ .prg”具有的主程序代碼如下： *設置系統環(huán)境 CLEAR CLEAR ALL SET CENTURY ON amp。amp。顯示 4位年代 SET DATE YMD amp。amp。日期顯示方式為“年月日” SET HOUR TO 24 amp。amp。24小時格式顯示日期 SET ESCAPE OFF amp。amp。禁止運行的程序在 [esc]健被中斷 SET TALK OFF amp。amp。關閉命令顯示 SET SAFETY OFF amp。amp。覆蓋時不要確認 本科畢業(yè)設計（論文） 24 *聲明全局變量 PUBLIC cCurUser amp。amp。聲明全局變量，用來保存系統中的登錄用戶 *調用 “軟件封面表單” DO FORM 軟件封面表單 .scx *進行事件循環(huán) READ EVENTS *結束事件循環(huán)后退出 Visual *QUIT 本科畢業(yè)設計（論文） 25 6 結束語 實驗結果表明： 該模擬系統具有現實中訂票、退票以及一些基本的查詢功能，開發(fā)一個具有開放體系結構的、易擴充的、易維護的、具有良好人機交互界面的航班售票系統，實現航空公司的機票銷售的自動化的計算機系統，為企業(yè)的決策層提供準確、精細、迅速的機票銷售信息。界面簡易，程序的穩(wěn)定性和健壯性也不錯，程序的可讀性以及條理性方面顯得較好。 以后將從以下幾個方面進行研究： 1．更多的涉及到資金管理與客戶服務等方面，滿足現代航空業(yè)務流 量劇增的客觀要求。 2．能夠更多把航空售票運用到網上，使每一個人都能方便、快捷地到網上訂票，而不用親自到航空公司去訂票。 本科畢業(yè)設計（論文） 26 參考文獻 [1] [2] [3] 張海藩 . 軟件工程導論 [M].清華大學出版社 , 1997 [4] 李雁翎 . Visual FoxPro 應用基礎與面向對像程序設計教程 [M]. 高等教育出版社 , 2021 [5] [6] 鄭人杰 , 殷人昆 , 陶永雷 . 實用軟件工程 [M].清華大學出版社 , 1998 [7] 邵洋 , 谷宇 . 數據庫系統開發(fā)實例導航 [M].人民郵電出版社 , 2021 [8] 史濟民 , 湯觀全 , 譚浩強 . Visual FoxPro 及其應用系統開發(fā) [M]. 清華大學出版社 , 2021 [9] 陳林 , 陳艷華 , 魏珉 . Visual FoxPro 數據庫開發(fā)實例精粹 [M].電子工業(yè)出版社 , 2021 本科畢業(yè)設計（論文） 27 The Design and Realization of Imitating System of Aviation in Selling Tickets Abstract: Either setting or booking tickets is one of the most basis businesses in civil avitation. On the surface, if is a simple business par