第76套題

　　一、基本操作題(共4小題，第1和2題是7分、第3和4題是8分)

　　在考生文件夾下完成如下操作：

　　1.打開(kāi)考生文件夾下的數(shù)據(jù)庫(kù)SPORT，首先永久刪除該數(shù)據(jù)庫(kù)中的temp表，然后將"金牌榜"、"獲獎(jiǎng)牌情況"和"國(guó)家"三個(gè)自由表加入該數(shù)據(jù)庫(kù)中。

　　2.使用"調(diào)試器"單步調(diào)試考生文件夾下的程序three.prg，調(diào)試結(jié)束后，將調(diào)試輸出窗口中的內(nèi)容保存到文本文件debug_out.txt中。

　　3.使用SQL語(yǔ)句為表"金牌榜"增加一個(gè)字段"獎(jiǎng)牌總數(shù)"(整數(shù)型)，同時(shí)為該字段設(shè)置有效性規(guī)則：獎(jiǎng)牌總數(shù)>=0。請(qǐng)將該SQL語(yǔ)句存儲(chǔ)在文件one.prg中，否則不得分。

　　4.使用SQL語(yǔ)句更改表"金牌榜"所有記錄的"獎(jiǎng)牌總數(shù)"字段值，該值應(yīng)為"金牌數(shù)"、"銀牌數(shù)"、"銅牌數(shù)"三項(xiàng)之和。請(qǐng)將該SQL語(yǔ)句存儲(chǔ)在文件two.prg中，否則不得分。

　　二、簡(jiǎn)單應(yīng)用(2小題，每題20分，計(jì)40分)

　　在考生文件夾下完成如下簡(jiǎn)單應(yīng)用：

　　1.使用一對(duì)多表單向?qū)�新建一個(gè)表單SPM。要求：使用"國(guó)家"為父表并選擇"國(guó)家名稱"字段作為顯示字段，"獲獎(jiǎng)牌情況"為子表并選擇"項(xiàng)目名稱"和"名次"字段作為顯示字段，使用"國(guó)家代碼"建立表之間的關(guān)系，表單樣式選擇"陰影式"，按鈕類(lèi)型選擇"圖片按鈕"，按"國(guó)家名稱"升序排列，表單標(biāo)題為"奧運(yùn)會(huì)獲獎(jiǎng)情況"。

　　2.在SPORT數(shù)據(jù)庫(kù)中使用視圖設(shè)計(jì)器建立視圖sport_view，該視圖根據(jù)"國(guó)家"和"獲獎(jiǎng)牌情況"兩個(gè)表統(tǒng)計(jì)每個(gè)國(guó)家獲得的金牌數(shù)("名次"為1表示獲得一塊金牌)，視圖中包括"國(guó)家名稱"和"金牌數(shù)"兩個(gè)數(shù)據(jù)項(xiàng)，視圖中的記錄先按"金牌數(shù)"降序排列、再按國(guó)家名稱降序排列。

　　三、綜合應(yīng)用(1小題，計(jì)30分)

　　在考生文件夾下有一個(gè)名為myform的表單，表單中包括一個(gè)列表框和兩個(gè)命令按鈕。

　　請(qǐng)?jiān)谠摫韱沃型瓿扇缦虏僮鳎?/P>

　　1.在表單設(shè)計(jì)器環(huán)境下設(shè)置列表框的數(shù)據(jù)源(RowSource)和數(shù)據(jù)源類(lèi)型(RowSourceType)兩個(gè)屬性，使用SQL語(yǔ)句根據(jù)"國(guó)家"表中"國(guó)家名稱"字段的內(nèi)容在列表框中顯示"國(guó)家名稱"(注意不要使用命令指定這兩個(gè)屬性)。

　　2.為"生成表"命令按鈕編寫(xiě)程序。程序的功能是根據(jù)表單運(yùn)行時(shí)列表框中選定的國(guó)家名稱，將"獲獎(jiǎng)牌情況"表中相應(yīng)國(guó)家的所有記錄存入以該國(guó)家名稱命名的自由表中，自由表中包含"運(yùn)動(dòng)員名稱"，"項(xiàng)目名稱"和"名次"三個(gè)字段，并按照"名次"升序排列。

　　提示：假設(shè)從列表框中選擇的國(guó)家名稱存放在變量gm中，那么在SQL SELECT語(yǔ)句中使用短語(yǔ)into table&gm就可以將選擇的記錄存入以該國(guó)家名命名的自由表中。

　　3.運(yùn)行表單，分別生成存有"中國(guó)"、"日本"、"美國(guó)"、"俄羅斯"4個(gè)國(guó)家獲獎(jiǎng)情況的4個(gè)自由表。

　　三、

　　FOR i=1 TO thisform.List1.columncount

　　IF thisform.List1.selected(i)

　　gm=thisform.List1.selected(i)

　　select 運(yùn)動(dòng)員名稱,項(xiàng)目名稱,名次 from temp order by 名次 into table&gm

　　endif

　　endfor