【正文】
The Man took the news with an impassiv。re interested. Anyway, for what it39。Year One was about seven years after your presutmed date of birt hi. I don39。s using the ( iregorian calendar,39。 I lu I rowtted. 39。re looking for is about five thousand miles and two thousa nd years away. loday is Sat urday, April t went v39。 I heard myself say. 39。ye just been overworking 39。t crack up. This convc39。 I Ic looked at me blankly. .1 low fir is that from Jerusalem?39。 I added heLpfully. 39。 He glanced briefly towards the trees. 39。 39。aid. I39。re in a place calLed Sleepy Hollow in upstate New York,39。s not unreasonable to assume that he knows where he is. 39。 That threw me too. I mean, you ~n39。re all in this together, whether we like it or not. The Man took in the view from the porch then turned back to me. 39。s a question I still ask myself. Why pick on me? But on the other hand, when you think about it, why not? After all, the first time around, The Man just hauled a bunch of fishermen off the end oithe pier at Capernaum. I39。 that did it. It meant that I was involved. That he not only knew my name but also had my number. And I remember cursing my luck and thinking if only it hadn39。 I felt the bottom drop out ofmy stomach. It was the 39。I39。i eyes. There was something unnerving about the way he would look at you. It reminded me of a falcon. The way they fix on you as they sit on their handler39。 What a quest ion. 13 iii at t lie t i me, I had no idea where it was going to lea d me. 39。 I finaLly matiaged to loosen my larynx. 39。 he said. 39。Th 39。 an answer is that?39。Wherever he went to when he disappeared from the mue,39。Instead of where?39。今后的工作中,我將充分運(yùn)用自己所學(xué)的計(jì)算機(jī)知識,并在工作中不斷學(xué)習(xí)和完善,充分發(fā)揮一名計(jì)算機(jī)專業(yè)人員的作用,為企業(yè)的騰飛和發(fā)展貢獻(xiàn)自己的力量。在本次畢業(yè)設(shè)計(jì)中,我從指導(dǎo)老師陳木生 老師身上學(xué)到了很多東西,陳老師認(rèn)真負(fù)責(zé)的工作態(tài)度、嚴(yán)謹(jǐn)治學(xué)的精神和深厚的理論水平都使我受益匪淺 ; 同時(shí)我還要感謝同學(xué)對我的幫助,指出我的錯誤及不妥之處,進(jìn)一步完善我的畢業(yè)設(shè)計(jì)。 3.由于水平和時(shí)間有限,本系統(tǒng)還有不足之處,比如在徑賽中如有一組運(yùn)動員成績特別好也只能取其中幾人不能按絕對成績錄取等。不需要 反復(fù)核對,重復(fù)勞動。 backup/ Info = 正在備份數(shù)據(jù)庫 amp。 Dim FileName As String Dim FileBack As String Dim Info As String FileName = mypath amp。圖 (7)就是完成了數(shù)據(jù)庫備份成功后的界面。而數(shù)據(jù)表的瀏覽是讓人清楚數(shù)據(jù)庫中有哪些表及表的屬性,讓人更清楚明白數(shù)據(jù) 庫表的結(jié)構(gòu)。 系統(tǒng)工具 系統(tǒng)工具是為本系統(tǒng)服務(wù)的工具,方便本系統(tǒng)的使用。.Rows = .Rows 1 End With End If End if 上述代碼只是實(shí)現(xiàn)選擇的項(xiàng)目是田賽項(xiàng)目的成績輸出,選擇的 項(xiàng)目是徑賽項(xiàng)目和全能項(xiàng)目這里就不列出來了。 Set rs1 = (strsql1) With MSHFlexGrid1 39。 amp。 Set rs = (strsql If (0) = 田賽項(xiàng)目 Then strsql1 = select * from 田賽成績 where 項(xiàng)目名稱 =39。 amp。部分代碼如下: If = Then MsgBox 請選擇項(xiàng)目名稱 !, vbOKOnly, 提示 Else strsql = select 項(xiàng)目類型 from 運(yùn)動項(xiàng)目名單 where 項(xiàng)目名稱 =39。項(xiàng)目成績查詢界面如圖 55所示。) (strsql2) End If Next i = i + 1 Loop 查詢輸出 查詢輸出模塊中有七種不同的查詢:運(yùn)動員成績查詢、代表隊(duì)成績查詢、項(xiàng)目成績查詢、總分表、項(xiàng)目名次表、成績名次表和成績匯冊。 (0) amp。,39。 j + 1 amp。,39。 (2) amp。,39。 (1) amp。,39。 (0) amp。 Set rs5 = (strsql0) strsql2 = insert into 最終成績 (姓名 ,項(xiàng)目名稱 ,成績 ,名次 ,分?jǐn)?shù) ) values(39。 Set rs = (strsql3) If Then strsql0 = select 分?jǐn)?shù) from 名次分?jǐn)?shù)表 where 名次 = amp。 (1) amp。 and 項(xiàng)目名稱 =39。 (0) amp。order by 成績 desc Set rs2 = (strsql1) For j = 0 To Val((0)) 1 strsql3 = select * from 最終成績 where 姓名 =39。 (0) amp。輸出部分的代碼如下: strsql6 = select 每項(xiàng)目取的名次 from 參數(shù)表 Set rs = (strsql6) strsql = select distinct 項(xiàng)目名稱 from 田賽成績 Set rs1 = (strsql) i = 0 Do While Not strsql1 = select * from 田賽成績 where 項(xiàng)目名稱 =39。田賽輸出是把每個田賽項(xiàng)目中的前幾名的人員成績信息輸出到最終成績表中,從田賽成績中的開始查找田賽項(xiàng)目,則從田賽成績表中把從項(xiàng)目名單中查找到的項(xiàng)目的前幾名成績信息輸出到最終成績表中。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 Set rs = (strsql) If = True Then 39。 amp。 and 項(xiàng)目名稱 =39。 amp。代碼如下: strsql = select * from 田賽成績 where 姓名 =39。) (strsql4) End If End if 比賽管理 比賽管理模塊中有三個小模塊分為:徑賽成績錄入與輸出、田賽成績錄入與輸出和全能成績錄入與輸出。 amp。,39。 amp。 Set rs = (strsql2) If = True Then strsql4 = insert into 運(yùn)動員參賽情況 values(39。 amp。 and 項(xiàng)目名稱 =39。 amp。) (strsql1) (strsql3) MsgBox 報(bào)名成功! , vbOKOnly, 提示 Else strsql2 = select * from 運(yùn)動員參賽情況 where 姓名 =39。,39。) strsql3 = insert into 運(yùn)動員參賽情況 values(39。,39。,39。 amp。,39。該運(yùn)動員不存在,可以入庫 strsql1 = insert into 運(yùn)動員名單 values(39。 39。 amp。 39。 amp。如果此人存在于運(yùn)動員名單中且該項(xiàng)目沒有被此人選擇則把此人參加該項(xiàng)目的信息插入到參賽情況表中,否則提示此人已經(jīng)參加了此項(xiàng)目。這幾個小模塊的代碼在同小異這里只摘入其中一個小模塊的代碼。所有的菜單項(xiàng)組成一個學(xué)校田徑運(yùn)動會管理系統(tǒng)。主界面也就是各種功能的連接點(diǎn)。 主界面是進(jìn)行比賽進(jìn)程的各個功能的總控制。 Set rs = (strsql) If Not Then 39。 amp。 and 密碼 =39。 amp。登陸界面中涉及到的核心代碼如下: If And Then strsql = select * from 用戶信息 where 用戶名 =39。界面如圖 51 所示。對于交互式系統(tǒng)來說,人機(jī)界面設(shè)計(jì)和數(shù)據(jù)設(shè)計(jì)、體系結(jié)構(gòu)設(shè)計(jì)及過程設(shè)計(jì)一樣重要。但是,所選用的程序設(shè)計(jì)語言的特點(diǎn)及編碼風(fēng)格也將對程序的可靠性、可讀性、可測性和可維護(hù)性產(chǎn)生深遠(yuǎn)的影響。 第五章 界面設(shè)計(jì)及編碼 所謂編碼就是把軟件結(jié)果翻譯成用某種程序設(shè)計(jì)語言書寫的程序。 數(shù)據(jù)庫表創(chuàng)建 根據(jù) 學(xué)校田徑運(yùn)動會的實(shí)際過程,學(xué)校田徑運(yùn)動會管理系統(tǒng)主要涉及到的數(shù)據(jù)表有用戶信息、運(yùn)動員名單、運(yùn)動員參賽情況、運(yùn)動項(xiàng)目名單、田賽成績、全能成績、徑賽初賽成績、徑賽預(yù)賽成績、徑賽決賽成績、最終成績、崗位表、工作人員表,這些表都是要先建的。 用戶管理 用戶管理有用戶添加、用戶刪除、用戶密碼修改。 系統(tǒng)工具 運(yùn)動會數(shù)據(jù)備份和恢復(fù) 運(yùn)動會數(shù)據(jù)備份是把運(yùn)動會的數(shù)據(jù)庫備份到別的地方,運(yùn)動會數(shù)據(jù)恢復(fù)是把備份的數(shù)據(jù)庫還原到原來的地方。 成績匯冊 本模塊也是要對項(xiàng)目循環(huán)查詢,所以是 DO_WHILE型循環(huán)結(jié)構(gòu)。 成績名次表查詢 循環(huán)條件 DO_WHILE 部分 統(tǒng)計(jì)該代表隊(duì)的總得分 T 項(xiàng)目 F 查詢參加此 項(xiàng)目的所有 人在此項(xiàng)目 中的成績 本模塊是要對項(xiàng)目循環(huán)查詢,所以是 DO_WHILE型循環(huán)結(jié)構(gòu)。 項(xiàng)目得分表 本模塊只需單項(xiàng)查詢,用 IF_THEN_ELSE型選擇結(jié)構(gòu)。 總分表 本模塊是要對項(xiàng)目中的每個項(xiàng)目進(jìn)行統(tǒng)計(jì),所以是 DO_WHILE 型循環(huán)結(jié)構(gòu)。 代表隊(duì)查詢 本模塊的功能內(nèi)容首先是判斷再操作,所以是 IF_THEN_ELSE型選擇結(jié)構(gòu)。 項(xiàng)目成績 本模塊只需單項(xiàng)查詢,用 IF_THEN_ELSE型選擇結(jié)構(gòu)。 查詢輸出模塊 運(yùn)動員成績 F 成績存在 T 成績錄入 修改成績 循環(huán)條件 DO_WHILE 部分 (輸出 ) F 成績存在 T 成績錄入 修改成績 循環(huán)條件 DO_WHILE 部分 (輸出 ) 本模塊只需單項(xiàng)查詢,用 IF_THEN_ELSE型選擇結(jié)構(gòu)。 圖 312成績錄入部分盒圖 圖 313 輸出部分盒圖 全能成績錄入與輸出這個模塊和上面兩個模塊 一樣與分為兩部分。 全能成績錄入與輸出 這個模塊在錄入方面也只需添加和修改,所以要用順序結(jié)構(gòu)。成績錄入部分是田賽項(xiàng)目的成績錄入和修改,這樣就需添加和修改兩個功能。在輸出方面也是循環(huán)結(jié)構(gòu)。而輸出部分也分為初賽、預(yù)賽和決賽三部分,每個部分都需輸出這個功能。但在輸出方面是循環(huán)結(jié)構(gòu)