【正文】 看比賽的各種編排，這樣就需要有查看這個功能。而輸出部分也分為初賽、預賽和決賽三部分，每個部分都需輸出這個功能。成績錄入部分是田賽項目的成績錄入和修改，這樣就需添加和修改兩個功能。DO_WHILE部分 (輸出)循環(huán)條件F 成績存在 T成績錄入 修改成績 圖312成績錄入部分盒圖 圖313 輸出部分盒圖全能成績錄入與輸出這個模塊和上面兩個模塊一樣與分為兩部分。 項目成績本模塊只需單項查詢，用IF_THEN_ELSE型選擇結構。 總分表 本模塊是要對項目中的每個項目進行統(tǒng)計，所以是DO_WHILE型循環(huán)結構。 成績名次表查詢 本模塊是要對項目循環(huán)查詢，所以是DO_WHILE型循環(huán)結構。 系統(tǒng)工具 運動會數(shù)據備份和恢復運動會數(shù)據備份是把運動會的數(shù)據庫備份到別的地方，運動會數(shù)據恢復是把備份的數(shù)據庫還原到原來的地方。 數(shù)據庫表創(chuàng)建根據學校田徑運動會的實際過程，學校田徑運動會管理系統(tǒng)主要涉及到的數(shù)據表有用戶信息、運動員名單、運動員參賽情況、運動項目名單、田賽成績、全能成績、徑賽初賽成績、徑賽預賽成績、徑賽決賽成績、最終成績、崗位表、工作人員表，這些表都是要先建的。但是，所選用的程序設計語言的特點及編碼風格也將對程序的可靠性、可讀性、可測性和可維護性產生深遠的影響。界面如圖51所示。 amp。 amp。主界面是進行比賽進程的各個功能的總控制。所有的菜單項組成一個學校田徑運動會管理系統(tǒng)。如果此人存在于運動員名單中且該項目沒有被此人選擇則把此人參加該項目的信息插入到參賽情況表中，否則提示此人已經參加了此項目。 39。 39。,39。,39。) strsql3 = insert into 運動員參賽情況 values(39。) (strsql1) (strsql3) MsgBox 報名成功！, vbOKOnly, 提示 Else strsql2 = select * from 運動員參賽情況 where 姓名=39。 and 項目名稱=39。 Set rs = (strsql2) If = True Then strsql4 = insert into 運動員參賽情況 values(39。,39。) (strsql4) End If End if 比賽管理比賽管理模塊中有三個小模塊分為：徑賽成績錄入與輸出、田賽成績錄入與輸出和全能成績錄入與輸出。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。田賽輸出是把每個田賽項目中的前幾名的人員成績信息輸出到最終成績表中，從田賽成績中的開始查找田賽項目，則從田賽成績表中把從項目名單中查找到的項目的前幾名成績信息輸出到最終成績表中。 (0) amp。 (0) amp。 (1) amp。 Set rs5 = (strsql0) strsql2 = insert into 最終成績(姓名,項目名稱,成績,名次,分數(shù)) values(39。,39。,39。,39。,39。) (strsql2) End If Next i = i + 1Loop 查詢輸出查詢輸出模塊中有七種不同的查詢：運動員成績查詢、代表隊成績查詢、項目成績查詢、總分表、項目名次表、成績名次表和成績匯冊。部分代碼如下：If = Then MsgBox 請選擇項目名稱!, vbOKOnly, 提示Elsestrsql = select 項目類型 from 運動項目名單 where 項目名稱=39。Set rs = (strsqlIf (0) = 田賽項目 Then strsql1 = select * from 田賽成績 where 項目名稱=39。 Set rs1 = (strsql1) With MSHFlexGrid1 39。 系統(tǒng)工具系統(tǒng)工具是為本系統(tǒng)服務的工具，方便本系統(tǒng)的使用。圖(7)就是完成了數(shù)據庫備份成功后的界面。 backup/ Info = 正在備份數(shù)據庫 amp。3．由于水平和時間有限，本系統(tǒng)還有不足之處，比如在徑賽中如有一組運動員成績特別好也只能取其中幾人不能按絕對成績錄取等。今后的工作中，我將充分運用自己所學的計算機知識，并在工作中不斷學習和完善，充分發(fā)揮一名計算機專業(yè)人員的作用，為企業(yè)的騰飛和發(fā)展貢獻自己的力量。在本次畢業(yè)設計中，我從指導老師陳木生老師身上學到了很多東西，陳老師認真負責的工作態(tài)度、嚴謹治學的精神和深厚的理論水平都使我受益匪淺；同時我還要感謝同學對我的幫助，指出我的錯誤及不妥之處，進一步完善我的畢業(yè)設計。不需要反復核對，重復勞動。Dim FileName As String Dim FileBack As String Dim Info As String FileName = mypath amp。而數(shù)據表的瀏覽是讓人清楚數(shù)據庫中有哪些表及表的屬性，讓人更清楚明白數(shù)據庫表的結構。.Rows = .Rows 1 End WithEnd IfEnd if上述代碼只是實現(xiàn)選擇的項目是田賽項目的成績輸出，選擇的項目是徑賽項目和全能項目這里就不列出來了。 amp。 amp。項目成績查詢界面如圖55所示。 (0) amp。 j + 1 amp。 (2) amp。 (1) amp。 (0) amp。 Set rs = (strsql3) If Then strsql0 = select 分數(shù) from 名次分數(shù)表 where 名次= amp。 and 項目名稱=39。order by 成績 desc Set rs2 = (strsql1) For j = 0 To Val((0)) 1 strsql3 = select * from 最終成績 where 姓名=39。輸出部分的代碼如下：strsql6 = select 每項目取的名次 from 參數(shù)表Set rs = (strsql6)strsql = select distinct 項目名稱 from 田賽成績Set rs1 = (strsql)i = 0Do While Not strsql1 = select * from 田賽成績 where 項目名稱=39。 39。 39。 39。 39。 39。 39。 Set rs = (strsql) If = True Then 39。 and 項目名稱=39。代碼如下： strsql = select * from 田賽成績 where 姓名=39。 amp。 amp。 amp。 amp。,39。,39。 amp。該運動員不存在，可以入庫 strsql1 = insert into 運動員名單 values(39。 amp。 amp。這幾個小模塊的代碼在同小異這里只摘入其中一個小模塊的代碼。主界面也就是各種功能的連接點。 Set rs = (strsql) If Not Then 39。 and 密碼=39。登陸界面中涉及到的核心代碼如下：If And Then strsql = select * from 用戶信息 where 用戶名=39。對于交互式系統(tǒng)來說，人機界面設計和數(shù)據設計、體系結構設計及過程設計一樣重要。第五章 界面設計及編碼所謂編碼就是把軟件結果翻譯成用某種程序設計語言書寫的程序。 用戶管理 用戶管理有用戶添加、用戶刪除、用戶密碼修改。 成績匯冊 本模塊也是要對項目循環(huán)查詢，所以是DO_WHILE型循環(huán)結構。 項目得分表 本模塊只需單項查詢，用IF_THEN_ELSE型選擇結構。 代表隊查詢 本模塊的功能內容首先是判斷再操作，所以是IF_THEN_ELSE型選擇結構。 查詢輸出模塊 運動員成績 本模塊只需單項查詢，用IF_THEN_ELSE型選擇結構。