2013年3月計(jì)算機(jī)二級(jí)VB考前沖刺試卷及答案(7)

　　2.簡(jiǎn)單應(yīng)用題

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

　　(1)將order_list1表中的全部記錄追加到order_list表中，然后用SQL SELECT語(yǔ)句完成查詢(xún)：按總金額降序列出所有客戶(hù)的客戶(hù)號(hào)、客戶(hù)名及其訂單號(hào)和總金額，并將結(jié)果存儲(chǔ)到results表中(其中客戶(hù)號(hào)、客戶(hù)名取自customer表，訂單號(hào)、總金額取自order_list表)。

　　(2)打開(kāi)FORM1表單，并按如下要求進(jìn)行修改(注意：最后保存所做的修改)：

　�、� 表單中有5個(gè)隨機(jī)排列的命令按鈕，不要移動(dòng)或改變“基準(zhǔn)按鈕”的位置(否則影響成績(jī))，使其他命令按鈕與“基準(zhǔn)按鈕”左部對(duì)齊;

　�、� 在這組命令按鈕的右邊添加一個(gè)表格控件，并將它的RecordSourceType屬性設(shè)置為“表”，然后設(shè)置另一個(gè)相關(guān)屬性，使在表格控件中顯示customer表的記錄。

　　【參考答案】

　　(1)在“命令”窗口中執(zhí)行以下命令：

　　USE order_list1 　來(lái)源:考試大網(wǎng)

　　COPY TO order_list

　　SELECT customer.客戶(hù)號(hào),客戶(hù)名,訂單號(hào),總金額 FROM customer;

　　INNER JOIN order_list ON customer.客戶(hù)號(hào)=order_list.客戶(hù)號(hào);

　　ORDER BY 總金額 DESC INTO TABLE results

　　(2)具體步驟如下：

　�、� 打開(kāi)表單文件FORM1。

　�、� 選擇“基準(zhǔn)按鈕”，再分別選擇其他4個(gè)按鈕，單擊“布局”工具欄中的“左對(duì)齊”圖標(biāo)按鈕。

　�、� 單擊控件工具欄中的“表格”按鈕，在表單的右邊位置單擊，添加一個(gè)表格，在“屬性”窗口中更改RecordSourceType屬性為“表”，更改RecordSource屬性為customer。

　�、� 保存表單即可。

　　3.綜合應(yīng)用題

　　當(dāng)order_detail表中的單價(jià)修改后，應(yīng)該根據(jù)該表的“單價(jià)”和“數(shù)量”字段修改order_list表的總金額字段，現(xiàn)在編寫(xiě)程序?qū)崿F(xiàn)此功能，具體要求和注意事項(xiàng)如下：

　　(1)根據(jù)order_detail表中的記錄重新計(jì)算order_list表的總金額字段的值。

　　(2)一條order_list記錄可以對(duì)應(yīng)幾條order_detail記錄。

　　(3)在編程前應(yīng)保證在基礎(chǔ)操作中正確地建立了order_list表，在簡(jiǎn)單應(yīng)用中為該表追加了記錄(注意，只能追加一次)。

　　(4)最后將order_list表中的記錄按總金額降序排序存儲(chǔ)到od_new表中(表結(jié)構(gòu)與order_list表完全相同)。

　　(5)將程序保存為prog1.prg文件。

　　【參考答案】

　　實(shí)現(xiàn)此功能的程序如下：

　　set talk off

　　open database 訂貨管理

　　sele 1

　　use order_list

　　do while not eof()

　　ddh=訂單號(hào)

　　sele 2

　　use order_detail

　　locate for 訂單號(hào)=ddh

　　je=0

　　do while not eof()

　　je=je+單價(jià)*數(shù)量

　　cont

　　endd

　　sele 1

　　repl 總金額 with je

　　skip

　　endd