第 1 頁:單選 |
第 5 頁:操作題 |
第 6 頁:參考答案 |
四、綜合應(yīng)用題
【操作步驟】
步驟1:單擊工具欄中的“新建”按鈕,新建一個(gè)表單文件,
通過表單控件工具欄向表單中添加兩個(gè)復(fù)選框、一個(gè)選項(xiàng)組和兩個(gè)命令按鈕,并將“教師表”和“學(xué)院表”添加到表單的數(shù)據(jù)環(huán)境中。
步驟2:設(shè)置表單的Name屬性為my fo I’m,Caption屬性為“教師情況”;設(shè)置兩個(gè)命令按鈕的Caption屬性分別為“生成表”和“退出”;設(shè)置兩個(gè)復(fù)選框的Caption屬性分別為“系名”和“工資”;兩個(gè)單選按鈕的Caption屬性分別為“按職工號(hào)升序”和“按職工號(hào)降序”。
步驟3:雙擊“生成表”按鈕,為“生成表”命令按鈕編寫
Click事件代碼:
********“生成表”按鈕的Click事件代碼********
a=This Form.Check1.Value
b=This Form.Check2.Value
e=This Form.
Optiongroup1.Optionl.Value
d=This Form.Optiongroup1.Option2.Valueif a=1 and b=1 if C=1 select職工號(hào),姓名,系名,工資,課程號(hào)from教師表,學(xué)院表;
where教師表.系號(hào)=學(xué)院表.系號(hào);
order by職工號(hào): into table two.dbfelse
if d=1
select職工號(hào),姓名,系名,工資,課程號(hào)from教師表,學(xué)院表;
where教師表.系號(hào)=學(xué)院表.系號(hào);
order by職工號(hào)desc;
into table two.dbfendif
endifendifif a=1 and b=0
if e=1
select職工號(hào),姓名,系名,課程號(hào)from教師表,學(xué)院表;
where教師表.系號(hào)=學(xué)院表.系號(hào);
order by職工號(hào):
into table one x.dbf
else
if d=1
select職工號(hào),姓名,系名,課程號(hào)from教師表,學(xué)院表;
where教師表.系號(hào)=學(xué)院表.系號(hào);
order by職工號(hào)desc;into table one x.dbfendif
endifendifif a=0 and b=1
if e=1
select職工號(hào),姓名,工資,課程號(hào)from教師表,學(xué)院表;
where教師表.系號(hào)=學(xué)院表.系號(hào);
order by職工號(hào);
into table one xx.dbf
else
if d=1
select職工號(hào),姓名,工資,課程號(hào)from教師表,學(xué)院表;
where教師表.系號(hào)=學(xué)院表.系號(hào);
order by職工號(hào)desc;into table one xx.dbfendif
endifendif *********************
步驟4:保存表單名為my form,按題目要求運(yùn)行表單并執(zhí)行相關(guān)操作。
相關(guān)推薦:
考試吧推薦:2014年3月計(jì)算機(jī)二級(jí)考前沖刺備考專題
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |