三、綜合應(yīng)用題

　　3[簡(jiǎn)答題]

　　在考生文件夾下創(chuàng)建一個(gè)名為myform的頂層表單，表單的標(biāo)題為“考試”，然后在表單中添加菜單，菜單的名稱為mymenu.mnx，菜單程序的名稱為mymenu.mpr。效果如下圖所示。

　　(1)“計(jì)算”和“退出”菜單命令的功能都通過(guò)執(zhí)行“過(guò)程”完成。

　　(2)“計(jì)算”菜單命令的功能是根據(jù)orderitems表和900ds表中的相關(guān)數(shù)據(jù)計(jì)算各訂單的總金額，其中一個(gè)訂單的總金額等于它所包含的各商品的金額之和，每種商品的金額等于數(shù)量乘以單價(jià)。并將計(jì)算的結(jié)果填入orders表的相應(yīng)字段中。

　　(3)“退出”菜單命令的功能是關(guān)閉并釋放表單。運(yùn)行表單并依次執(zhí)行其中的“計(jì)算”和“退出”菜單命令。

　　參考解析：【解題思路】建立一個(gè)表單，并將其設(shè)置為“頂層表單”;將新建的菜單也設(shè)置為頂層表單，完成菜單的代碼編寫(xiě)。 【操作步驟】

　　步驟1：新建一個(gè)表單，修改表單的Caption為“考試”，ShowWindow屬性為“2-作為頂層表單”。

　　步驟2：雙擊表單空白處，編寫(xiě)表單的Init。

　　DO mymenu.mpr WITH THIS.“myform”

　　步驟3：新建一個(gè)菜單，選擇“顯示”菜單下的“常規(guī)選項(xiàng)”命令，在彈出的“常規(guī)選項(xiàng)”對(duì)話框中勾選“頂層表單”。

　　步驟4：輸入菜單項(xiàng)“計(jì)算”和“退出”，結(jié)果均選擇“過(guò)程”，然后單擊兩個(gè)菜單項(xiàng)后面的“創(chuàng)建”按鈕，分別編寫(xiě)如下代碼。

　　* * * *“計(jì)算”菜單項(xiàng)中的命令代碼* * * *

　　SELECT Orderitems.訂單號(hào)，sum(orderitems.數(shù)量*goods.單價(jià))as總金額;

　　FROM orderitems，goods ;

　　WHERE Orderitems.商品號(hào)=Goods.商品號(hào);

　　GROUP BY Orderitems.訂單號(hào);

　　ORDER BY Orderitems.訂單號(hào);

　　INTO TABLE temp.dbf

　　CLOSE ALL

　　SELE 1

　　USE temp

　　INDEX ON訂單號(hào)TO ddh1

　　SELE 2

　　USE Orders

　　INDEX ON訂單號(hào)TO ddh2

　　SET RELATION T0訂單號(hào)

　　INTO ADO WHILE.NOT.EOF()

　　REPLACE總金額WITH temp.總金額

　　SKIP

　　ENDDO

　　BROW

　　* * * * * * * * * * * * * * * * * * * * * * * * * *

　　* * * *“退出”菜單項(xiàng)中的命令代碼* * * *

　　myfrom.Release

　　* * * * * * * * * * * * * * * * * * * * * * * * * *

　　步驟5：保存菜單名為“mymenu”并生成可執(zhí)行文件。

　　步驟6：保存表單名為“myform”并運(yùn)行。

　　相關(guān)推薦：

　　2017年12月計(jì)算機(jī)等級(jí)考試考前必做題匯總

　　【考試吧整理】計(jì)算機(jī)等級(jí)考試各科目歷年真題

　　2017年12月計(jì)算機(jī)等考成績(jī)查詢?nèi)肟?/FONT>|免費(fèi)查分提醒