綜合應(yīng)用題

　　11設(shè)計(jì)一個(gè)表單名和文件名均為“bd2”的表單，所有控件的屬性必須在表單設(shè)計(jì)器的屬性窗口中設(shè)置。表單的標(biāo)題為“外幣市值情況”。表單中有一個(gè)文本框、一個(gè)表格和兩個(gè)命令按鈕“查詢”和“關(guān)閉”。

　　運(yùn)行表單時(shí)，在文本框text1中輸入貨幣代碼，然后單擊“查詢”，則表格中會(huì)顯示出外匯賬戶相應(yīng)的賬戶信息及持有外幣相當(dāng)于人民幣的價(jià)值數(shù)量。注意，某種外幣相當(dāng)于人民幣數(shù)量的計(jì)算公式：人民幣價(jià)值數(shù)量一該種外幣的“買入價(jià)”*該種外幣的“數(shù)量”。

　　單擊“關(guān)閉”按鈕關(guān)閉表單。

　　參考解析：

　　【考點(diǎn)指引】本大題主要考查表單的設(shè)計(jì)，重點(diǎn)是文本框和表格控件的使用和命令按鈕事件代碼的編寫。

　　【操作步驟】

　�、龠x擇【文件】→【新建】命令，選擇“表單”，單擊“新建文件”按鈕打開表單設(shè)計(jì)器，將Caption屬性值修改為“外幣市值情況”;單擊表單控件工具欄上的“文本框”控件圖標(biāo)，為表單添加l個(gè)文本框Textl，單擊表單控件工具欄上的“命令按鈕”

　　控件圖標(biāo)，為表單添加兩個(gè)命令按鈕Command1和Command2，單擊表單控件工具欄上的“表格”控件圖標(biāo)，再添加一個(gè)表格控件。

　�、诜謩e選擇兩個(gè)命令按鈕，在按鈕屬性窗口中將Command1的Caption屬性值修改為“查詢”、Command2的Caption屬性值修改為“關(guān)閉”，如圖98-1所示。雙擊“關(guān)閉”命令按鈕，在Click事件中輸入代碼：ThisForm Release，用來關(guān)閉表單。

　�、圻x擇表格控件“Grid1”，在表格控件屬性窗口中將“RecordSource”屬性值修改為“""”，將“RecordSourceType”屬性值修改為“1”。

　�、茈p擊“查詢”命令按鈕，在Click事件中輸入代碼：

　　SELECT*，買入價(jià)*數(shù)量AS價(jià)值INTO CURSOR tmp FROM外匯賬戶WHERE貨幣代碼=ThisForm.Textl.Value

　　ThisForm.Grid1.RecordSourceType=1

　　ThisForm.Grid1.RecordSource="tmp"

　　ThisForm.Grid1.Refresh

　　⑤選擇【表單】→【執(zhí)行表單】命令，系統(tǒng)首先要求保存該表單文件，在彈出的“另存為”對(duì)話框中輸入表單文件名“bd2”，保存在考生文件夾下，然后運(yùn)行表單。

　　12在考生文件夾下有“住宿管理”數(shù)據(jù)庫，其中包含表“宿舍”和表“學(xué)生”。這兩個(gè)表之間存在一對(duì)多的關(guān)系。對(duì)該數(shù)據(jù)庫建立表單文件，文件名為“bd2”，標(biāo)題為“住宿管理”，完成如下要求：

　　(1)在表單中包含兩個(gè)表格控件，第一個(gè)用于顯示“宿舍”表中的記錄，第二個(gè)表格用于顯示與“宿舍”表中的當(dāng)前記錄對(duì)應(yīng)的學(xué)生表中的記錄。

　　(2)在表單中包含一個(gè)“關(guān)閉”命令按鈕，單擊該按鈕退出表單。

　　參考解析：

　　【考點(diǎn)指引】本大題考查的是表單的設(shè)計(jì)及表格控件的使用，主要注意表格控件數(shù)據(jù)源的設(shè)置。

　　【操作步驟】

　　①選擇【文件】→【打開】命令，打開數(shù)據(jù)庫“住宿管理”。

　�、谶x擇【文件】→【新建】命令，選擇“表單”，單擊“新建文件”按鈕打開表單設(shè)計(jì)器，在表單屬性窗口中將Caption屬性值修改為“住宿管理”。單擊表單控件工具欄上的“命令按鈕”控件圖標(biāo)，為表單添加一個(gè)命令按鈕Command1，單擊表單控件工具欄上的“表格”控件圖標(biāo)，再添加兩個(gè)表格控件“Grid1”和“Grid2”。

　�、圻x擇命令按鈕，在按鈕屬性窗口中將命令按鈕Command1的Name屬性值修改為“cmdClose”，將Caption屬性值修改為“關(guān)閉”，如圖71-1所示。雙擊“關(guān)閉”命令按鈕，在Click事件中輸入代碼：ThisForm.Release，用來關(guān)閉表單。

　�、茉诒韱卧O(shè)計(jì)器中，鼠標(biāo)右鍵單擊表單空白處，在彈出的快捷菜單中選擇“數(shù)據(jù)環(huán)境”命令，打開表單的數(shù)據(jù)環(huán)境，選擇數(shù)據(jù)庫“住宿管理”，將數(shù)據(jù)表文件“宿舍”和“學(xué)生”添加到數(shù)據(jù)環(huán)境中。

　�、葸x擇表格控件“Grid1”，在表格控件屬性窗口中將“RecordSource”屬性值修改為“宿舍”，將“RecordSourceType”屬性值修改為“0”，將“ReadOnly”屬性值修改為

　　“.T.”;選擇表格控件“Grid2”，在表格控件屬性窗口中將“RecordSource”屬性值修改為“〝〞”，將“RecordSourceType”屬性值修改為“1”。

　�、拊诒韱卧O(shè)計(jì)器中，選擇“Grid1”，在屬性窗口中雙擊“AfterRowColChange Event”，彈出事件過程代碼編輯窗口，輸入以下代碼：

　　SELECT學(xué)生.*INTO CURSOR trap FROM學(xué)生，宿舍WHERE學(xué)生.宿舍編號(hào)=宿舍.宿舍編號(hào)AND宿舍.宿舍編號(hào)=ThisForm.Grid1.columns(1).Text1.value

　　ThisForm.Grid2.RecordSourceType=0

　　ThisForm.Grid2.RecordSource=〝tmp〞

　　ThisForm.Grid2.Refresh

　�、哌x擇【表單】→【執(zhí)行表單】命令，系統(tǒng)首先要求保存該表單文件，在彈出的“另存為”對(duì)話框中輸入表單文件名“bd2”，保存在考生文件夾下，然后運(yùn)行表單。

　　13(1)在考生文件夾下，將“books”表中所有書名中含有“計(jì)算機(jī)”3個(gè)字的圖書復(fù)制到“books_BAK”表中，以下操作均在“books_BAK”表中完成。

　　(2)復(fù)制后的圖書價(jià)格在原價(jià)格的基礎(chǔ)上降低5%。

　　(3)從圖書均價(jià)高于25元(含25)的出版社中，查詢并顯示圖書均價(jià)最低的出版社名稱及均價(jià)，查詢結(jié)果保存在‘new_table4”表中(字段名為出版單位和均價(jià))。

　　參考解析：

　　【考點(diǎn)指引】本大題主要考查的知識(shí)點(diǎn)是：SQL語句的復(fù)制、修改和查詢功能。

　　【操作步驟】

　　在命令窗Vl中依次輸入以下代碼，分別完成題目中各個(gè)要求。

　　(1)SELECT*FROMB00KSBAKWHERE書名LIKE“%計(jì)算機(jī)%”INTOTABLEBOOKS_BAK

　　(2)UPDATEBOOKS_BAKSET價(jià)格=價(jià)格*(1-0.05)

　　(3)SELECTTOPlBOOKS_BAK.出版單位，avg(books_bak.價(jià)格)as均價(jià)FROMbooks_bakGroupByBooks_bak.出版社HAVING均價(jià)>=250RERBY2INTOTABLEnew_table4.dbf。

　　14(1)請(qǐng)編寫名稱為CX的程序并執(zhí)行。該程序?qū)崿F(xiàn)下面的功能：將工資表進(jìn)行備份，備份文件名為“b_工資.dbf”。利用“人事部”向“財(cái)務(wù)部”提供的雇員工資調(diào)整表“c_工資”的“工資”，對(duì)工資表的‘'工資”進(jìn)行調(diào)整(請(qǐng)注意：按“職員編號(hào)”相同進(jìn)行調(diào)整，并且只是部分職員的工資進(jìn)行了調(diào)整，其他職員的工資不動(dòng))。最后將工資表中的記錄存儲(chǔ)到“n_ 工資”表中(表結(jié)構(gòu)與工資表完全相同)。

　　(2)設(shè)計(jì)一個(gè)文件名為“bd2”的表單，其中包含“調(diào)整工資”和“關(guān)閉”兩個(gè)命令按鈕。

　　單擊“調(diào)整工資”命令按鈕時(shí)，調(diào)用CX命令程序?qū)崿F(xiàn)工資調(diào)整。

　　單擊“關(guān)閉”命令按鈕時(shí)，關(guān)閉表單。

　　注意：在兩個(gè)命令按鈕中均只有一條命令，不可以有多余命令。

　　參考解析：

　　【考點(diǎn)指引】本大題第1小題主要考查對(duì)數(shù)據(jù)表的操作，包括表的備份、數(shù)據(jù)的修改;第2小題考查表單的一些基本操作及按缸控件的使用。

　　(1)【操作步驟】

　　在命令窗口中輸入命令：MODI COMM cx(回車執(zhí)行)，打開程序文件編輯窗口，在程序文件編輯窗口中輸入以下程序代碼：

　　SELECT*INTO TABLE b_工資FROM工資

　　USE c_工資

　　Go TOP

　　DO WHILE.NOT.EOF()

　　aa=職員編號(hào)

　　bb=工資

　　UPDATE工資SET工資=bb WHERE職員編號(hào)=aa

　　SELECT C_工資

　　SKIP

　　ENDD0

　　SELECT*INTO TABLE n_工資FROM工資

　　CLOSE ALL

　　關(guān)閉程序文件編輯窗口并保存程序文件。

　　(2)【操作步驟】

　�、龠x擇【文件】→【新建】命令，選擇“表單”，單擊“新建文件”按鈕打開表單設(shè)計(jì)器，單擊表單控件工具欄上的“命令按鈕”控件圖標(biāo)，為表單添加兩個(gè)命令按鈕Command1和Command2。

　�、谠诎粹o屬性窗口中將命令按鈕Command1的Caption屬性值修改為“調(diào)整工資”，將命令按鈕Command2的Caption屬性值修改為“關(guān)閉”。

　　③雙擊“調(diào)整工資”命令按鈕，在Click事件中輸入代碼：DO CX，用來執(zhí)行工資調(diào)整程序。

　�、茈p擊“關(guān)閉”命令按鈕，在Click事件中輸入代碼：ThisForm.Release，用來關(guān)閉表單。

　�、葸x擇【表單】→【執(zhí)行表單】命令，系統(tǒng)首先要求保存該表單文件，在彈出的“另存為”對(duì)話框中輸入表單文件名“bd2”，保存在考生文件夾下，然后運(yùn)行表單。

　　15設(shè)計(jì)一個(gè)名為“mysupply”的表單，表單的控件名和文件名均為“mysupp[y”。表單的形式如圖5—1所示。

　　圖5—1

　　表單標(biāo)題為“零件供應(yīng)情況”，表格控件為Gridl，命令按鈕“查詢”為Commandl、“退出”為Command2，標(biāo)簽控件Labell和文本框控件Textl(程序運(yùn)行時(shí)用于輸入工程號(hào))。

　　運(yùn)行表單時(shí)，在文本框中輸入工程號(hào)，單擊“查詢”命令按鈕后，表格控件中顯示相應(yīng)工程所使用的零件的零件名、顏色和重量(通過設(shè)置有關(guān)“數(shù)據(jù)”屬性實(shí)現(xiàn))，并將結(jié)果按“零件名”升序排序存儲(chǔ)到“PP.dbf”文件中。

　　單擊“退出”按鈕關(guān)閉表單。

　　完成表單設(shè)計(jì)后運(yùn)行表單，并查詢工程號(hào)為“J4”的相應(yīng)信息。

　　參考解析：

　　【考點(diǎn)指引】本大題主要考查的知識(shí)點(diǎn)是：通過表單設(shè)計(jì)器創(chuàng)建表單、表單控件及其屬性的修改和通過SQL語句實(shí)現(xiàn)查詢。

　　【操作步驟】

　　①選擇【文件】→【新建】命令，選擇“表單”，單擊“新建文件”按鈕打開表單設(shè)計(jì)器，在表單屬性窗口中將Caption屬性值修改為“零件供應(yīng)情況”;表單中添加一個(gè)表格控件Grid1、兩個(gè)命令按鈕控件Command1、Command2，一個(gè)標(biāo)簽控件Label1和一個(gè)文本框控件Text1。

　�、谠诒韱螌傩源翱谥袑�Label1、Command1、Command2的Caption屬性值修改為“工程號(hào)”、“查詢”、“退出”。

　�、垭p擊“查詢”命令按鈕，在Click事件中輸入代碼：

　　Select零件.零件名as零件名，零件.顏色as顏色，零件.重量as重量

　　From供應(yīng)，零件

　　Where零件.零件號(hào)=供應(yīng).零件號(hào)and供應(yīng).工程號(hào)=thisform.Text1.value

　　Order By零件名 ’

　　Into dbf PP

　　ThisForm.Grid1.RecordSource=〝PP〞

　　④雙擊“退出”命令按鈕，在Click事件中輸入代碼：thisform.release

　�、葸x擇【表單】→【執(zhí)行表單】命令，系統(tǒng)首先要求保存該表單文件，在彈出的“另存為”對(duì)話框中輸入表單文件名“mysupply”，保存在考生文件夾下，然后運(yùn)行表單。

　　相關(guān)推薦：

　　各地2016年全國(guó)計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間匯總

　　2016年計(jì)算機(jī)等級(jí)考試各級(jí)別報(bào)考適合專業(yè)類別

　　2016計(jì)算機(jī)等級(jí)考試復(fù)習(xí):如何更好地執(zhí)行學(xué)習(xí)計(jì)劃

　　2016年計(jì)算機(jī)二級(jí)《VB》基礎(chǔ)練習(xí)題及答案匯總