2003年（秋）Visual FoxPro 二級考試上機試卷(VFP0２)
(本試卷上機考試時間為70分鐘)
說明：1.運行考試軟盤A中的“上機考試”應(yīng)用程序文件以輸入考生的準(zhǔn)考證號、姓名、試卷代號。
2. 啟動VFP系統(tǒng)后，首先在命令窗口中執(zhí)行命令：
set default to A:
以設(shè)置默認的工作目錄，然后再開始作題。 |
一、 項目、數(shù)據(jù)庫和表操作（12分）
打開軟盤根目錄下的項目文件TEST，在該項目中已有一數(shù)據(jù)庫SJK。
1．按如下要求修改SJK中學(xué)生（XS）表的結(jié)構(gòu)：
�。�1） 將學(xué)號（xh）字段寬度設(shè)置為10。
�。�2） 設(shè)置xh字段的有效性規(guī)則：學(xué)號的有效寬度只能是6位、8位或10位；
�。�3） 設(shè)置xh字段的字段注釋：字段是學(xué)生表的主關(guān)鍵字，不允許重復(fù)。
（4） 創(chuàng)建一個唯一索引xing，要求先按姓名（xm）字段中的姓（第一個漢字）升序排序。
�。�5） 設(shè)置XS表注釋：學(xué)生基本信息。
2． 把TEST項目中的圖片文件015.jpg的包含狀態(tài)設(shè)置為“排除”。
3． 修改XS表中所有記錄的xh字段值，用班級編號（bjbh）中的第3至4位插入到學(xué)號中的第2與第3位之間。例如：學(xué)號為“990501”，班級編號為“990404051”，則替換后的學(xué)號就是“9904051”。
4．為xs表設(shè)置刪除觸發(fā)器：只有學(xué)號開頭兩位是“95”至“99”的記錄允許刪除，否則不允許刪除。
5． SJK中班級（BJ）表已存在主索引bjbh,索引表達式為bjbh，XS表已存在普通索引bjbh,索引表達式為bjbh。以BJ表為主表，CJ表為子表按xh建立永久關(guān)系，并設(shè)置BJ表和XS表之間的參照完整性：刪除限制。
二、 設(shè)計查詢（8分）
已知學(xué)生（XS）表中含有字符型字段班級編號（bjbh）和日期型字段出生日期（csrq）。在TEST項目中已存在查詢CHAXUN，按如下要求修改該查詢：
基于學(xué)生（XS）表統(tǒng)計各班上半年和下半年出生的人數(shù)，要求輸出字段為：bjbh、時間、人數(shù)。如果出生月份在1至6月，則時間為“上半年”，如果出生月份在7至12月，則時間為“下半年”，查詢結(jié)果首先按班級編號升序排序，同一班級中再按時間降序排序，查詢結(jié)果輸出到臨時表xsrs。
三、 設(shè)計菜單（5分）
項目TEST中已存在菜單MENUA，按如下要求修改菜單，完成后的運行效果如圖1所示。
| 1． 為“數(shù)據(jù)錄入”菜單欄下的“學(xué)生信息錄入”菜單項創(chuàng)建快捷鍵“ALT+L”。 |
 |
2． 在“數(shù)據(jù)錄入”菜單欄下增加一個菜單項“教師信息錄入”，并用分隔線隔開。
3． 為“教師信息錄入”菜單項設(shè)置過程，當(dāng)執(zhí)行該菜單時向(JS)表中插入一條空記錄，并打開JS表的編輯窗口。
4． 為“數(shù)據(jù)查詢”菜單欄設(shè)置提示信息：“按條件查詢相關(guān)表的信息”，即當(dāng)菜單運行時且選擇了“數(shù)據(jù)查詢”菜單欄時，在狀態(tài)欄中顯示該提示信息。
5． 將上述菜單追加在系統(tǒng)菜單“幫助”的后面。
四．設(shè)計表單（10分）
TEST 項目中已經(jīng)存在菜單FORMA，該表單可以用來查詢學(xué)生成績。選項按鈕組提供了兩種查詢方式：按學(xué)號查該學(xué)生的各門課的成績，或者按課程查該課程有多少學(xué)生選修及各個學(xué)生的成績情況。根據(jù)下列要求對表單進行修改，完成以后運行菜單，效果如圖2和圖3所示。
1． 將表格中的各列標(biāo)頭改為如圖2所示的標(biāo)題。
2． 將表格的刪除標(biāo)志列去掉。
3． 設(shè)置表單的有關(guān)屬性，是表單運行時不可隨意移動。
4． 完善選項按鈕組op1的Click事件代碼，使得當(dāng)選擇“按學(xué)號”查時標(biāo)簽label1標(biāo)題為“總成績”，當(dāng)選擇“按課程”查時標(biāo)簽label1標(biāo)題為“總?cè)藬?shù)”。
5． 完善列表框的InterActiveChange時間代碼：使得當(dāng)“按學(xué)號”查詢并在列表框中選擇學(xué)號時文本框中統(tǒng)計學(xué)生的總成績，當(dāng)“按課程代碼”查詢并在列表框中選擇課程代號時文本框中統(tǒng)計該課程的學(xué)生選修人數(shù)。
五．程序改錯（5分）
下列程序的功能是將小寫金額（假設(shè)小于0萬有且有1位小數(shù)）轉(zhuǎn)換為中文大寫形式顯示。例如，213.0轉(zhuǎn)換為“貳佰壹拾叁元零角”，3002.8轉(zhuǎn)換為“叁仟零貳元捌角”。要求：
1． 項目中有一個程序文件PCODE，將下列程序輸入到其中并進行修改。
2． 在修改程序時，不允許修改程序的總體框架和算法，不允許增加或減少語句數(shù)目。
nMoney=10040.5 &&賦初值
cMoney=ALLT(STR(nMoney，7，1))
cs1=’零壹貳叁肆伍陸柒捌玖’
cS1=RIGHI(‘萬仟佰拾元’,(LEN(cMoney)-2)*2)
cRt=SPACE(0)
FOR n=1 TO LEN(cMoney)-2
ch=SUBSTR(cMoney,n,1)
cRt=cRt+IIF(ch=”0” AND RIGHT(cRt,2)=”零”,””,SUBS(cS1,ch*2+1,2))
cRt=cRt+IIF(ch=”0”,””,SUBS(cS2,n*2-1,2))&&去掉重復(fù)零
ENDFOR
cRt=cRt+IIF(RIGHT(cRt,2)=”零”,’元’,”)
cRt=cRt+IIF(RIGHT(cMoney,1)=’0’,’’,SUBS(cS1,VAL(RIGHT(cMoney,1))*2+1,2)+’角’&&小數(shù)部分
WAIT WINDOWS’大寫金額為:’+cRt
|
