|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
 |
2005年（秋）vfp上機（2） |
|||||||
江蘇省高等學(xué)校非計算機專業(yè)學(xué)生 (本試卷完成時間 70分鐘)
一、項目、數(shù)據(jù)庫和表操作（12分） 打開軟盤根目錄中的項目文件TEST，在該項目中已有一數(shù)據(jù)庫SJK及若干表。 1. 按以下要求修改SJK數(shù)據(jù)庫中TS表： （1） 為TS表設(shè)置表注釋：教學(xué)用圖書。 （2） 添加一個字段，字段名為cover，其類型應(yīng)適用于存儲圖書的封面圖片。 （3） 設(shè)置分類號（flh）字段的有關(guān)屬性，使該字段中輸入的字母均為大寫字母。 （4） 設(shè)置冊數(shù)（cs）字段的有關(guān)屬性，使得將該字段從表單的數(shù)據(jù)環(huán)境中拖放到表單上時，生成的相應(yīng)控件為微調(diào)控件。 （5） 創(chuàng)建一個普通索引abcd，要求以書名（sm）的長度進行排序（sm字段值的首尾空格字符不計）。 （6） 設(shè)置書名（sm）字段的有效性規(guī)則：其值不能為空字符串，或僅有空格組成的字符串，相應(yīng)的有效性說明為“書名不能為空”。 （7） 為TS表添加一條記錄，其記錄內(nèi)容為:
2、 在項目中，將XIM表設(shè)置為“包含”狀態(tài)。 3、 XS表和CJ表已存在以學(xué)號（xh）字段為索引表達式的主索引xsxh和普通索引cjxh。以XS表為主表，CJ表為子表按xh建立永久關(guān)系，并根據(jù)以下要求設(shè)置參照完整性規(guī)則：在XS表中刪除記錄時，若CJ表中有相對應(yīng)的記錄（xh字段的值），則禁止刪除XS表記錄。 二、 設(shè)計查詢（8分） 在TEST項目中已經(jīng)存在查詢chaxun，SJK數(shù)據(jù)庫中的XSJY視圖包括學(xué)生學(xué)號（xh）、借閱日期（jyrq）、還書日期（hsrq），SJK數(shù)據(jù)庫中的學(xué)生（XS）表含有學(xué)號（xh）、姓名（xm）、所在班級編號（bjbh）。按如下要求修改查詢： 基于XS表和XSJY視圖查詢每個班每個學(xué)生借書本數(shù)、過期罰款數(shù)。要求輸出字段為：Xs.bjbn,Xs.xh,Xs.xm，借書本數(shù)、罰款 數(shù)。查詢結(jié)果按bjbh排序，bjbh相同的，按Xs.xh排序。 注：每本書的借閱時限為30天，沒超過一天罰款0.05元計算；同一本書借閱兩次時，以兩本書計；小數(shù)點保留2位。 已知項目TEST中已存在菜單menu，利用菜單設(shè)計器，按如下要求修改菜單。 1、 按圖1所示要求為“表操作”菜單欄下各子菜單項設(shè)置分組線； 2、 在“文件”菜單欄下插入一個“退出”菜單項，并編寫命令： 圖 1 當(dāng)執(zhí)行該菜單時能關(guān)閉VFP系統(tǒng)； 3、 為“數(shù)據(jù)瀏覽”菜單欄下的“學(xué)生”菜單項編寫過程代碼：當(dāng)執(zhí)行該菜單項時，選擇學(xué)生（XS）表為當(dāng)前表（若未打開，則首先打開之），并用BROWSE命令瀏覽學(xué)生表。 四、 設(shè)計表單（10分） 項目管理器中已經(jīng)存在表單FB，該表單用來更改用戶的密碼。根據(jù)下列要求修改表單，設(shè)計時和運行時的效果分別如圖2和圖3所示。 1、 設(shè)置表單為模式表單，背景為白色，并在運行是自動居中， 2、 設(shè)置“確定”控件按鈕為禁用。 3、 添加一個圖象控件，并指定顯示的圖象為Lock.jpg文件所存圖象。 4、 完善“重復(fù)新密碼”文本框控件txtNewB的InterActiveChange事件代碼（提示：在原代碼中的空行處添加適當(dāng)?shù)拇a） ，要求：用IF結(jié)構(gòu)語句判斷文本框“新密碼”和“重復(fù)新密碼”的值是否一致，如果一致，則啟用“確定”命令按鈕，否則禁用 “確定”命令按鈕。 5、 編寫“確定”命令按鈕的相關(guān)事件代碼，使得單擊該按鈕時，將“txtNewA”文本框的值賦給給變量pPassWord。
圖2 設(shè)計時 圖3 運行時 五、 程序改錯題（5分） 下列程序的功能是找出1000之內(nèi)所有的完數(shù)，并統(tǒng)計它們的個數(shù)。完數(shù)是指：數(shù)的各因子之和正好等于該數(shù)本身（例如6的因子是1、2、3，而1+2+3=6，所以6是完數(shù)）。要求： （1） 項目中有一個程序文件Pcode，將下列程序輸入到其中并進行修改； （2） 在修改程序時，不允許修改程序的總體框架和算法，不允許增加或減少語句數(shù)目 CLEAR n1=1 nCount=0 DO WHILE n1<=1000 m=0 FOR n2=INT(n1/n2)TO 1 STEP-1 IF n1/n2=INT(n1,n2) m=m+n1 ENDIF ENDFOR IF n1=m nCount=nCount+1 ?n1 ENDDO n1=n1+1 ENDDO WAIT WINDOWS"完整的個數(shù)為"+STR（nCount）
|
|||||||
