【正文】 = End If Else MsgBox 您輸入的帳號或密碼有誤！ , vbOKOnly + vbExclamation, 警告 = = End If 此登陸界面中涉及 到的帳號密碼就是用戶信息表中的記錄，如果用戶信息中沒有與輸入的帳號密碼相匹配的，就出現(xiàn)“您輸入的帳號或密碼有誤 !”的提示。作為軟件工程過程的一個階段，編碼是對設(shè)計的進一步具 體化，因此，程序的質(zhì)量主要取決于軟件的質(zhì)量。 圖 316代表隊成績查詢盒圖 F 運動員 T 提示運動 查詢該運動 員不存在 員成績 T 項目存在 F T 該項目運動員 F 查詢該 運動員 成績 T 代表隊 F T 該代表隊運動員 F 查詢 該運 動員 成績 代表隊成績查詢是以代表隊來查詢的，輸入一個代表隊名稱如果該代表隊不存在則不輸出，否則輸出該代表隊所有運動員的所有比賽成績。 圖 38成績錄入部分盒圖 圖 39 輸出部分盒圖 項目存在 為參加該項目的運動員分組編號 第一個項目 第二個項目 第三個項目 F 成績存在 T 成績修改 成績錄入 循環(huán)條件 DO_WHILE部分 (輸出 ) 徑賽成績錄入與輸出分為兩部分，成績錄入部分是錄入徑賽成績分為初賽成績錄入、預(yù)賽成績錄入和決賽成績錄入，這樣就要有添加成績和修改成績兩功能。 錄入工作人員 錄入工作人員也是同定義比賽項目一樣，也是順序結(jié)構(gòu)。軟伯結(jié)構(gòu)可以用層次圖或結(jié)構(gòu)圖來描繪。 該管理軟件系統(tǒng)面對的用戶主要是普通高等院校和普通中、小學(xué)以及其它行業(yè)的基層體育管理部門。 N N M M 圖 11 田徑運動會的數(shù)據(jù)模型 比賽 運動員 姓名 性別 代表隊 學(xué)號 成績 項目 名稱 類型 跑道類型 裁決 裁判 姓名 崗位 數(shù)據(jù)流圖，描繪當(dāng)數(shù)據(jù)在軟件系統(tǒng)中移動時被變換的邏輯過程，指明系統(tǒng)具有的變換數(shù)據(jù)的功能，因此，數(shù)據(jù)流圖是建立功能模型的基礎(chǔ)。根據(jù)田徑運動會的一般進程，本系統(tǒng)分為 前期編排 處理 、比賽管理 處理 、查詢輸出處理和系統(tǒng)維護等四 個 工具 模塊來完成所期望的功 能 。本論文 首先使用了 Visual Basic 作為 開發(fā)工具和 Access作為后臺數(shù)據(jù)庫，然后再介紹了開發(fā)背景，最后通過截圖和表格來說明該系統(tǒng)的開發(fā)與操作。傳統(tǒng)的運動會，一般是以人手組織為主，運動員的報名、賽事的安排、比賽場地的安排和成績的記錄等操作全都由人手操作，參加人數(shù)越多，運動會的規(guī)模就越大，管理工作就更加費時費力 ，而且容易出錯。所謂模型，就是為了理解事物而對事物做出的一種抽象，是對事物的一種無歧義的書面描述。界面清晰友好，操作簡便 使用戶無需經(jīng)過計算機專門訓(xùn)練就能勝任。 主要包括 個人成績查詢、 代表隊 成績查詢、團體總分排名查詢、 名次 查詢等功能。 圖 32 設(shè)置工作崗位盒圖 第一個項目 第二個項目 第三個項目 第一個崗位 第二個崗位 第三個崗位 要設(shè)置工作崗位就要把新的工作加入表中和把不要的崗位從表中刪除，所以這個模塊只需添加和刪除功能。 圖 37 查看秩序冊盒圖 查看秩序冊就是要查看比賽的各種編排，這樣就需要有查看這個功能。 項目成績 本模塊只需單項查詢，用 IF_THEN_ELSE型選擇結(jié)構(gòu)。 數(shù)據(jù)庫表創(chuàng)建 根據(jù) 學(xué)校田徑運動會的實際過程，學(xué)校田徑運動會管理系統(tǒng)主要涉及到的數(shù)據(jù)表有用戶信息、運動員名單、運動員參賽情況、運動項目名單、田賽成績、全能成績、徑賽初賽成績、徑賽預(yù)賽成績、徑賽決賽成績、最終成績、崗位表、工作人員表，這些表都是要先建的。 amp。 39。) strsql3 = insert into 運動員參賽情況 values(39。,39。 amp。 amp。 (0) amp。,39。部分代碼如下： If = Then MsgBox 請選擇項目名稱 !, vbOKOnly, 提示 Else strsql = select 項目類型 from 運動項目名單 where 項目名稱 =39。圖 (7)就是完成了數(shù)據(jù)庫備份成功后的界面。 —— 正文 你不仁、我不義 (2) 雷越突然臉色一變，哈哈大笑著摟住了謝正?！敝x正湊到電腦前，裝模作樣看了半天。 “不過，依照我對丁堅的判斷，我們可以這樣、這樣? .”謝正講出了一個想好的方法。謝正打開免提，放到了桌子上，讓周成和雷越都方便聽的很清楚?！敝艹砂阎x正拉到離公司稍遠的一家酒吧，坐下聊了起來。你 熟陽光俱樂部么？”周成嚴肅的問道。 唐敏說什么也不去洗臉，說這圣井里的水是泡了死人的，卓木強好說歹說，告訴她這池水是活水，和地下水相通，在用光照著讓她看清清澈可見底的池水，唐敏才勉強去洗臉。 David 不僅希望能在這里好好招待一下周成人等，還希望能在這個俱樂部好好玩一玩，娛樂一下?！敝艹梢贿厴罚贿吪闹x正的肩膀。我們都知道這是一個無比困難的工作，您做到了，萬分感謝?！? 周成看著郵件想了想 ，轉(zhuǎn)到一邊撥通了雷越的電話，聊了幾句，回來和謝正說：”行，他不仁，別管我們不義了。 雷越把這封郵件又轉(zhuǎn)發(fā)給周成，請求他的幫忙，并抄送相關(guān)人等。在本次畢業(yè)設(shè)計中，我從指導(dǎo)老師陳木生 老師身上學(xué)到了很多東西，陳老師認真負責(zé)的工作態(tài)度、嚴謹治學(xué)的精神和深厚的理論水平都使我受益匪淺 ； 同時我還要感謝同學(xué)對我的幫助，指出我的錯誤及不妥之處，進一步完善我的畢業(yè)設(shè)計。.Rows = .Rows 1 End With End If End if 上述代碼只是實現(xiàn)選擇的項目是田賽項目的成績輸出，選擇的 項目是徑賽項目和全能項目這里就不列出來了。 (0) amp。 (0) amp。輸出部分的代碼如下： strsql6 = select 每項目取的名次 from 參數(shù)表 Set rs = (strsql6) strsql = select distinct 項目名稱 from 田賽成績 Set rs1 = (strsql) i = 0 Do While Not strsql1 = select * from 田賽成績 where 項目名稱 =39。 39。 and 項目名稱 =39。 amp。 amp。這幾個小模塊的代碼在同小異這里只摘入其中一個小模塊的代碼。登陸界面中涉及到的核心代碼如下： If And Then strsql = select * from 用戶信息 where 用戶名 =39。 成績匯冊 本模塊也是要對項目循環(huán)查詢，所以是 DO_WHILE型循環(huán)結(jié)構(gòu)。 全能成績錄入與輸出 這個模塊在錄入方面也只需添加和修改，所以要用順序結(jié)構(gòu)。 錄入紀錄成績 錄入紀錄成績也如同定義比賽項目，是順序結(jié)構(gòu)。下面就是每個模塊的結(jié)構(gòu)程序設(shè)計。 (1)運動會參數(shù)設(shè)置：包括秩序冊所涉及的 分道 信息組委會名單、裁判員名單、競賽日程等。輸出的報表計算準確，類型豐富，符合有關(guān)規(guī)范 。 3． 前期編排 需要 定義比賽項目，設(shè)置工作崗位、錄入工作人員，運動員報名表 錄入，輸入記錄成績，生成秩序冊，查看秩序冊 等功能 。如在查找資料、處理 日常辦公事務(wù) 、科研生產(chǎn)等方面，無不需要利用大量的信息資源。 整個人類社會已進入高度 信息化 ， 人們對信息和數(shù)據(jù)的利用和處理已經(jīng)進入自動化、網(wǎng)絡(luò)化和社會化的階段。 2． 水平命令菜單 要能實現(xiàn) 前期編排，比賽管理，查詢輸出，系統(tǒng)工具 這幾個功能 。 軟件的特點 1．統(tǒng)一管理運動會的相關(guān)數(shù)據(jù)，方便管理人員進行數(shù)據(jù) 的分析、查詢和比較等。 主要是將競賽的相關(guān)參數(shù)設(shè)置和報名單輸入計算機．再經(jīng)過一些處理操作。 每個模塊要實現(xiàn)的功能不同，所以每個模塊的結(jié) 構(gòu)程序也可能不同。如果此運動員存在而又沒有選擇 輸入的比賽項目則只要把該比賽項目插入?yún)①惽闆r表中，否則提示已經(jīng)選擇該比項目。輸出部分只需輸出這個功能。 圖 319成績名次表盒圖 成績名次表查詢是對所有比賽項目的查詢，單擊一下查詢就會輸出所有比賽項目中得到名次的運動員的成績信息。 圖 51 登陸界面 輸入帳號密碼，帳號密碼正確就可以進入主界面。 前期編排 前期編排中的定義比項目、設(shè)置工作崗位、錄入工作人員、運動員報名和錄入紀錄成績都是表中不存在的就插入到表中，如果存在就修改。 amp。 amp。 39。 amp。然后再從田賽成績中查找下一個田賽項目，再把該項目的前幾名輸出到最終成績表中，以此循環(huán)直到田賽成績中的項目全部查完。 amp。 amp。詳細查詢的信息顯示 .Rows = 2 .CellAlignment = 4 .TextMatrix(0, 0) = 姓名 .TextMatrix(0, 1) = 項目名稱 .TextMatrix(0, 2) = 成績 Do While Not .Rows = .Rows + 1 .CellAlignment = 4 .TextMatrix(.Rows 2, 0) = (0) .TextMatrix(.Rows 2, 1) = Trim((1)) .TextMatrix(.Rows 2, 2) = (2) Loop 39。 參考文獻 [1] 鄭海春，謝維成 . Visual Basic編程及實例分析教程 .清華大學(xué)出版社 .2021 [2] 王新民 . Visual Basic程序設(shè)計與數(shù)據(jù)庫應(yīng)用 .電子工業(yè)出版社 .2021 [3]吳永琢 .看實例學(xué)編程 — Visual Basic程序設(shè)計 .西安電子 科技大學(xué)出版社 .2021 [4] 薩師煊 . 數(shù)據(jù)庫系統(tǒng)概論 .高等教育出版社 .2021 [5] 張平 . 數(shù)據(jù)庫應(yīng)用基礎(chǔ) .2021 [6] 趙國玲，咎玲 .ACCESS數(shù)據(jù)庫應(yīng)用 .機械工業(yè)出版社 .2021 [7] 叢明禮 . 田徑競賽規(guī)則 .人民體育出版社 .2021 [8] 李老民 . 田徑競賽 裁判工作手冊 .北京體育大學(xué)出版社 .2021 致 謝 經(jīng)過一個多月的調(diào)研、設(shè)計和開發(fā)，這套 學(xué)校田徑運動會管理系統(tǒng) 已基本結(jié)束。其后筆鋒一轉(zhuǎn)，向周成和謝正咨詢 MBI 在大平臺上的技術(shù)優(yōu)勢在哪里，請速提供給丁堅，以方便他提供給客戶。諸葛和想的還挺周到，不虧是學(xué)生會主席。 在郵件的結(jié)尾，謝正特別呼應(yīng)了一下丁堅的主題： 再次感謝 您對移通湖南客戶所作的工作，把一個分散平臺方案轉(zhuǎn)向了大平臺。 “你以后去湖南要小心點。 這個 David 有個嗜好，喜歡玩亞洲的夜總會，這次也指 定了家在國外很有名的夜總會――王府井陽光俱樂部，就在王府井飯店的二層?！闭f著，以盤膝坐姿滑進洞內(nèi)，方新教授張大了嘴看著這兩個瘋狂的人，然后看了看朝他吆喝著沖過來的持槍分子，最后發(fā)出一聲嘆息，把背包也扔進了洞內(nèi)，跟著栽了進去。 陽光俱樂部，消費水平僅次于北京第一夜總會――天上人間，都是打腫臉充胖子的人才去那里，性價比超低，沒事誰去那里啊。 “周總，別嚇我，多大的事，還費勁跑這么遠。 丁堅的口氣非常火爆，看樣子郵件把他氣的不淺。 “你這可夠壞的啊。 “這個諸葛和在干嗎呢？我電話問問他。 “不過，我是不反對你去干這個，這也是我喜歡你的地方，或許也就你這種風(fēng)格比較適合對付他。備份數(shù)據(jù)庫就是把系統(tǒng)中的數(shù)據(jù)庫壓縮拷貝到另外的路徑文件下面。 amp。 amp。 39。 amp。 amp。 amp。 + + 39。 or 學(xué)號 =39。 39。各個表的屬性如下： 用戶信息 (用戶名 char(20)，密碼 char(20)) 運動員名單 (姓名 char(20),學(xué)號 char(20),性別 char(2),代表隊 char(20)) 運動項目名單 (項目名稱 char(20)，項目類型 char(20)，跑道類型 char(20)) 田賽成績 (姓名 char(2