三、綜合應(yīng)用(1小題,計(jì)30分)
設(shè)計(jì)一個(gè)文件名和表單名均為myaccount的表單。表單的標(biāo)題為"外匯持有情況"。表單中有一個(gè)選項(xiàng)按鈕組控件(myOption)、一個(gè)表格控件(Grid1)以及兩個(gè)命令按鈕"查詢"(Command1)和"退出"(Command2)。其中,選項(xiàng)按鈕組控件有兩個(gè)按鈕"現(xiàn)匯"(Option1)、"現(xiàn)鈔"(Option2)。
運(yùn)行表單時(shí),首先在選項(xiàng)組控件中選擇"現(xiàn)鈔"或"現(xiàn)匯",單擊"查詢"命令按鈕后,根據(jù)選項(xiàng)組控件的選擇將"外匯賬戶"表的"現(xiàn)鈔"或"現(xiàn)匯"(根據(jù)鈔匯標(biāo)志字段確定)的情況顯示在表格控件中。
單擊"退出"按鈕,關(guān)閉并釋放表單。
注:在表單設(shè)計(jì)器中將表格控件Grid1的數(shù)據(jù)源類型設(shè)置為"SQL說明"。
解答:
新建表單,保存,表單文件名為“myaccount”,表單的name屬性也為“myaccount”,表單的Caption屬性改為“外匯持有情況”,在表單上添加選項(xiàng)按鈕組Optiongroup1,將其name屬性改為“myOption”,用鼠標(biāo)右鍵單擊myOption,在快捷菜單中選擇“生成器”,在生成器窗口中設(shè)置兩個(gè)按鈕,標(biāo)準(zhǔn)設(shè)置為"現(xiàn)匯"(Option1)、"現(xiàn)鈔"(Option2)。添加表格控件,將其Recordsourcetype屬性設(shè)為4;添加兩個(gè)命令按鈕,分別設(shè)置其Caption,如下圖:
為“查詢”按鈕設(shè)置Click事件代碼為:
if thisform.myoption.value=1
thisform.grid1.recordsource="sele * from 外匯賬戶 where 鈔匯標(biāo)志='現(xiàn)匯' into curs t1"
else
thisform.grid1.recordsource="sele * from 外匯賬戶 where 鈔匯標(biāo)志='現(xiàn)鈔' into curs t2"
endif
為“退出”按鈕設(shè)置Click事件代碼為:
thisform.release
附:本題相關(guān)表
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |