【正文】 =.T. =.T. =.F. *恢復(fù)本子頁面的各控件的狀態(tài) endif endif 上段代碼的功能是添加一個新的員工的信息到數(shù)據(jù)庫中。 *將本控件的 Caption 更改為“增加確認(rèn)” *刷新本頁面 *將鼠標(biāo)焦點(diǎn)設(shè)定到文本框 1 else getid=alltrim() getname=alltrim() getsex=alltrim() getjob=alltrim() getindate=alltrim() getrank=alltrim() if empty(getid) or empty(getname) or empty(getsex) or empty(getjob) or empty(getindate) or empty(getrank) *判斷填入的資料是否齊全 messagebox(資料不足 ,48,錯誤 ) 如果錯誤，彈出提示對話框 else =39。 =.T. =.T. 18 =.T. =.T. =.T. =.T. *使各文本框可用 append blank *添加空行到表的末尾 =39。 為“增添新記錄”添加 Click 事件代碼： =.F. *使導(dǎo)航條不可用 =.F. *使“修改”按鈕不可用 =.F. *使“刪除”按鈕不可用 =.T. *使“取消”按鈕可用 if =39。 按鈕“上一個”的 Click 事件代碼： Skip 1 *記錄向后退一個 If bof() *判斷是否為第一個記錄，如是， bof()返回“真”（ .T.） Messagebox（＂ 已是第一個記錄 ＂，＂ 48＂，＂ 信息窗口 ＂） =.f. =.f. skip else =.t. =.t. endif =.t. =.t. *根據(jù)實(shí)際情況給出各個按鈕的狀態(tài) 17 在按鈕“第一個”的 Click 事件中輸入如下 代碼： goto top =.f. =.t. =.t. *根據(jù)實(shí)際情況給出各個按鈕的狀態(tài) 在按鈕“下一個”的 Click 事件中輸入如下代碼： Skip If eof() *判斷是否最后一個記錄，如是， eof（）返回“真”（ .T.） Messagebox（＂ 已是最后一條記錄 ＂ ,＂ 48＂ ,＂ 信息窗口 ＂） skip 1 =.f. =.f. else =.t. =.t. endif =.t. =.t. *根據(jù)實(shí)際情況給出各個按鈕的狀態(tài) 在按鈕“最后一個”的 Click 事件如 下代碼： goto bottom =.f. =.t. =.t. *根據(jù)實(shí)際情況給出各個按鈕的狀態(tài) 為保證表中的數(shù)據(jù)不被誤操作修改，請將頁面中的各文本框的“ Enabled”屬性設(shè)為“ .F.”。 圖 116 查詢子頁面 該導(dǎo)航條包含 4 個基本功能。 圖 115 子頁面 1 控件 下面列出更改值，如圖表 18 所示 控件屬性更改值表 控件 Caption Alignment PageCount FontSize Form1 員工信息 Label1 員工信息 2中央 Page1 一覽 3 華文彩云 Command1 增加新記錄 Command2 修改這條記錄 Command3 刪除這條記錄 Command4 取消操作 16 Command5 退出 如圖 115所示，該頁面使用了，“類”，在 Visual FoxPro 中使用類可以大大節(jié)省開發(fā)時(shí)間，簡化系統(tǒng)的設(shè)計(jì)工作，并方便系統(tǒng)的維護(hù)和修改。 15 圖 114 推拽字段到表單中 注意，此時(shí)添加到表單的字段處于與頁框同一層次，將其添加到頁框的子頁面 1 種，對頁框的操作方法與容器類似。在表單中單擊鼠標(biāo)右鍵，選擇 ”Date Enviroment”（數(shù)據(jù)環(huán)境），在彈出的對話框中添加需要的表，如本表需要添 加表 ”Personnel”。直接拉伸表單至合適大小。這里使用頁框來實(shí)現(xiàn)。 本模塊包含的功能有：員工信息瀏覽、增加刪除修改員工記錄、根據(jù)查詢條件查詢員工記錄、顯示查詢 結(jié)果。為表單的 Init事件添加代碼： Public i i=0 *聲明全局變量 i 到此為止，本程序的主界面已設(shè)計(jì)完成，記住要儲存為“ D:\salary\form\”，以后設(shè)計(jì)的表單都會放在“ D:salary\form”目錄下，以便其他程序員管理。應(yīng)用類型的方法還可 以隨時(shí)間推移轉(zhuǎn)變Image1控件里的圖像。其作用是控制 Timer的執(zhí)行間隔時(shí)間，單位為 ms。 Command2 的 Click 代碼為： do form salary\form\dataformat *打開下級表單 dateformat Command3 的 Click 代碼為： do form salary\form\result *打開下級表單 result Command4 的 Click 代碼為： do form salary\form\grcx *打開下級表單 grect Command5 的 Click 代碼為： clear events *釋放表單，結(jié)束程序 為了使表單更富動感，這 里設(shè)計(jì)了一個閃爍效果，閃爍的對象為“ Label”。因此，此時(shí)需要為表單設(shè)計(jì)事件響應(yīng)。此時(shí)添加按鈕到容器中才能是按鈕真正處于容器中，如果直接添加，則按鈕實(shí)際上處于與容器同一層次上。 更改之后的表單如圖 110所示。其屬性值應(yīng)為要顯示的圖象的路徑和文件名。 在 Picture中可以把控件的界面設(shè)為圖象，以便使用者能更形象地使用所開發(fā)的軟件。 Alignment為控件中 Caption的位置狀態(tài)，對于 Label（標(biāo)簽），有“ 0左（缺?。薄ⅰ?1右”、“ 2中央”等 3種設(shè)置。 11 圖 19 向表單中添加控件 更改各個控件的屬性值為所屬值，各更改值見表 17。 10 圖 17 新建表單 在彈出的對話框中單擊“新建”按鈕后，會彈出“表單設(shè)計(jì)器”的界面，如圖 18 所示。 首先， 展開項(xiàng)目管理器中的文檔，選中表單，單擊右側(cè)“新建”按鈕。 為了讓使用者有一個輕松操作的界面，系統(tǒng)的主界面設(shè)計(jì)要求界面友好、功能分塊明確、美觀大方。 字段設(shè)置完成后，單擊“確定”按鈕后為表輸入數(shù)據(jù)。 9 圖 16 設(shè)計(jì)表的內(nèi)容 與 表 16 比較，可以發(fā)現(xiàn)表的字段名就是列名。 圖 15 新建數(shù)據(jù)表 在選擇“新建表”命令后，在彈出的對話框中將表存儲為： D:salary\datebase\。為數(shù)據(jù)庫添加數(shù)據(jù)表，表的具體內(nèi)容見表 11— 表 16。 打開 salary 項(xiàng)目后，在項(xiàng)目管理器中展開數(shù)據(jù)文件夾，鼠標(biāo)選中數(shù)據(jù)庫，單擊右鍵的“ 新建”按鈕，如圖 14 所示，存儲為 D:\salary\datebase\。 首先建一個名為 salary（工資）的項(xiàng)目，保存磁盤中。可以看 出兩個空白是相同的，因此要想打印出沒有空白的表，應(yīng)將小細(xì)節(jié)的底框緊貼在表的下緣，如圖 143所示。 圖 13 系統(tǒng)功能模塊圖 程序調(diào)試情況 在設(shè)計(jì)的過程中，預(yù)覽中發(fā)現(xiàn)報(bào)表的行之間有空白，無法連接成表，如圖 141 所示。 運(yùn)行環(huán)境： Windows 9X 或 Windows 2020。 工資管理系統(tǒng)數(shù)據(jù)庫中各個表格的設(shè)計(jì)結(jié)果見表 16所示。包含的數(shù)據(jù)庫項(xiàng)有員工號、員工姓名、員工基礎(chǔ)工資、員工崗位工資、員工工齡工資、公司福利、員工實(shí)得工資。包含的數(shù)據(jù)庫項(xiàng)有福利名稱、福利值。包括的數(shù)據(jù)庫項(xiàng)有工齡及對應(yīng)工資額。包括的數(shù)據(jù)庫項(xiàng)由部門名稱、工作崗位名稱、工作崗位工資等。包括的數(shù)據(jù)庫項(xiàng)有工資等級、工資額。包括的數(shù)據(jù)庫項(xiàng)有員工號、員工姓名、性別，所在部門、身份證號、生日、籍貫、國籍、民族、婚姻狀況、健康 狀況、參加工作時(shí)間、員工狀態(tài)、狀態(tài)時(shí)間、家庭住址、聯(lián)系電話等。 在仔細(xì)調(diào)查企業(yè)工資管理過程的基礎(chǔ)上，我們得到本系統(tǒng)所處理的數(shù)據(jù)流程，如圖 12所示。 3 圖 11 實(shí)體之間關(guān)系 ER 圖 數(shù)據(jù)字典 數(shù)據(jù)庫需求分析是數(shù)據(jù)庫設(shè)計(jì)的第一個階段，是非常重要的一個階段。 2. 解決方案 (或數(shù)據(jù)庫系統(tǒng)設(shè)計(jì) ) ER 模型設(shè)計(jì) 本實(shí)例根據(jù)上面的設(shè)計(jì)規(guī)劃出的實(shí)體有：員工實(shí)體、員工工資實(shí)體、工資等級實(shí)體、部門崗位體、工資實(shí)體、公司福利實(shí)體。 事務(wù)需求 通過使用該系統(tǒng)，使企業(yè)的工資管理工作系統(tǒng)化、規(guī)范化、自動化，從而提高企業(yè)管理效率。 數(shù)據(jù)需求 ? 盡量利用企業(yè)現(xiàn)有的軟硬件環(huán)境 ，采用先進(jìn)的管理系統(tǒng)開發(fā)方案，達(dá)到充分利用企業(yè)現(xiàn)有資源，提高系統(tǒng)開發(fā)水平和應(yīng)用效果的目的； ? 系統(tǒng)符合企業(yè)工資管理的規(guī)定，滿足企業(yè)相關(guān)人員日常使用的需要，并達(dá)到操作過程中的直觀、方便、使用、安全等要求； ? 系統(tǒng)采用模塊化程序設(shè)計(jì)方法，既便于系統(tǒng)功能的各種組合和修改，又便于未參與開發(fā)的技術(shù)維護(hù)人員進(jìn)行補(bǔ)充、維護(hù)。 1 經(jīng)濟(jì)管理學(xué)院 數(shù)據(jù)庫綜合訓(xùn)練 課程設(shè)計(jì) 課程設(shè)計(jì)題目 工資管理系統(tǒng) 專 業(yè) 班 級 信管 L032 學(xué) 生 姓 名 路丹 學(xué) 號 031607224 指 導(dǎo) 教 師 陳軍霞 張娜萍 2020年 04 月 08 日 蒈蝿裊膂莄螈羇莇芀螇腿膀蠆螆衿肅薅螅羈羋蒁螅肅肁莇螄螃芇芃袃裊聿薁袂羈芅蕆袁肀肈莃袀袀芃荿衿羂膆蚈衿肄莂薄袈膇膄蒀袇袆莀莆蒃罿膃節(jié)薂肁莈薀薂螁膁蒆薁羃莆蒂薀肅艿莈蕿?zāi)i肂蚇薈袇羋薃薇罿肀葿薆肂芆蒞蚆螁聿芁蚅襖芄薀蚄肆肇薆蚃膈莂蒂螞袈膅莈蟻羀莁芄蟻肅膃薂蝕螂荿蒈蝿裊膂莄螈羇莇芀螇腿膀蠆螆衿肅薅螅羈羋蒁螅肅肁莇螄螃芇 芃袃裊聿薁袂羈芅蕆袁肀肈莃袀袀芃荿衿羂膆蚈衿肄莂薄袈膇膄蒀袇袆莀莆蒃罿膃節(jié)薂肁莈薀薂螁膁蒆薁羃莆蒂薀肅艿莈蕿?zāi)i肂蚇薈袇羋薃薇罿肀葿薆肂芆蒞蚆螁聿芁蚅襖芄薀蚄肆肇薆蚃膈莂蒂螞袈膅莈蟻羀莁芄蟻肅膃薂蝕螂荿 蒈蝿裊膂莄螈羇莇芀螇腿膀蠆螆衿肅薅螅羈羋蒁螅肅肁莇螄螃芇芃袃裊聿薁袂羈芅蕆袁肀肈莃袀袀芃荿衿羂膆蚈衿肄莂薄袈膇膄蒀袇袆莀莆蒃罿膃節(jié)薂肁莈薀薂螁膁蒆薁羃莆蒂薀肅艿莈蕿?zāi)i肂蚇薈袇羋薃薇罿肀葿薆肂芆蒞蚆螁聿芁蚅襖芄薀蚄肆肇薆蚃膈莂蒂螞袈膅莈蟻羀莁芄蟻肅膃薂蝕螂荿蒈蝿裊膂莄螈 羇莇芀螇腿膀蠆螆衿肅薅螅羈羋蒁螅肅肁莇螄螃芇芃袃裊聿薁袂羈芅蕆袁肀肈莃袀袀芃荿衿羂膆蚈衿肄莂薄袈膇膄蒀袇袆莀莆蒃罿膃節(jié)薂肁莈薀薂螁膁蒆薁羃莆蒂薀肅艿莈蕿?zāi)i肂蚇薈袇羋薃薇罿肀葿薆肂芆蒞蚆螁聿芁蚅襖芄薀蚄肆肇薆蚃膈莂蒂螞袈膅莈蟻羀莁芄蟻肅膃薂蝕螂荿 蒈蝿裊膂莄螈羇莇芀螇腿膀蠆螆衿肅薅螅羈羋蒁螅肅肁莇螄螃芇芃袃裊聿薁袂羈芅蕆袁肀肈莃袀袀芃荿衿羂膆蚈衿肄莂薄袈膇膄蒀袇袆莀莆蒃罿膃節(jié)薂肁莈薀薂螁膁蒆薁羃莆蒂薀肅艿莈蕿?zāi)i肂蚇薈袇羋薃薇罿肀葿薆肂芆蒞蚆螁聿芁蚅襖芄薀蚄肆肇薆蚃膈莂 蒂螞袈膅莈蟻羀莁芄蟻肅膃薂蝕螂荿蒈蝿裊膂莄螈羇莇芀螇腿膀蠆螆衿肅薅螅羈羋蒁螅肅肁莇螄螃芇芃袃裊聿薁袂羈芅蕆袁肀肈莃袀袀芃荿衿羂膆蚈衿肄莂薄袈膇膄蒀袇袆莀莆蒃罿膃節(jié)薂肁莈薀薂螁膁蒆薁羃莆蒂薀肅艿莈蕿?zāi)i肂蚇薈袇羋薃薇罿肀葿薆肂芆蒞蚆薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄 芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃 螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄 芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃 莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄 芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅 螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄芃薄蝕羇腿薃螂膃肅薂羅羅蒄