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

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

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

　　打開表單文件sapp，并完成如下操作(不得有多余操作)：

　　(1)將“課程”表添加到表單的數(shù)據(jù)環(huán)境中;

　　(2)使列表框List1中的數(shù)據(jù)項(xiàng)為“課程”表中的課程名稱(課程.課程名);

　　(3)單擊列表框中的數(shù)據(jù)項(xiàng)時，統(tǒng)計(jì)選修了所選課程的學(xué)生人數(shù)(從“考試成績”表)，并將結(jié)果存儲在以課程名命名的表中，表中只有一個字段“人數(shù)”;

　　(4)添加一個命令按鈕Command1，單擊該按鈕時關(guān)閉表單。

　　【參考答案】

　�、� 打開表單文件sapp，單擊鼠標(biāo)右鍵，在彈出的快捷菜單中選擇“數(shù)據(jù)環(huán)境”命令。

　�、� 在打開的“數(shù)據(jù)環(huán)境設(shè)計(jì)器”窗口中單擊鼠標(biāo)右鍵，在彈出的快捷菜單中選擇“添加”命令。

　�、� 系統(tǒng)彈出“打開”對話框，選擇“課程”表，單擊“確定”按鈕。

　�、� 選擇列表框List1，在“屬性”窗口中設(shè)置RowSourceType屬性為“6-字段”，設(shè)置RowSource屬性為“課程.課程名”。

　�、� 為列表框List1的Click事件添加如下代碼：

　　filename=this.value

　　select count(考試成績.學(xué)號)as 人數(shù) from 課程inner join考試成績;

　　on 課程.課程編號=考試成績.課程編號;

　　where 課程.課程名=this.value into dbf &filename

　�、� 在控件工具欄中選擇命令按鈕，在表單中的合適位置單擊，添加一個Command1按鈕，并為其Click事件添加如下代碼：

　　Thisform.release

　�、� 將表單保存，并運(yùn)行表單。