第三十六套
一、基本操作題（共4小題，第1和2題是7分、第3和4題是8分）
在考生文件夾下完成如下操作:
1. 用SQL語(yǔ)句從rate_exchange.dbf表中提取外幣名稱(chēng)、現(xiàn)鈔買(mǎi)入價(jià)和賣(mài)出價(jià)三個(gè)
字段的值并將結(jié)果存入rate_ex.dbf表（字段順序?yàn)橥鈳琶Q(chēng)、現(xiàn)鈔買(mǎi)入價(jià)、
賣(mài)出價(jià)，字段類(lèi)型和寬度與原表相同,記錄順序與原表相同）,并將相應(yīng)的SQL
語(yǔ)句保存為文本文件one.txt。
2. 用SQL語(yǔ)句將rate_exchange.dbf表中外幣名稱(chēng)為"美元"的賣(mài)出價(jià)修改為829.01,
并將相應(yīng)的SQL語(yǔ)句保存為文本文件two.txt。
3. 利用報(bào)表向?qū)Ц鶕?jù)rate_exchange.dbf表生成一個(gè)外幣匯率報(bào)表，報(bào)表按順序
包含外幣名稱(chēng)、現(xiàn)鈔買(mǎi)入價(jià)和賣(mài)出價(jià)三列數(shù)據(jù)，報(bào)表的標(biāo)題為"外幣匯率"（其
他使用默認(rèn)設(shè)置），生成的報(bào)表文件保存為rate_exchange。
4. 打開(kāi)生成的報(bào)表文件rate_exchange進(jìn)行修改，使顯示在標(biāo)題區(qū)域的日期改在
每頁(yè)的注腳區(qū)顯示。
本題主要考核點(diǎn)：
SQL查詢(xún)語(yǔ)句，查詢(xún)?nèi)ハ颍y(tǒng)計(jì)，利用報(bào)表向?qū)Ы?bào)表等
本題解題思路：
第1題：select 外幣名稱(chēng),現(xiàn)鈔買(mǎi)入價(jià),賣(mài)出價(jià) from rate_exchange into table rate_ex。
第2題：update rate_exchange set 賣(mài)出價(jià)=829.01 where 外幣名稱(chēng)="美元"。
第3題：本題的主要考核點(diǎn)是使用報(bào)表向?qū)е谱鲌?bào)表。
啟動(dòng)報(bào)表向?qū)Э稍?文件"菜單中選擇"新建"或者單擊工具欄上的"新建"按鈕，打開(kāi)"新建"對(duì)話框，文件類(lèi)型選擇報(bào)表，單擊向?qū)О粹o?；蛘咴?工具"菜單中選擇"向?qū)?子菜單，選擇"報(bào)表"，或直接單擊工具欄上的"報(bào)表向?qū)?圖標(biāo)按鈕。
第4題：雙擊生成的報(bào)表文件rate_exchange，在報(bào)表設(shè)計(jì)器中，將顯示在"標(biāo)題" 區(qū)域的日期拖到"頁(yè)注腳"區(qū)，保存報(bào)表文件即可。
二、簡(jiǎn)單應(yīng)用（2小題，每題20分，計(jì)40分）
1. 設(shè)計(jì)一個(gè)如下圖所示的時(shí)鐘應(yīng)用程序，具體描述如下：
表單名和表單文件名均為timer，表單標(biāo)題為"時(shí)鐘"，表單運(yùn)行時(shí)自動(dòng)顯示
系統(tǒng)的當(dāng)前時(shí)間；
1) 顯示時(shí)間的為標(biāo)簽控件label1（要求在表單中居中，標(biāo)簽文本對(duì)齊方式
為居中）；
2) 單擊"暫停"命令按鈕（Command1）時(shí)，時(shí)鐘停止；
3) 單擊"繼續(xù)"命令按鈕（Command2）時(shí)，時(shí)鐘繼續(xù)顯示系統(tǒng)的當(dāng)前時(shí)間；
4) 單擊"退出"命令按鈕（Command3）時(shí)，關(guān)閉表單。
提示：使用計(jì)時(shí)器控件，將該控件的interval屬性設(shè)置為500，即每500
毫秒觸發(fā)一次計(jì)時(shí)器控件的timer事件（顯示一次系統(tǒng)時(shí)間）；將計(jì)時(shí)器控件
的interval屬性設(shè)置為0將停止觸發(fā)timer事件；在設(shè)計(jì)表單時(shí)將timer控件的
interval屬性設(shè)置為500。
2. 使用查詢(xún)?cè)O(shè)計(jì)器設(shè)計(jì)一個(gè)查詢(xún)，要求如下：
1) 基于自由表currency_sl.DBF和rate_exchange.DBF；
2) 按順序含有字段"姓名"、"外幣名稱(chēng)"、"持有數(shù)量"、"現(xiàn)鈔買(mǎi)入價(jià)"及表
達(dá)式"現(xiàn)鈔買(mǎi)入價(jià)*持有數(shù)量"；
3) 先按"姓名"升序排序、再按"持有數(shù)量"降序排序；
4) 查詢(xún)?nèi)ハ驗(yàn)楸韗esults.dbf；
5) 完成設(shè)計(jì)后將查詢(xún)保存為query文件，并運(yùn)行該查詢(xún)。
本題主要考核點(diǎn)：
簡(jiǎn)單應(yīng)用程序的建立，使用查詢(xún)?cè)O(shè)計(jì)器設(shè)計(jì)查詢(xún)等
本題解題思路：
第1題：本題的主要考核點(diǎn)是簡(jiǎn)單應(yīng)用程序的建立。
可以用三種方法建立表單：調(diào)用表單設(shè)計(jì)器；在項(xiàng)目管理器環(huán)境下調(diào)用；單擊"文件"菜單中的"新建"，打開(kāi)"新建"對(duì)話框，選擇"表單"；在命令窗口輸入"CREATE FORM 時(shí)鐘"命令。
打開(kāi)表單設(shè)計(jì)器后，在表單控件工具欄上單擊"命令按鈕"，在表單上放置三個(gè)按鈕控件，分別修改其Caption屬性為" 暫停"，"繼續(xù)"，"退出"；單擊"標(biāo)簽控件"，在表單中央放置一個(gè)標(biāo)簽控件，修改其Alignment屬性為"2-中央"；單擊"計(jì)時(shí)器控件"，在表單上放置一個(gè)計(jì)時(shí)器控件，修改其interval屬性為500。
相關(guān)代碼如下：
command1(暫停)按鈕的click事件為thisform.timer1.interval=0
command2(繼續(xù))按鈕的click事件為thisform.timer1.interval=500
command3(退出)按鈕的click事件為thisform.release
timer1的timer事件為thisform.label1.caption=time()
第2題：本題的主要考核點(diǎn)是運(yùn)用查詢(xún)?cè)O(shè)計(jì)器建立查詢(xún)。
建立查詢(xún)可以使用"文件"菜單完成，選擇文件--新建--查詢(xún)--新建文件，將"currency_sl"表和 "rate_exchange"表添加入查詢(xún)中，從字段選項(xiàng)卡中依次選擇"姓名"、"外幣名稱(chēng)"、"持有數(shù)量"、"現(xiàn)鈔買(mǎi)入價(jià)"及表達(dá)式"現(xiàn)鈔買(mǎi)入價(jià)*持有數(shù)量"；切換到"排序依據(jù)"選項(xiàng)卡并在其中選擇字段"姓名"，用相同方法設(shè)置按"持有數(shù)量"降序排序；單擊查詢(xún)菜單下的"查詢(xún)?nèi)ハ?，在"選擇表"對(duì)話框中輸入表名results，最后運(yùn)行該查詢(xún)。
三、綜合應(yīng)用（1小題，計(jì)30分）
設(shè)計(jì)一個(gè)滿足如下要求的應(yīng)用程序，所有控件的屬性必須在表單設(shè)計(jì)器的屬
性窗口中設(shè)置：
1. 建立一個(gè)表單，表單文件名和表單名均為form1，表單標(biāo)題為"外匯"；
2. 表單中含有一個(gè)頁(yè)框控件（PageFrame1）和一個(gè)"退出"命令按鈕
（Command1）；
3. 頁(yè)框控件（PageFrame1）中含有三個(gè)頁(yè)面，每個(gè)頁(yè)面都通過(guò)一個(gè)表格控
件顯示有關(guān)信息：
1) 第一個(gè)頁(yè)面Page1上的標(biāo)題為"持有人"，其上的表格控件名為
grdCurrency_sl，記錄源的類(lèi)型（RecordSourceType）為"表"，顯示自由表
currency_sl中的內(nèi)容；
2) 第二個(gè)頁(yè)面Page2上的標(biāo)題為"外匯匯率"，其上的表格控件名為
grdRate_exchange，記錄源的類(lèi)型（RecordSourceType）為"表"，顯示自由
表rate_exchange中的內(nèi)容；
3) 第三個(gè)頁(yè)面Page3上的標(biāo)題為"持有量及價(jià)值"，其上的表格控件名為
Grid1，記錄源的類(lèi)型（RecordSourceType）為"查詢(xún)"，記錄源（RecordSource）
為"簡(jiǎn)單應(yīng)用"題目中建立的查詢(xún)文件query。
4. 單擊"退出"命令按鈕（Command1）關(guān)閉表單。
本題主要考核點(diǎn)：
控件的屬性的修改（頁(yè)框，表格）、表單的退出等知識(shí)點(diǎn)
本題解題思路：
第一步：在Visual FoxPro主窗口中按下組合鍵Ctrl+N，系統(tǒng)彈出"新建"對(duì)話框，在文件類(lèi)型中選擇"表單"，點(diǎn)擊"新建文件"按鈕，系統(tǒng)將打開(kāi)表單設(shè)計(jì)器；或直接在命令窗口中輸入：crea form form1。
第二步：點(diǎn)擊工具欄按鈕"表單控件工具欄"，在彈出的"表單控件"對(duì)話框中，選中"頁(yè)框"控件，在表單設(shè)計(jì)器中拖動(dòng)鼠標(biāo)，這樣在表單上得到一個(gè)"頁(yè)框"控件PageFrame1，用類(lèi)似的方法為表單再加入三個(gè)"表格"控件(右擊頁(yè)框，點(diǎn)擊編輯按鈕)，1個(gè)"命令按鈕"控件command1；
相關(guān)控件的屬性值如下表所示：
對(duì)象 屬性 屬性值
Form1 Caption 外匯
PageFrame1 pagecount 3
PageFrame1.page1 Caption 持有人
PageFrame1.page2 Caption 外匯匯率
PageFrame1.page3 Caption 持有量及價(jià)值
PageFrame1.page1.grid1 Name grdCurrency_sl
PageFrame1.page2.grid1 Name grdRate_exchange
PageFrame1.page1.grdCurrency_sl RecordSourceType 0-表
PageFrame1.page1.grdCurrency_sl RecordSource currency_sl
PageFrame1.page2.grdRate_exchange RecordSourceType 0-表
PageFrame1.page2.grdRate_exchange RecordSource rate_exchange
PageFrame1.page3.grid1 RecordSourceType 3-查詢(xún)
PageFrame1.page3.grid1 RecordSource query
Command1 Caption 退出
******命令按鈕command1(退出)的Click事件代碼如下******
thisform.release
一、基本操作題（共4小題，第1和2題是7分、第3和4題是8分）
在考生文件夾下完成如下操作:
1. 用SQL語(yǔ)句從rate_exchange.dbf表中提取外幣名稱(chēng)、現(xiàn)鈔買(mǎi)入價(jià)和賣(mài)出價(jià)三個(gè)
字段的值并將結(jié)果存入rate_ex.dbf表（字段順序?yàn)橥鈳琶Q(chēng)、現(xiàn)鈔買(mǎi)入價(jià)、
賣(mài)出價(jià)，字段類(lèi)型和寬度與原表相同,記錄順序與原表相同）,并將相應(yīng)的SQL
語(yǔ)句保存為文本文件one.txt。
2. 用SQL語(yǔ)句將rate_exchange.dbf表中外幣名稱(chēng)為"美元"的賣(mài)出價(jià)修改為829.01,
并將相應(yīng)的SQL語(yǔ)句保存為文本文件two.txt。
3. 利用報(bào)表向?qū)Ц鶕?jù)rate_exchange.dbf表生成一個(gè)外幣匯率報(bào)表，報(bào)表按順序
包含外幣名稱(chēng)、現(xiàn)鈔買(mǎi)入價(jià)和賣(mài)出價(jià)三列數(shù)據(jù)，報(bào)表的標(biāo)題為"外幣匯率"（其
他使用默認(rèn)設(shè)置），生成的報(bào)表文件保存為rate_exchange。
4. 打開(kāi)生成的報(bào)表文件rate_exchange進(jìn)行修改，使顯示在標(biāo)題區(qū)域的日期改在
每頁(yè)的注腳區(qū)顯示。
本題主要考核點(diǎn)：
SQL查詢(xún)語(yǔ)句，查詢(xún)?nèi)ハ颍y(tǒng)計(jì)，利用報(bào)表向?qū)Ы?bào)表等
本題解題思路：
第1題：select 外幣名稱(chēng),現(xiàn)鈔買(mǎi)入價(jià),賣(mài)出價(jià) from rate_exchange into table rate_ex。
第2題：update rate_exchange set 賣(mài)出價(jià)=829.01 where 外幣名稱(chēng)="美元"。
第3題：本題的主要考核點(diǎn)是使用報(bào)表向?qū)е谱鲌?bào)表。
啟動(dòng)報(bào)表向?qū)Э稍?文件"菜單中選擇"新建"或者單擊工具欄上的"新建"按鈕，打開(kāi)"新建"對(duì)話框，文件類(lèi)型選擇報(bào)表，單擊向?qū)О粹o?；蛘咴?工具"菜單中選擇"向?qū)?子菜單，選擇"報(bào)表"，或直接單擊工具欄上的"報(bào)表向?qū)?圖標(biāo)按鈕。
第4題：雙擊生成的報(bào)表文件rate_exchange，在報(bào)表設(shè)計(jì)器中，將顯示在"標(biāo)題" 區(qū)域的日期拖到"頁(yè)注腳"區(qū)，保存報(bào)表文件即可。
二、簡(jiǎn)單應(yīng)用（2小題，每題20分，計(jì)40分）
1. 設(shè)計(jì)一個(gè)如下圖所示的時(shí)鐘應(yīng)用程序，具體描述如下：
表單名和表單文件名均為timer，表單標(biāo)題為"時(shí)鐘"，表單運(yùn)行時(shí)自動(dòng)顯示
系統(tǒng)的當(dāng)前時(shí)間；
1) 顯示時(shí)間的為標(biāo)簽控件label1（要求在表單中居中，標(biāo)簽文本對(duì)齊方式
為居中）；
2) 單擊"暫停"命令按鈕（Command1）時(shí)，時(shí)鐘停止；
3) 單擊"繼續(xù)"命令按鈕（Command2）時(shí)，時(shí)鐘繼續(xù)顯示系統(tǒng)的當(dāng)前時(shí)間；
4) 單擊"退出"命令按鈕（Command3）時(shí)，關(guān)閉表單。
提示：使用計(jì)時(shí)器控件，將該控件的interval屬性設(shè)置為500，即每500
毫秒觸發(fā)一次計(jì)時(shí)器控件的timer事件（顯示一次系統(tǒng)時(shí)間）；將計(jì)時(shí)器控件
的interval屬性設(shè)置為0將停止觸發(fā)timer事件；在設(shè)計(jì)表單時(shí)將timer控件的
interval屬性設(shè)置為500。
2. 使用查詢(xún)?cè)O(shè)計(jì)器設(shè)計(jì)一個(gè)查詢(xún)，要求如下：
1) 基于自由表currency_sl.DBF和rate_exchange.DBF；
2) 按順序含有字段"姓名"、"外幣名稱(chēng)"、"持有數(shù)量"、"現(xiàn)鈔買(mǎi)入價(jià)"及表
達(dá)式"現(xiàn)鈔買(mǎi)入價(jià)*持有數(shù)量"；
3) 先按"姓名"升序排序、再按"持有數(shù)量"降序排序；
4) 查詢(xún)?nèi)ハ驗(yàn)楸韗esults.dbf；
5) 完成設(shè)計(jì)后將查詢(xún)保存為query文件，并運(yùn)行該查詢(xún)。
本題主要考核點(diǎn)：
簡(jiǎn)單應(yīng)用程序的建立，使用查詢(xún)?cè)O(shè)計(jì)器設(shè)計(jì)查詢(xún)等
本題解題思路：
第1題：本題的主要考核點(diǎn)是簡(jiǎn)單應(yīng)用程序的建立。
可以用三種方法建立表單：調(diào)用表單設(shè)計(jì)器；在項(xiàng)目管理器環(huán)境下調(diào)用；單擊"文件"菜單中的"新建"，打開(kāi)"新建"對(duì)話框，選擇"表單"；在命令窗口輸入"CREATE FORM 時(shí)鐘"命令。
打開(kāi)表單設(shè)計(jì)器后，在表單控件工具欄上單擊"命令按鈕"，在表單上放置三個(gè)按鈕控件，分別修改其Caption屬性為" 暫停"，"繼續(xù)"，"退出"；單擊"標(biāo)簽控件"，在表單中央放置一個(gè)標(biāo)簽控件，修改其Alignment屬性為"2-中央"；單擊"計(jì)時(shí)器控件"，在表單上放置一個(gè)計(jì)時(shí)器控件，修改其interval屬性為500。
相關(guān)代碼如下：
command1(暫停)按鈕的click事件為thisform.timer1.interval=0
command2(繼續(xù))按鈕的click事件為thisform.timer1.interval=500
command3(退出)按鈕的click事件為thisform.release
timer1的timer事件為thisform.label1.caption=time()
第2題：本題的主要考核點(diǎn)是運(yùn)用查詢(xún)?cè)O(shè)計(jì)器建立查詢(xún)。
建立查詢(xún)可以使用"文件"菜單完成，選擇文件--新建--查詢(xún)--新建文件，將"currency_sl"表和 "rate_exchange"表添加入查詢(xún)中，從字段選項(xiàng)卡中依次選擇"姓名"、"外幣名稱(chēng)"、"持有數(shù)量"、"現(xiàn)鈔買(mǎi)入價(jià)"及表達(dá)式"現(xiàn)鈔買(mǎi)入價(jià)*持有數(shù)量"；切換到"排序依據(jù)"選項(xiàng)卡并在其中選擇字段"姓名"，用相同方法設(shè)置按"持有數(shù)量"降序排序；單擊查詢(xún)菜單下的"查詢(xún)?nèi)ハ?，在"選擇表"對(duì)話框中輸入表名results，最后運(yùn)行該查詢(xún)。
三、綜合應(yīng)用（1小題，計(jì)30分）
設(shè)計(jì)一個(gè)滿足如下要求的應(yīng)用程序，所有控件的屬性必須在表單設(shè)計(jì)器的屬
性窗口中設(shè)置：
1. 建立一個(gè)表單，表單文件名和表單名均為form1，表單標(biāo)題為"外匯"；
2. 表單中含有一個(gè)頁(yè)框控件（PageFrame1）和一個(gè)"退出"命令按鈕
（Command1）；
3. 頁(yè)框控件（PageFrame1）中含有三個(gè)頁(yè)面，每個(gè)頁(yè)面都通過(guò)一個(gè)表格控
件顯示有關(guān)信息：
1) 第一個(gè)頁(yè)面Page1上的標(biāo)題為"持有人"，其上的表格控件名為
grdCurrency_sl，記錄源的類(lèi)型（RecordSourceType）為"表"，顯示自由表
currency_sl中的內(nèi)容；
2) 第二個(gè)頁(yè)面Page2上的標(biāo)題為"外匯匯率"，其上的表格控件名為
grdRate_exchange，記錄源的類(lèi)型（RecordSourceType）為"表"，顯示自由
表rate_exchange中的內(nèi)容；
3) 第三個(gè)頁(yè)面Page3上的標(biāo)題為"持有量及價(jià)值"，其上的表格控件名為
Grid1，記錄源的類(lèi)型（RecordSourceType）為"查詢(xún)"，記錄源（RecordSource）
為"簡(jiǎn)單應(yīng)用"題目中建立的查詢(xún)文件query。
4. 單擊"退出"命令按鈕（Command1）關(guān)閉表單。
本題主要考核點(diǎn)：
控件的屬性的修改（頁(yè)框，表格）、表單的退出等知識(shí)點(diǎn)
本題解題思路：
第一步：在Visual FoxPro主窗口中按下組合鍵Ctrl+N，系統(tǒng)彈出"新建"對(duì)話框，在文件類(lèi)型中選擇"表單"，點(diǎn)擊"新建文件"按鈕，系統(tǒng)將打開(kāi)表單設(shè)計(jì)器；或直接在命令窗口中輸入：crea form form1。
第二步：點(diǎn)擊工具欄按鈕"表單控件工具欄"，在彈出的"表單控件"對(duì)話框中，選中"頁(yè)框"控件，在表單設(shè)計(jì)器中拖動(dòng)鼠標(biāo)，這樣在表單上得到一個(gè)"頁(yè)框"控件PageFrame1，用類(lèi)似的方法為表單再加入三個(gè)"表格"控件(右擊頁(yè)框，點(diǎn)擊編輯按鈕)，1個(gè)"命令按鈕"控件command1；
相關(guān)控件的屬性值如下表所示：
對(duì)象 屬性 屬性值
Form1 Caption 外匯
PageFrame1 pagecount 3
PageFrame1.page1 Caption 持有人
PageFrame1.page2 Caption 外匯匯率
PageFrame1.page3 Caption 持有量及價(jià)值
PageFrame1.page1.grid1 Name grdCurrency_sl
PageFrame1.page2.grid1 Name grdRate_exchange
PageFrame1.page1.grdCurrency_sl RecordSourceType 0-表
PageFrame1.page1.grdCurrency_sl RecordSource currency_sl
PageFrame1.page2.grdRate_exchange RecordSourceType 0-表
PageFrame1.page2.grdRate_exchange RecordSource rate_exchange
PageFrame1.page3.grid1 RecordSourceType 3-查詢(xún)
PageFrame1.page3.grid1 RecordSource query
Command1 Caption 退出
******命令按鈕command1(退出)的Click事件代碼如下******
thisform.release