2010年全國計算機等級考試二級VB模擬試題(4)

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

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

　　(1)打開程序文件progerr.prg，按文件中給出的功能要求改正其中的錯誤，以文件名為prognew.prg重新保存該文件并運行程序。

　　(2)表單文件名為myform.scx，控件名為myform，表單標(biāo)題為“頂層表單”。

　　(3)為頂層表單建立菜單mymenu。

　　單擊“退出”菜單時，關(guān)閉釋放此頂層菜單，并返回到系統(tǒng)菜單(在過程中完成)。

　　【參考答案】

　　(1)具體步驟如下：

　�、� 打開progerr.prg文件。

　�、� 將程序修改如下：

　　OPEN DATABASE ordersmanage

　　CREATE view viewes AS SELECT職工號,SUM(金額)AS總金額FROM orders;

　　GROUP BY職工號

　　SELECT * FROM viewes WHERE總金額>=30000 ORDER BY總金額DESC;

　　into dbf newtable

　　③ 執(zhí)行“文件”菜單中的“另存為”命令，將程序另存為prognew.prg。

　　(2)具體步驟如下：

　　① 從“文件”菜單中選擇“新建”命令，在彈出的“新建”對話框中選中“菜單”單選按鈕，單擊“新建文件”按鈕。

　�、� 彈出“新建菜單”對話框，單擊“菜單”按鈕，進入“菜單設(shè)計器”窗口。

　�、� 在“菜單設(shè)計器”窗口中輸入三個菜單名稱“文件”、“編輯”、“退出”，并在“退出”菜單項的“結(jié)果”下拉列表中選擇“過程”選項，單擊“創(chuàng)建”按鈕，在彈出的代碼窗口中輸入如下代碼：

　　myform.release

　　set sysmenu to default

　�、� 執(zhí)行“顯示”菜單中的“常規(guī)選項”命令，在彈出的“常規(guī)選項”對話框中選中“頂層表單”復(fù)選框。

　�、� 單擊“保存”按鈕，將菜單保存為mymenu.mnx。

　　⑥ 執(zhí)行“菜單”菜單中的“生成”命令，在彈出的對話框中單擊“生成”按鈕。

　�、� 關(guān)閉“菜單設(shè)計器”窗口。

　�、� 從“文件”菜單中選擇“新建”命令，在彈出的“新建”對話框選中“表單”單選按鈕，單擊“新建文件”按鈕。

　�、� 在打開的“表單設(shè)計器”窗口中更改表單的Caption屬性為“頂層表單”。

　�、� 修改表單的ShowWindow屬性為“2-作為頂層表單”。

　　給表單的Init事件添加如下代碼：

　　do mymenu.mpr with this,”mymenu”

　　將表單保存為myform.scx，并運行表單。