基于Foxtable的女生課余體育活動查詢系統的構建

鄶淑娥

［摘要］課外體育活動作為學校體育的重要內容，是實現學校體育目的和任務的一條十分重要的、必不可少的途徑，也是學生課余生活的重要內容。近年來，隨著高校招生規模的不斷擴大，學校體育面臨著極大的挑戰，大班級的體育授課模式，勢必影響體育課的練習密度和強度。長此以往，必然導致學生體能的下降。本文通過對我校大一至大三300名女生課余體育活動的參與情況及影響因素進行的抽樣調查，利用Foxtable的統計功能進行了統計分析，并在此基礎上建立了女生課余體育活動查詢系統。

［關鍵詞］ Foxtable； 體育活動； 查詢系統； 構建

doi : 10 . 3969 / j . issn . 1673 - 0194 . 2012 . 18. 040

［中圖分類號］TP315［文獻標識碼］A［文章編號］1673 - 0194（2012）18- 0073- 02

Ｆｏｘｔａｂｌｅ是將Ｅｘｃｅｌ、Ａｃｃｅｓｓ、Ｆｏｘｐｒｏ以及易表的優勢融合在一起，其功能有數據錄入、查詢、統計以及報表生成等。同時Ｆｏｘｔａｂｌｅ又是一個高效的．ｎｅｔ平臺開發工具，專門針對數據管理軟件的開發作了大量的優化，其開發效率十倍于其他專業開發工具。本文分別利用其查詢與統計功能，分別對３００份問卷進行了體育活動頻率分析、參與時間分析、主要目的分析等，并在此基礎上建立了女生課余體育活動查詢系統。

1統計表的建立

單擊“新建”，在打開的“創建項目”對話框中，輸入項目名稱“成績查詢”，選擇“創建表”標簽，分別創建頻率表、時間表、目的表、項目表、形式表等，如圖１-２所示。

2指標分析

以“形式表”為例，將相關指標輸入單元格中，其中“比例”一例設置為“表達式列”，在“數據表”功能區，選擇“列相關”功能組，單擊“表達式”，在彈出的“表達式生成器”中進行相應的設置，如圖３所示。

3窗口設計

在“管理項目”功能區，選擇“窗口管理”，在打開的“窗口管理”對話框中，分別選擇“增加”和“設計”兩個按鈕，進行相關的設置。添加8個“按鈕”控件，如圖４所示。

4代碼設計

4.1ＳＱＬ基本語法介紹

Ｆｏｘｔａｂｌｅ中的ＳＱＬ語句，表名需要用大括號括起來，例如：

ＳＥＬＥＣＴ* ＦＲＯＭ ｛形式｝

ＳＥＬＥＣＴ 字段列表 ＦＲＯＭ ｛表名｝ ＷＨＥＲＥ 條件 ＧＲＯＵＰ ＢＹ 分組字段 ＯＲＤＥＲ ＢＹ 排序字段

其中＂ＷＨＥＲＥ＂、＂ＧＲＯＵＰ ＢＹ＂和＂ＯＲＤＥＲ ＢＹ＂是可選的，這三者的順序是不能調換的。

4.2以“形式”表為例代碼設計

選擇“參與形式”按鈕，在Ｃｌｉｃｋ中添加代碼：

Ｄｉｍ ｔｂｌ Ａｓ ＷｉｎＦｏｒｍ．Ｔａｂｌｅｔｂｌ ＝ ｅ．Ｆｏｒｍ．ＣｒｅａｔｅＳＱＬＱｕｅｒｙ（“Ｔａｂｌｅ１”， “Ｓｅｌｅｃｔ * Ｆｒｏｍ ｛形式｝＂，＂＂）ｔｂｌ．ＳｅｔＢｏｕｎｄｓ（１０， １０， ６００， ４００）ｅ．Ｆｏｒｍ．ＡｄｄＣｏｎｔｒｏｌ（ｔｂｌ）

其含義是，在窗口１中形成一個查詢表，內容是“形式”中的全部字段。如圖５所示。

5其他查詢代碼設計

（1） 如要查詢“時間”表中周末參加的人數，則代碼為：

Ｄｉｍ ｔｂｌ Ａｓ ＷｉｎＦｏｒｍ．Ｔａｂｌｅｔｂｌ ＝ ｅ．Ｆｏｒｍ．ＣｒｅａｔｅＳＱＬＱｕｅｒｙ（“Ｔａｂｌｅ１”， “Ｓｅｌｅｃｔ 人數 Ｆｒｏｍ ｛時間｝ ＷＨＥＲＥ 指標＝周末＂，＂＂）

ｔｂｌ．ＳｅｔＢｏｕｎｄｓ（１０， １０， ６００， ４００）

ｅ．Ｆｏｒｍ．ＡｄｄＣｏｎｔｒｏｌ（ｔｂｌ）

（2） 如要查詢周末與清晨同時參加的人數，則代碼為：

Ｄｉｍ ｔｂｌ Ａｓ ＷｉｎＦｏｒｍ．Ｔａｂｌｅ

ｔｂｌ ＝ ｅ．Ｆｏｒｍ．ＣｒｅａｔｅＳＱＬＱｕｅｒｙ（“Ｔａｂｌｅ１”， “Ｓｅｌｅｃｔ 人數 Ｆｒｏｍ ｛時間｝ ＷＨＥＲＥ 指標＝周末ＡＮＤ指標＝清晨＂，＂＂）

ｔｂｌ．ＳｅｔＢｏｕｎｄｓ（１０， １０， ６００， ４００）

ｅ．Ｆｏｒｍ．ＡｄｄＣｏｎｔｒｏｌ（ｔｂｌ）

（3） 如要將查詢結果按人數排序顯示，則代碼為：

Ｄｉｍ ｔｂｌ Ａｓ ＷｉｎＦｏｒｍ．Ｔａｂｌｅ

ｔｂｌ ＝ ｅ．Ｆｏｒｍ．ＣｒｅａｔｅＳＱＬＱｕｅｒｙ（“Ｔａｂｌｅ１”， “Ｓｅｌｅｃｔ 人數 Ｆｒｏｍ ｛時間｝ ＷＨＥＲＥ 指標＝周末ＡＮＤ指標＝清晨 ＯＲＤＥＲ ＢＹ 人數＂，＂＂）

ｔｂｌ．ＳｅｔＢｏｕｎｄｓ（１０， １０， ６００， ４００）

ｅ．Ｆｏｒｍ．ＡｄｄＣｏｎｔｒｏｌ（ｔｂｌ）

（4） 如要查詢總人數或平均人數，則代碼為：

Ｄｉｍ ｔｂｌ Ａｓ ＷｉｎＦｏｒｍ．Ｔａｂｌｅ

ｔｂｌ ＝ ｅ．Ｆｏｒｍ．ＣｒｅａｔｅＳＱＬＱｕｅｒｙ（“Ｔａｂｌｅ１”， “ＳｅｌｅｃｔＳＵＭ（人數） ＡＳ 總計， ＡＶＧ（人數） ＡＳ 平均Ｆｒｏｍ ｛時間｝ ＂，＂＂）

ｔｂｌ．ＳｅｔＢｏｕｎｄｓ（１０， １０， ６００， ４００）

ｅ．Ｆｏｒｍ．ＡｄｄＣｏｎｔｒｏｌ（ｔｂｌ）

（5） 如要在“項目”表中查詢參加人數最多的前３個項目，則代碼為：

Ｄｉｍ ｔｂｌ Ａｓ ＷｉｎＦｏｒｍ．Ｔａｂｌｅ

ｔｂｌ ＝ ｅ．Ｆｏｒｍ．ＣｒｅａｔｅＳＱＬＱｕｅｒｙ（“Ｔａｂｌｅ１”， “ＳＥＬＥＣＴ ＴＯＰ ３ * ＦＲＯＭ ｛項目｝ ＯＲＤＥＲ ＢＹ 人數 ＤＥＳＣ＂，＂＂）

ｔｂｌ．ＳｅｔＢｏｕｎｄｓ（１０， １０， ６００， ４００）

ｅ．Ｆｏｒｍ．ＡｄｄＣｏｎｔｒｏｌ（ｔｂｌ）

（6）如要在“項目”表中查詢參加籃球或參加足球的人數，則代碼為：

Ｄｉｍ ｔｂｌ Ａｓ ＷｉｎＦｏｒｍ．Ｔａｂｌｅ

ｔｂｌ ＝ ｅ．Ｆｏｒｍ．ＣｒｅａｔｅＳＱＬＱｕｅｒｙ（“Ｔａｂｌｅ１”， “ＳＥＬＥＣＴ * ＦＲＯＭ ｛項目｝ ＷＨＥＲＥ 指標 ＩＮ （籃球，足球）

＂，＂＂）

ｔｂｌ．ＳｅｔＢｏｕｎｄｓ（１０， １０， ６００， ４００）

ｅ．Ｆｏｒｍ．ＡｄｄＣｏｎｔｒｏｌ（ｔｂｌ）

6查詢結果輸出

除了在窗口中動態形成一個邏輯查詢表外，Ｆｏｘｔａｂｌｅ還提供了可以將查詢結果以數據表的形式輸出的功能。如前述查詢“時間”表中周末參加的人數，其代碼為：

Ｄｉｍ ｑ Ａｓ ｎｅｗ ＱｕｅｒｙＢｕｉｌｄｅｒ

ｑ．ＴａｂｌｅＮａｍｅ ＝ ＂時間表１＂

ｑ．ＳｅｌｅｃｔＳｔｒｉｎｇ ＝ ＂ Ｓｅｌｅｃｔ 人數 Ｆｒｏｍ ｛時間｝ ＷＨＥＲＥ 指標＝周末＂

ｑ．Ｂｕｉｌｄ

ＭａｉｎＴａｂｌｅ ＝ Ｔａｂｌｅｓ（＂時間表１＂）

其含義是形成一個數據表“時間表１”，并將主表設置為“時間表１”。

這樣形成了一個物理的數據表后，就可將該表保存或輸出為Ｅxcel電子表或Ａccess數據庫表。

其操作步驟如下：

在“雜項”功能區，選擇“高速導出”，在彈出的“另存為”對話框中，在“保存類型”中選擇“Ｅxcel文件”則保存為工作簿的形式，如圖６所示。

如要保存為數據庫文件，在“保存類型”中選擇“Ａccess文件”即可。

另外在“雜項”功能區中還有一個“高速導入”的功能，可以將Ｅxcel電子表或Ａccess數據庫表導入為Ｆoxtable的數據表。其操作步驟如下：

在“雜項”功能區，選擇“高速導入”，在彈出的“打開”對話框中，在“文件類型”中選擇“Ｅxcel文件”即可。

主要參考文獻

［１］ 周薔. 對影響高校女生參加課外體育鍛煉因素的研究［Ｊ］． 體育成人教育學刊，２００４（１）：８１－８２．

［２］ 潘勤，左暉. 高校女生體育課的現狀與發展對策［Ｊ］． 宜春學院學報，２００４（２）：１１０－１１２．