| 第 1 頁：選擇題 |
| 第 5 頁：基本操作題 |
| 第 6 頁：簡單應(yīng)用題 |
| 第 7 頁：綜合應(yīng)用題 |
四、綜合應(yīng)用題
43在考生文件夾下完成下列操作：
(1)建立一個表單名和文件名均為my form的表單,如下圖所示。表單的標(biāo)題為“教師情況”,表單中有兩個命令按鈕(Command1和Command2),兩個復(fù)選框(Check1和Check2)和兩個單選按鈕(Option1和Option2)。Command1和Command2的標(biāo)題分別是“生成表”和“退出”,Check1和Check2的標(biāo)題分別是“系名”和“工資”,Option1和Option2的標(biāo)題分別是“按職工號升序’’和“按職工號降序”。
(2)為“生成表”命令按鈕編寫click事件代碼,其功能根據(jù)單運行時復(fù)選框指定的字段和單選鈕指定的排序方式生成新的自由表。如果兩個復(fù)選框都被選中,生成的自由表命名為two.dbf,two.dbf的字段包括職工號、姓名、系名、工資和課程號;如果只有“系名”復(fù)選框被選中,生成的自由表命名為one_x.dbf,one_x.dbf的字段包括職工號、姓名、系名和課程號;如果只有“工資”復(fù)選框被選中,生成的自由表命名為one_xx.dbf,one_xx.dbf的字段包括職工號、姓名、工資和課程號。
(3)運行表單,并分別執(zhí)行如下操作：
�、龠x中兩個復(fù)選框和“按職工號升序”單選鈕,單擊“生成表,,命令按鈕。
②只選中“系名”復(fù)選框和“按職工號降序”單選鈕,單擊“生成表”命令按鈕。
�、壑贿x中“工資”復(fù)選框和“按職工號降序”單選鈕,單擊“生成表”命令按鈕。
參考解析：
[操作步驟]
步驟1：單擊工具欄中的“新建”按鈕，新建-個表單文件，通過表單控件工具欄向表單中添加兩個復(fù)選框、-個選項組和兩個命令按鈕，并將“教師表”和“學(xué)院表”添加到表單的數(shù)據(jù)環(huán)境中。
步驟2：設(shè)置表單的Name屬性為m#orm，Caption屬性為“教師情況”;設(shè)置兩個命令按鈕的Caption屬性分別為。生成表”和“退出”;設(shè)置兩個復(fù)選框的Caption屬性分別為。系名”和“工資”;兩個單選按鈕的Caption屬性分別為“按職工號升序”和“按職工號降序”。
步驟3：雙擊“生成表”按鈕，為“生成表”命令按鈕編寫
Click"事件代碼。
*****“生成表”按鈕的Click事件代碼*****
a=ThisForm.Checkl.Value
b=ThisForm.Cheek2.Value
C=ThisFafm.Olptiongroupp1.Optionl.Value
d=TlaisForm.0ptiongroup1.option2.Value
if a=l and b=l
if c=l
select職工號。姓名，系名，工資，課程號from教師表，
學(xué)院表;
Where教師表.系號=學(xué)院表.系號;
order by職工號;
into tablevtwo.dbf
else
if d=1
sdect職工號，姓名，系名，工資，課程號from教
師表，學(xué)院表;
where教師表.系號=學(xué)院表.系號;
order by職工號desc;
曲inw nlldC two.dbf
endif
endif
endif
if a=l andb=0
ifc=l
select職工號，姓名，系名，課程號from教師表，掣
院表;
whem教師表.系號=學(xué)院表.系號;
order by職工號;
into table one_x.dbf
else
ifd=l
select職工號，姓名，系名，課程號from教師表，
學(xué)院表;
where教師表.系號=學(xué)院表.系號;
order by職工號desc;
into table one.x.dbf
endif
endif
endif
if a=O and b=1
ife=1
∞leet職工號，姓名，工資，課程號from教師表，掣
院表;
where教師表.系號=學(xué)院表.系號;
order by職工號;
into talde olle_xx.dbf
else
if d=1
select職工號，姓名，工資，課程號from教師表，
學(xué)院表：
where教師表.系號=學(xué)院表.系號;
order by職工號desc;
into table one xx.dbf
endif
endif
cndif
**********************
步驟4：保存表單名為myform，按題目要求運行表單并執(zhí)行相關(guān)操作。
相關(guān)推薦：
| 北京 | 天津 | 上海 | 江蘇 | 山東 |
| 安徽 | 浙江 | 江西 | 福建 | 深圳 |
| 廣東 | 河北 | 湖南 | 廣西 | 河南 |
| 海南 | 湖北 | 四川 | 重慶 | 云南 |
| 貴州 | 西藏 | 新疆 | 陜西 | 山西 |
| 寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
| 黑龍江 | 內(nèi)蒙古 |
