亚洲欧洲国产欧美一区精品,激情五月亚洲色五月,最新精品国偷自产在线婷婷,欧美婷婷丁香五月天社区

　　1、建立一個學(xué)生食堂IC卡管理數(shù)據(jù)庫，文件名為db721.DBC，并輸入數(shù)據(jù)(40分)

　　該數(shù)據(jù)庫中有兩個數(shù)據(jù)表： 學(xué)生信息表(XS.DBF)和食堂消費(fèi)數(shù)據(jù)表(XF.DBF)。其數(shù)據(jù)形式如下：

　　學(xué)生信息表(XS.DBF)

　　IC卡號 姓 名 性別 有效期

　　07020104 趙魚君 女 2008-7

　　07040109 芳心江 女 2008-7

　　07030106 艾世平 男 2008-7

　　07020132 周海龍 男 2008-7

　　07050223 陳康平 男 2008-7

　　07010213 鄧 娟 女 2008-7

　　1) 正確建立2個表的數(shù)據(jù)結(jié)構(gòu)(表結(jié)構(gòu)設(shè)計(jì)正確)20分

　　2) 數(shù)據(jù)正確15分

　　3) 永久關(guān)聯(lián)正確5分

　　2

　　要求：將數(shù)據(jù)庫中的XS.DBF(父表)和XF.DBF(子表)以“IC卡號”建立一對多永久關(guān)系。

　　2、建立程序文件COM-SQL721.PRG，要求將完成下列各小題任務(wù)的VFP數(shù)據(jù)表操作命令或VFP-SQL命令寫在該程序文件中。在程序首行用注釋語句注明考生姓名和準(zhǔn)考證號，并用注釋語句標(biāo)注小題號。(30分)

　　(1)正確修改學(xué)生信息表XS.DBF中的“有效期”字段的值。如果“IC卡號”的第4位的數(shù)值低于“4”(不包含)，則有效期改正為“2008-12”;否則更改為“2009-7”;

　　UPDATE XS SET 有效期=[2008-12] WHERE VAL(SUBSTR(IC卡號,4,1))<4

　　UPDATE XS SET 有效期=[2009-7] WHERE VAL(SUBSTR(IC卡號,4,1))>=4

　　1)

　　use xs

　　replace all 有效期 with '2008-12' for substr(IC卡號,4,1)<4

　　replace all 有效期 with '2009-7' for substr(IC卡號,4,1)>=4

　　(2)利用學(xué)生信息表和食堂消費(fèi)表的一對多關(guān)聯(lián)，查詢并顯示學(xué)生姓名為“艾世平”的食堂消費(fèi)明細(xì)，包括IC卡號、時間、類別和金額;

　　(1)VFP命令：USE YDCJ

　　REPLACE ALL 總成績 WITH 跳高+游泳+其它

　　SQL命令：UPDATE YDCJ SET 總成績=跳高+游泳+其它

　　(3)按“類別”匯總2007年11月份食堂消費(fèi)金額;

　　VFP命令：SELECT 1

　　USE JBB

　　INDEX ON 編號 TAG ZGH

　　SELECT 2

　　USE YDCJ

　　SET RELATION TO 編號 INTO ZGB

　　LIST 編號,JBB.姓名,總成績 FOR JBB.部門=“機(jī)關(guān)”

　　SQL命令：SELECT JBB.編號,姓名,總成績 FROM JBB,YDCJ WHERE JBB.編號=YDCJ.編號 AND 部門=“機(jī)關(guān)”

　　3、表單設(shè)計(jì)。按以下要求設(shè)計(jì)程序界面，表單文件名為:FORM721.SCX(30分)

　　設(shè)計(jì)如圖所示一個表單，包括3個標(biāo)簽，1個文本框，1個命令按鈕(各控件的主要屬性參照圖形尺寸自定)。其中：

　　表單的標(biāo)題要顯示考生自己的姓名和考號;

　　? 文本框text1的顯示初值為0;

　　? 該表單運(yùn)行后，可以在文本框text1中反復(fù)輸入數(shù)值，左鍵單擊“累加”命令按鈕，則由2個標(biāo)簽分別顯示累加值(大號字)和輸入次數(shù)(小號字)。注意該2標(biāo)簽開始沒有顯示;

　　? 雙擊表單任意空白處結(jié)束表單程序的運(yùn)行。

　　界面設(shè)計(jì)(10分)

　　主要屬性、事件代碼：

　　1)text1 、text2和text3的value屬性值均為0(5分)

　　2)“比較大小”按鈕的Click事件代碼：(10分)

　　x1=thisform.text1.value

　　x2=thisform.text2.value

　　if x1>x2

　　thisform.text3.value=x1

　　else

　　thisform.text3.value=x2

　　endif

　　3)“退出”按鈕的Click事件代碼：thisform.release (5分)