【導(dǎo)讀】全套源程序代碼聯(lián)系153893706

　　

【正文】 年級 課程號 學(xué)分 課程名 年級 5）實體 和實體之間的關(guān)系 ER 圖如圖所示： 學(xué)生檔案 考核過程 對應(yīng) 學(xué)生檔案 對應(yīng) 教學(xué)計劃 課程設(shè)置 成績 畢業(yè)設(shè)計（論文） 27 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計 現(xiàn)在將上面的數(shù)據(jù)庫概念結(jié)構(gòu)轉(zhuǎn)化為 ACESS 數(shù)據(jù)庫系統(tǒng)所支持的實際數(shù)據(jù)模型，也就是數(shù)據(jù)庫的邏輯 結(jié)構(gòu)。在上面的實體以及實體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫中的表格以及各個表格之間的關(guān)系。 該表用來存放學(xué)生入學(xué)注冊的個人基本信息。 表 字段名 類型 寬度 學(xué)號 字符型 10 性別 字符型 2 出生年月 字符型 10 政治面目 字符型 10 父母姓名 字符型 8 聯(lián)系電話 字符型 11 家庭住址 字符型 30 畢業(yè)級別 字符型 10 設(shè)計說明：為方便編程以及人們工作習(xí)慣，這里將學(xué)號、出生年月、入學(xué)時間、聯(lián)系電話等都設(shè)計成字符型。并 根據(jù)實際需要設(shè)計了相應(yīng)的寬度。 該表用來存放學(xué)生在校期間的個人成績信息。 表 字段名 類型 寬度 學(xué)號 字符型 10 姓名 字符型 8 畢業(yè)設(shè)計（論文） 28 科目 數(shù)字型 3 成績 數(shù)字型 3 學(xué)期 數(shù)字型 3 用來存放學(xué)生在校期間的評語信息。 表 字段名 類型 寬度 學(xué)號 字符型 10 姓名 字符型 10 獎貸學(xué)金 字符型 10 異動 字符型 8 軍訓(xùn)等級 備注型 0 畢業(yè)去向 備注型 0 用來存放學(xué)生學(xué)分信息。 表 字段名 類型 寬度 學(xué)號 字符型 10 學(xué)分 數(shù)字型 10 用來存放教學(xué)信息。 表 字段名 類型 寬度 課程號 字符型 10 課程名 字符型 10 學(xué)分 數(shù)字型 2 畢業(yè)設(shè)計（論文） 29 年級 字符型 10 備注 備注型 4 另外，系統(tǒng)還設(shè)置用戶管理表。字段包括：用戶帳號，用戶 密碼，級別，聯(lián)系電話。 以上是本系統(tǒng)的庫表結(jié)構(gòu)的設(shè)計簡要說明 第四章 應(yīng)用系統(tǒng)實現(xiàn) 按結(jié)構(gòu)化的程序設(shè)計思想，在完成了系統(tǒng)分析、系統(tǒng)設(shè)計后，就可以進(jìn)行系統(tǒng)實現(xiàn)階段了，系統(tǒng)實現(xiàn)是每指把系統(tǒng)的物理模型轉(zhuǎn)換成實際運行系統(tǒng)的全過程。其基本任務(wù)是： a) 前期準(zhǔn)備 b) 系統(tǒng)平臺的安裝與調(diào)試 c) 程序的編制與調(diào)試 d) 信息系統(tǒng)調(diào)試 e) 數(shù)據(jù)庫與文件的建立 f) 系統(tǒng)轉(zhuǎn)換 g) 試運行、驗收與維護(hù) 畢業(yè)設(shè)計（論文） 30 4 1： 學(xué)生檔案資料的錄入子模塊 1）運行時的窗體： 2）控件和事件 a）“網(wǎng)格”容器控件：顯示檔案柜中的數(shù)據(jù)信息。數(shù)據(jù)源設(shè)定為檔 案柜表的查詢記錄集。在窗體的裝載事件 load 中用語句控制。語句是： select 檔案號 ,姓名 ,性別 ,出生年月 ,班級 ,家庭住址 ,父 母 姓 名 ,聯(lián) 系 電 話 , 獎懲記載 ,學(xué)生簡歷 from xsda, db, adOpenStatic, adLockOptimistic Set = adoPrimaryRS b）“最首”按鈕控件： click 事件是將當(dāng)前窗體中的網(wǎng)格控件中的信息和文本框控件中的信息指向數(shù)據(jù)庫表查詢記錄集中的第一條記錄。利 用 SQL語句實現(xiàn)在數(shù)據(jù)庫中查詢符合條件的所以記錄，并在表單中的網(wǎng)格容器中用指針定位。同時文本框也顯示相應(yīng)的記錄信息。如果無相應(yīng)的記錄，系統(tǒng)將給出提示。實現(xiàn)關(guān)鍵語句如下： a doP r ima r yR S. Move Fir s t Te xt1. Te xt = a doP r ima r yR S. Fie lds ( 檔案號 ) Te xt2. Te xt = a doP r ima r yR S. Fie lds ( 姓名 ) Te xt3. Te xt = a doP r ima r yR S. Fie lds ( 性別 ) 畢業(yè)設(shè)計（論文） 31 Te xt4. Te xt = a doP r ima r yR S. Fie lds ( 出生年月 ) Te xt5. Te xt = a doP r ima r yR S. Fie lds ( 班級 ) Te xt6. Te xt = a doP r ima r yR S. Fie lds ( 家庭住址 ) Te xt7. Te xt = a doP r ima r yR S. Fie lds ( 父母姓名 ) Te xt8. Te xt = a doP r ima r yR S. Fie lds ( 聯(lián)系電話 ) Te xt9. Te xt = a doP r ima r yR S. Fie lds ( 獎懲記載 ) Te xt10. Te xt = a doP r ima r y R S. Fie lds ( 學(xué)生簡歷 ) c）“下一條”按鈕控件： click 事件是將網(wǎng)格中的，文本框中的信息同時指向當(dāng)前記錄的下一條記錄。如果越界就給出已經(jīng)是最后一條記錄的提示，并將記錄定位在最后一條記錄。實現(xiàn)語句： a doP r ima r yR S. Move N ext I f a doP r ima r yR S. EO F The n Ms gB ox ( 已 經(jīng) 是 第 后 一 條記錄 了！ ) a doP r ima r yR S. Move La st Els e Te xt1. Te xt = a doP r ima r yR S. Fie lds ( 檔案號 ) Te xt2. Te xt = a doP r ima r yR S. Fie lds ( 姓名 ) Te xt3. Te xt = a doP r ima r yR S. Fie lds ( 性別 ) Te xt4. Te xt = a doP r ima r yR S. Fie lds ( 出生年月 ) Te xt5. Te xt = a doP r ima r yR S. Fie lds ( 班級 ) Te xt6. Te xt = a doP r ima r yR S. Fie lds ( 家庭住址 ) Te xt7. Te xt = a doP r ima r yR S. Fie lds ( 父母姓名 ) Te xt8. Te xt = a doP r ima r yR S. Fie lds ( 聯(lián)系電話 ) Te xt9. Te xt = a doP r ima r yR S. Fie lds ( 獎懲記載 ) Te xt10. Te xt = a doP r ima r yR S. Fie lds ( 學(xué)生簡歷 ) End I f d）“上一條” 按鈕控件： click 事件是將網(wǎng)格中的，文本框中的信息同時指向當(dāng)前記錄的上一條記錄。如果越界就給出已經(jīng)是第一條記錄的提示，并將記錄定位在第一條記錄。實現(xiàn)語句： a doP r ima r yR S. Move P re vious I f a doP r ima r yR S. B O F The n Ms gB ox ( 已 經(jīng) 是 第 一 條 記錄了 ！ ) a doP r ima r yR S. Move Fir s t Els e Te xt1. Te xt = a doP r ima r yR S. Fie lds ( 檔案號 ) Te xt2. Te xt = a doP r ima r yR S. Fie lds ( 姓名 ) Te xt3. Te xt = a doP r ima r yR S. Fie lds ( 性別 ) Te xt4. Te xt = a doP r ima r yR S. Fie lds ( 出生年月 ) Te xt5. Te xt = a doP r ima r yR S. Fie lds ( 班級 ) Te xt6. Te xt = a doP r ima r yR S. Fie lds ( 家庭住址 ) Te xt7. Te xt = a doP r ima r yR S. Fie lds ( 父母姓名 ) 畢業(yè)設(shè)計（論文） 32 Te xt8. Te xt = a doP r ima r yR S. Fie lds ( 聯(lián)系電話 ) Te xt9. Te xt = a doP r ima r yR S. Fie lds ( 獎懲記載 ) Te xt10. Te xt = a doP r ima r yR S. Fie lds ( 學(xué)生簡歷 ) End I f d) “最末”按鈕控件： click 事件是將當(dāng)前窗體中的網(wǎng)格控 件中的信息和文 本框控 件中的 信息指 向數(shù)據(jù) 庫表查 詢記錄 集中的 第后一 條記 錄。利 用SQL 語句實現(xiàn)在數(shù)據(jù)庫中查詢符合條件的所以記錄，并在表單中的網(wǎng)格容器中顯示。如果無相應(yīng)的記錄，系統(tǒng)將給出提示。實現(xiàn)關(guān)鍵語句如下： a doP r ima r yR S. Move La st Te xt1. Te xt = a doP r ima r yR S. Fie lds ( 檔案號 ) Te xt2. Te xt = a doP r ima r yR S. Fie lds ( 姓名 ) Te xt3. Te xt = a doP r ima r yR S. Fie lds ( 性別 ) Te xt4. Te xt = a doP r ima r yR S. Fie lds ( 出生年月 ) Te xt5. Te xt = a doP r ima r yR S. Fie lds ( 班級 ) Te xt6. Te xt = a doP r ima r yR S. Fie lds ( 家庭住址 ) Te xt7. Te xt = a doP r ima r yR S. Fie lds ( 父母姓名 ) Te xt8. Te xt = a doP r ima r yR S. Fie lds ( 聯(lián)系電話 ) Te xt9. Te xt = a doP r ima r yR S. Fie lds ( 獎懲記載 ) Te xt10. Te xt = a doP r ima r yR S. Fie lds ( 學(xué)生簡歷 ) f) “添加”按鈕控件： click 事件是添加新的學(xué)生檔案記錄，實現(xiàn)的原理是對數(shù)據(jù)庫查詢的記錄集添加一條新的記錄，然后修給這條空記錄的值，達(dá)到對數(shù)據(jù)庫表中的學(xué)生檔案記錄添加的目的。實現(xiàn)的語句如下： (檔案號 ) = (姓名 ) = h) “編輯” 按鈕控件： click 事件是將記錄集中當(dāng)前記錄在文本框中進(jìn)行修改，然后更改記錄集中相應(yīng)的記錄。來達(dá)到修改數(shù)據(jù)庫中的記錄的目的。和添加相比不需要 這個語句。實現(xiàn)的主要語句是： 畢業(yè)設(shè)計（論文） 33 (檔案號 ) = (姓名 ) = i)“查找”按鈕控件： click 事件是激活查詢窗體。 語句是： j)“刪除”按鈕控件 ： click 事件是刪除當(dāng)前記錄。同時數(shù)據(jù)庫記錄指針指向當(dāng)前記錄的上一條記錄。 a doP r ima r yR S. D e le te a doP r ima r yR S. Move P re vious I f a doP r ima r yR S. B O F The n a doP r ima r yR S. Move Fir s t End I f Te xt1. Te xt = a doP r ima r yR S. Fie lds ( 檔案號 ) Te xt2. Te xt = a doP r ima r yR S. Fie lds ( 姓名 ) Te xt3. Te xt = a doP r ima r yR S. Fie lds ( 性別 ) h）“退出”按鈕控件： click 事件是釋放當(dāng)前窗體，返回主控系統(tǒng)。實現(xiàn)語句是： Unload Me ：檔案信息查詢子模塊：