【正文】 調(diào)用它的下層模塊以實現(xiàn)程序的完整功能，每個下層模夫再調(diào)用更下層的模塊，從而完成程序的一個子功能，最下層的模塊完成最具體的功能。下面就是每個模塊的結(jié)構(gòu)程序設(shè)計。刪除崗位也是如此。 錄入紀(jì)錄成績 錄入紀(jì)錄成績也如同定義比賽項目，是順序結(jié)構(gòu)。但在輸出方面是循環(huán)結(jié)構(gòu)。 全能成績錄入與輸出 這個模塊在錄入方面也只需添加和修改，所以要用順序結(jié)構(gòu)。 代表隊查詢 本模塊的功能內(nèi)容首先是判斷再操作，所以是IF_THEN_ELSE型選擇結(jié)構(gòu)。 成績匯冊 本模塊也是要對項目循環(huán)查詢，所以是DO_WHILE型循環(huán)結(jié)構(gòu)。第五章 界面設(shè)計及編碼所謂編碼就是把軟件結(jié)果翻譯成用某種程序設(shè)計語言書寫的程序。登陸界面中涉及到的核心代碼如下：If And Then strsql = select * from 用戶信息 where 用戶名=39。 Set rs = (strsql) If Not Then 39。這幾個小模塊的代碼在同小異這里只摘入其中一個小模塊的代碼。 amp。 amp。,39。 amp。 amp。 and 項目名稱=39。 39。 39。 39。輸出部分的代碼如下：strsql6 = select 每項目取的名次 from 參數(shù)表Set rs = (strsql6)strsql = select distinct 項目名稱 from 田賽成績Set rs1 = (strsql)i = 0Do While Not strsql1 = select * from 田賽成績 where 項目名稱=39。 and 項目名稱=39。 (0) amp。 (2) amp。 (0) amp。 amp。.Rows = .Rows 1 End WithEnd IfEnd if上述代碼只是實現(xiàn)選擇的項目是田賽項目的成績輸出，選擇的項目是徑賽項目和全能項目這里就不列出來了。Dim FileName As String Dim FileBack As String Dim Info As String FileName = mypath amp。在本次畢業(yè)設(shè)計中，我從指導(dǎo)老師陳木生老師身上學(xué)到了很多東西，陳老師認(rèn)真負(fù)責(zé)的工作態(tài)度、嚴(yán)謹(jǐn)治學(xué)的精神和深厚的理論水平都使我受益匪淺；同時我還要感謝同學(xué)對我的幫助，指出我的錯誤及不妥之處，進一步完善我的畢業(yè)設(shè)計。3．由于水平和時間有限，本系統(tǒng)還有不足之處，比如在徑賽中如有一組運動員成績特別好也只能取其中幾人不能按絕對成績錄取等。圖(7)就是完成了數(shù)據(jù)庫備份成功后的界面。 Set rs1 = (strsql1) With MSHFlexGrid1 39。部分代碼如下：If = Then MsgBox 請選擇項目名稱!, vbOKOnly, 提示Elsestrsql = select 項目類型 from 運動項目名單 where 項目名稱=39。,39。,39。 Set rs5 = (strsql0) strsql2 = insert into 最終成績(姓名,項目名稱,成績,名次,分?jǐn)?shù)) values(39。 (0) amp。田賽輸出是把每個田賽項目中的前幾名的人員成績信息輸出到最終成績表中，從田賽成績中的開始查找田賽項目，則從田賽成績表中把從項目名單中查找到的項目的前幾名成績信息輸出到最終成績表中。 amp。 amp。 amp。 amp。,39。 and 項目名稱=39。) strsql3 = insert into 運動員參賽情況 values(39。,39。 39。所有的菜單項組成一個學(xué)校田徑運動會管理系統(tǒng)。 amp。界面如圖51所示。 數(shù)據(jù)庫表創(chuàng)建根據(jù)學(xué)校田徑運動會的實際過程，學(xué)校田徑運動會管理系統(tǒng)主要涉及到的數(shù)據(jù)表有用戶信息、運動員名單、運動員參賽情況、運動項目名單、田賽成績、全能成績、徑賽初賽成績、徑賽預(yù)賽成績、徑賽決賽成績、最終成績、崗位表、工作人員表，這些表都是要先建的。 成績名次表查詢 本模塊是要對項目循環(huán)查詢，所以是DO_WHILE型循環(huán)結(jié)構(gòu)。 項目成績本模塊只需單項查詢，用IF_THEN_ELSE型選擇結(jié)構(gòu)。成績錄入部分是田賽項目的成績錄入和修改，這樣就需添加和修改兩個功能。第一個項目第二個項目第三個項目 圖37 查看秩序冊盒圖查看秩序冊就是要查看比賽的各種編排，這樣就需要有查看這個功能。運動員報名時如果運動員名單中沒有此運動員，則把此運動員姓名插入運動員名單中且把該運動員參加的比賽項目插入?yún)①惽闆r表。第一個崗位第二個崗位第三個崗位 圖32 設(shè)置工作崗位盒圖 要設(shè)置工作崗位就要把新的工作加入表中和把不要的崗位從表中刪除，所以這個模塊只需添加和刪除功能。這里就用盒圖來描述各模塊。主要包括個人成績查詢、代表隊成績查詢、團體總分排名查詢、名次查詢等功能。要求有方便的操作界面，主要完成各類報名信息及運動員比賽成績的錄入。界面清晰友好，操作簡便使用戶無需經(jīng)過計算機專門訓(xùn)練就能勝任。根據(jù)前面的設(shè)計思路和系統(tǒng)功能分析．總共設(shè)計了前期編排、比賽管理、查詢輸出、系統(tǒng)工具這幾個模塊。所謂模型，就是為了理解事物而對事物做出的一種抽象，是對事物的一種無歧義的書面描述。 功能需求1．田徑運動會主界面設(shè)置密碼，用戶通過密碼后才能進入系統(tǒng)的水平菜單。傳統(tǒng)的運動會，一般是以人手組織為主，運動員的報名、賽事的安排、比賽場地的安排和成績的記錄等操作全都由人手操作，參加人數(shù)越多，運動會的規(guī)模就越大，管理工作就更加費時費力，而且容易出錯。關(guān)鍵詞: VB 田徑運動會 AccessABSTRACTThe sports meeting administrative system of track and field is a typical information management system. It makes games management simple and convenient for organizer to arrange and manage the games with reason. It makes nopaper work possible, and save a lot of manpower and material resources. This paper use Visual Basic as the development tool and Access 2003 as the background data base first, then introduce the background of development, and the developing and operating of the system through photographs and charts. Design the characteristic fully utilizing VISUAL BASIC and ACCESS database to be apt to use and develop fast to improve programming efficiency and dependability . At the same time, the development of system principle, the system characteristic function and the planning design are introduced. it is developed based on the sufficient analysis and the systemic argumentation of the games management system. It not only can plete the general operation of games management, but also have the characteristics such as programmer reasonable, operating simply, running reliably and excellent secrecy.Keywords: Visual Basic Sports meeting of track and field Access