




版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1.數(shù)據(jù)表文件GZ.DBF已按部門(mén)有序,其內(nèi)容如下:姓名部門(mén)工資獎(jiǎng)金實(shí)發(fā)陳三業(yè)務(wù)科730850張四經(jīng)理室890890林五經(jīng)理室630960馬六技術(shù)科560840江七技術(shù)科9501340按以下要求完成命令:利用CALCULATE命令求出工資的最小值、最大值和平均值,結(jié)果分別放到變量A、B、C中按工資升序建立非結(jié)構(gòu)型復(fù)合索引,文件名為GZSY.CDX利用REPLACE命令核算每個(gè)人的實(shí)發(fā)工資將表中部門(mén)為技術(shù)科的記錄刪除用瀏覽窗口顯示表中工資為800元〔含800元〕以上并且部門(mén)為經(jīng)理室的記錄1、USEGZCALCULATEMIN(工資),MAX(工資),AVG(工資)TOA,B,CUSE〔3分〕2、USEGZINDEXON工資TAGTGZOFGZSYUSE〔3分〕3、USEGZREPLACEALL實(shí)發(fā)WITH工資+獎(jiǎng)金USE〔3分〕4、USEGZDELETEFOR部門(mén)=“技術(shù)科〞PACK〔3分〕5、USEGZBROWSEFOR工資>=800.AND.部門(mén)=“經(jīng)理室〞USE2、假設(shè)有一自由表da.dbf,編程實(shí)現(xiàn)逐條顯示表中“年齡〞字段的大于40歲〔含40歲〕的記錄,要求每顯示一條暫停,并詢(xún)問(wèn)用戶(hù)“是否繼續(xù)顯示下一條?Y/N〞,選“Y〞那么繼續(xù),選“N〞那么結(jié)束程序?!?分〕、SETTALKOFFUSEDA〔1分〕A=“Y〞〔1分〕SCANFOR年齡>=40WHILEUPPER〔A〕=“Y〞〔1分〕DISPLAY〔1分〕WAIT“是否繼續(xù)顯示下一條?Y/N〞TOA〔1分〕ENDSCAN〔1分〕USE〔1分〕SETTALKON3、設(shè)計(jì)一個(gè)表單樣式如圖,兩個(gè)文本框的名字分別為T(mén)ext1和Text2,“計(jì)算等級(jí)〞命令按鈕的名為Cmd1,“退出〞命令按鈕的名為Cmd2,實(shí)現(xiàn)功能為在Text1中輸入一個(gè)考試成績(jī),在Text2中顯示出此成績(jī)對(duì)應(yīng)的等級(jí),合理的成績(jī)應(yīng)在0—100分,完成兩個(gè)命令按鈕的代碼設(shè)計(jì)。〔8分〕Cmd1的代碼:N=VAL(THISFORM.TEXT1.VALUE)〔1分〕DOCASECASEN>100.OR.N<0B=“此成績(jī)不正確〞CASEN>=90B=“優(yōu)秀〞CASEN>=80B=“良好〞CASEN>=70B=“中〞CASEN>=60B=“及格〞OTHERWISEB=“不及格〞〔4分〕ENDCASETHISFORM.TEXT2.VALUE=B〔1分〕THISFORM.REFERSHCmd2的代碼:THISFORM.RELEASE4、一表單結(jié)構(gòu)如圖,其中下邊的按鈕是用命令按鈕組實(shí)現(xiàn)的,按鈕組的Name為Cmdgup1,每個(gè)按鈕的Name分別為Cmd1、Cmd2、Cmd3、Cmd4、Cmd5。下面是Cmdgup1控件的Click事件的局部代碼,請(qǐng)將代碼完成。(10分)docasecasen=1gotopthisformdgup1d2.enabled=.f.thisformdgup1d3.enabled=.t.thisformdgup1d4.enabled=.t.thisform.refreshcasen=2ifbof()gotopthisformdgup1d2.enabled=.f.elseskip–1thisformdgup1d3.enabled=.t.thisformdgup1d4.enabled=.t.ifbof()thisformdgup1d2.enabled=.f.endifendifthisform.refreshcasen=3ifeof()〔1分〕gobottom〔1分〕thisformdgup1d3.enabled=.f.〔1分〕elseskipthisformdgup1d2.enabled=.t.ifeof()〔1分〕thisformdgup1d3.enabled=.f.〔1分〕endifendifthisform.refresh〔1分〕casen=4gobottom〔1分〕thisformdgup1d3.enabled=.f.〔1分〕thisformdgup1d4.enabled=.t.〔1分〕thisform.refresh〔1分〕Casen=5Thisform.releaseEndcase5.數(shù)據(jù)表文件DA.DBF,其字段如下:編號(hào)姓名性別年齡職稱(chēng)工資對(duì)表中50歲以上〔含50歲〕的教授用瀏覽窗口顯示。按照性別字段建立構(gòu)造型復(fù)合索引。將所有人工資漲300元。利用TOTAL命令對(duì)該表按照性別進(jìn)行匯總,結(jié)果放到達(dá)表DAHJ.DBF中。求年齡的平均值結(jié)果放到變量NL中。1、USEDABROWSEFOR年齡>=50.AND.職稱(chēng)=“教授〞USE〔3分〕2、USEDAINDEXON性別TAGTXBUSE〔3分〕3、USEDAREPLACEALL工資WITH工資+300USE〔3分〕4、USEGZTOTALON性別TODAHJUSE〔3分〕5、USEDAAVERAGE年齡TONLUSE6.假設(shè)有一自由表da.dbf,字段結(jié)構(gòu)同第四大題,編程實(shí)現(xiàn)從鍵盤(pán)輸入一個(gè)編號(hào),在表中找到該記錄,判斷如果為男性顯示姓名、性別、年齡,女性那么顯示其姓名、性別、職稱(chēng)?!?分〕SETTALKOFFUSEDA〔1分〕ACCEPT“請(qǐng)輸入編號(hào):〞TOBH〔1分〕LOCATEFOR編號(hào)=BH〔1分〕IF性別=“男〞〔1分〕DISPLAY姓名,性別,年齡〔1分〕ELSE〔1分〕DISPLAY姓名,性別,職稱(chēng)〔1分〕ENDIFUSE〔1分〕SETTALKON7、設(shè)計(jì)一個(gè)表單樣式如圖,三個(gè)文本框的名字分別為T(mén)ext1、Text2和Text3,“確定〞命令按鈕的名為Cmd1,“退出〞命令按鈕的名為Cmd2,實(shí)現(xiàn)功能為在Text1中輸入一個(gè)英文字母構(gòu)成的字符串,按“確定〞按鈕后在Text2中顯示此字符串的長(zhǎng)度,在Text3中把字母變成大寫(xiě)顯示出來(lái),完成兩個(gè)命令按鈕的代碼設(shè)計(jì)?!?0分〕Cmd1代碼:N=THISFORM.TEXT1.VALUE〔2分〕A=STR(LEN(N))〔2分〕B=UPPER(N)THISFORM.TEXT2.VALUE=A〔1分〕THISFORM.TEXT3.VALUE=B〔1分〕THISFORM.REFERSHCmd2代碼:THISFORM.RELEASE8、利用過(guò)程的方法編程求圓錐的體積〔公式為V=?лr2h,r為底圓半徑,h為高〕?!?分〕SETTALKOFFINPUT“請(qǐng)輸入圓錐的高〞TOH〔1分〕INPUT“請(qǐng)輸入圓錐的底圓半徑〞TOR〔1分〕V=0DOSUBWITHH,R,S〔1分〕?“該圓錐的體積為〞+STR(V)〔1分〕PROCEDURESUB〔1分〕PARAMETERX,Y,Z〔1分〕Z=3/4*3.14*R*R*H〔1分〕RETURN9.數(shù)據(jù)表文件stock.dbf,其字段如下:編號(hào)姓名根本工資職務(wù)補(bǔ)貼崗位津貼水電費(fèi)實(shí)發(fā)工資對(duì)表中工資前兩項(xiàng)和為2000元〔包括2000元〕以上的記錄用瀏覽窗口顯示。按照工資前三項(xiàng)的和建立非構(gòu)造型復(fù)合索引,文件名為stgz.cdx。根據(jù)4項(xiàng)工資值核算所有人的實(shí)發(fā)工資。利用CALCULATE命令對(duì)該表求實(shí)發(fā)工資的最大值、最小值和平均值,結(jié)果放到變量GZMAX、GZMIN、GZAVER中。1、USEstockBROWSEFOR根本工資+職務(wù)補(bǔ)貼>=2000USE〔3分〕2、USEstockINDEXON根本工資+職務(wù)補(bǔ)貼+崗位津貼TAGTGZofstgz.cdxUSE〔4分〕3、USEstockREPLACEALL實(shí)發(fā)工資WITH根本工資+職務(wù)補(bǔ)貼+崗位津貼-水電費(fèi)USE〔4分〕4、USEstockCALCULATEMAX〔實(shí)發(fā)工資〕,MIN〔實(shí)發(fā)工資〕,AVG〔實(shí)發(fā)工資〕TOGZMAX,GZMIN,GZAVERUSE假設(shè)有一自由表stock.dbf,字段結(jié)構(gòu)同第四大題,編程實(shí)現(xiàn)從鍵盤(pán)輸入一個(gè)編號(hào),在表中找到該記錄,判斷實(shí)發(fā)工資是否在3000元以上?!?分〕SETTALKOFFUSEDA〔1分〕ACCEPT“請(qǐng)輸入編號(hào):〞TOBH〔1分〕LOCATEFOR編號(hào)=BH〔1分〕IF實(shí)發(fā)工資>=3000〔1分〕C=“該職工實(shí)發(fā)工資高于3000元〞〔1分〕ELSEC=“該職工實(shí)發(fā)工資低于3000元〞〔1分〕ENDIF?CUSESETTALKON10、設(shè)計(jì)一個(gè)表單樣式如圖,文本框的名字為T(mén)ext1,“顯示〞命令按鈕的名為Cmd1,“關(guān)閉〞命令按鈕的名為Cmd2,實(shí)現(xiàn)功能按“顯示〞按鈕后在Text1中顯示今天是星期幾,完成兩個(gè)命令按鈕的代碼設(shè)計(jì)?!?0分〕Cmd1代碼:N=DOW(DATE())〔1分〕DOCASECASEN=1A=“日〞CASEN=2A=“一〞CASEN=3A=“二〞CASEN=4A=“三〞CASEN=5A=“四〞CASEN=6A=“五〞OTHERWISEA=“六〞(4分)ENDCASETHISFORM.TEXT1.VALUE=A〔2分〕THISFORM.REFRESH〔1分〕Cmd2代碼:THISFORM.RELEASE11、編程顯示100到300間的全部素?cái)?shù)?!?分〕SETTALKOFFFORA=100TO300〔1分〕N=INT(SQRT(A)+0.5)〔1分〕FORB=3TON〔1分〕IFA%B=0EXIT〔2分〕ENDIFENDFORIFB>N〔2分〕?A〔1分〕ENDIFENDFOR11.當(dāng)前盤(pán)當(dāng)前目錄下有數(shù)據(jù)庫(kù)db_stock,其中有數(shù)據(jù)庫(kù)表stock.dbf,該數(shù)據(jù)庫(kù)表的內(nèi)容如選擇題第2題:利用FoxPro命令完成以下要求:利用CALCULATE命令求出股票單價(jià)的最小值、最大值和平均值,結(jié)果分別放到變量A、B、C中按交易所升序建立非結(jié)構(gòu)型復(fù)合唯一索引,文件名為SY.CDX利用適宜的命令把所有上海的股票的單價(jià)增加0.5元利用SQL語(yǔ)言實(shí)現(xiàn)對(duì)表中單價(jià)超過(guò)10元并且交易所為上海的股票代碼、股票名稱(chēng)和單價(jià)的查詢(xún),結(jié)果按照單價(jià)升序排列將表中交易所為深圳的記錄刪除。1、OPENDATABASEdb_stockUSEstockCALCULATEMIN(單價(jià)),MAX(單價(jià)),AVG(單價(jià))TOA,B,CUSE〔3分〕2、OPENDATABASEdb_stockUSEstockINDEXON交易所TAGTGZOFSY.CDXUSE〔3分〕3、OPENDATABASEdb_stockUSEstockREPLACEALL單價(jià)WITH單價(jià)+0.5FOR交易所=“上海〞USE〔3分〕4、SELECT股票代碼,股票名稱(chēng),單價(jià)FROMstockWHERE單價(jià)>10.AND.交易所=“上海〞ORDERBY單價(jià)〔3分〕5、OPENDATABASEdb_stockUSEstockDELETEFOR交易所>=“深圳〞12、假設(shè)有一自由表da.dbf,分別利用Dowhile循環(huán)和Scan循環(huán)編程實(shí)現(xiàn)逐條顯示表中“職稱(chēng)〞字段為“教授〞的記錄,要求每顯示一條暫停,并詢(xún)問(wèn)用戶(hù)“是否繼續(xù)顯示下一條?Y/N〞,選“Y〞那么繼續(xù),選其它那么結(jié)束程序?!?分〕DOWHILE循環(huán)做法:SETTALKOFFUSEDADOWHILE.NOT.EOF()DISPLAYWAIT“是否繼續(xù)顯示下一條?Y/N〞TOAIFUPPER(A)=〞Y〞SKIPLOOPELSEEXITENDIFENDDOUSESETTALKON〔5分〕SCAN循環(huán)做法:SETTALKOFFUSEDAA=“Y〞SCANFOR職稱(chēng)=“教授〞WHILEUPPER〔A〕=“Y〞DISPLAYWAIT“是否繼續(xù)顯示下一條?Y/N〞TOAENDSCANUSE〔4分〕SETTALKON13、設(shè)計(jì)一個(gè)表單樣式如圖,兩個(gè)文本框的名字分別為T(mén)ext1和Text2,“查詢(xún)〞命令按鈕的名為Cmd1,“退出〞命令按鈕的名為Cmd2,實(shí)現(xiàn)功能為在Text1中輸入一個(gè)專(zhuān)業(yè)代碼,在Text2中顯示出此代碼對(duì)應(yīng)的專(zhuān)業(yè)名稱(chēng),合理的代碼和專(zhuān)業(yè)名稱(chēng)對(duì)應(yīng)應(yīng)為01—工商管理、02—會(huì)計(jì)學(xué)、03—金融學(xué)、04—國(guó)際經(jīng)濟(jì)與貿(mào)易、05—市場(chǎng)營(yíng)銷(xiāo)、06—信息管理與信息系統(tǒng)、07—經(jīng)濟(jì)學(xué)、08—物流管理,完成兩個(gè)命令按鈕的代碼設(shè)計(jì)?!?0分〕Cmd1的代碼:N=VAL(THISFORM.TEXT1.VALUE)〔1分〕DOCASECASEN=‘01’B=“工商管理〞CASEN=‘02’B=“會(huì)計(jì)學(xué)〞CASEN=‘03’B=“金融學(xué)〞CASEN=‘04’B=“國(guó)際經(jīng)濟(jì)與貿(mào)易〞CASEN=‘05’B=“市場(chǎng)營(yíng)銷(xiāo)〞CASEN=‘06’B=“信息管理與信息系統(tǒng)〞CASEN=‘07’B=“經(jīng)濟(jì)學(xué)〞CASEN=‘08’B=“物流管理〞OTHERWISEB=“代碼不正確〞〔6分〕ENDCASETHISFORM.TEXT2.VALUE=B〔1分〕THISFORM.REFERSHCmd2的代碼:THISFORM.RELEASE14.數(shù)據(jù)表文件stock.dbf,其字段如下:編號(hào)姓名性別年齡職稱(chēng)工資對(duì)表中男的講師用瀏覽窗口顯示。按照性別字段建立非構(gòu)造型唯一復(fù)合索引,文件名為stxb.cdx。將所有人工資漲20%。利用TOTAL命令對(duì)該表按照性別進(jìn)行匯總,結(jié)果放到達(dá)表DAHJ.DBF中。求年齡的平均值結(jié)果放到變量NL中。1、USEstockBROWSEFOR性別=“男〞.AND.職稱(chēng)=“講師〞USE〔3分〕2、USEstockINDEXON性別TAGTXBofstxb.cdxuniqUSE〔3分〕3、USEstockREPLACEALL工資WITH工資*1.2USE〔3分〕4、USEstockTOTALON性別TODAHJUSE〔3分〕5、USEstockAVERAGE年齡TONL15.假設(shè)有一自由表da.dbf,字段結(jié)構(gòu)同第四大題,編程實(shí)現(xiàn)從鍵盤(pán)輸入一個(gè)姓名,在表中找到該記錄,判斷如果為教授顯示姓名、性別、年齡,其它那么顯示其姓名、性別、職稱(chēng)?!?分〕SETTALKOFFUSEDA〔1分〕ACCEPT“請(qǐng)輸入姓名:〞TOXM〔1分〕LOCATEFOR姓名=XM〔1分〕IF職稱(chēng)=“教授〞〔1分〕DISPLAY姓名,性別,年齡〔1分〕ELSE〔1分〕DISPLAY姓名,性別,職稱(chēng)〔1分〕ENDIFUSE〔1分〕3、編程求從鍵盤(pán)輸入3個(gè)互不相等的數(shù),求其最大值和最小值?!?分〕SETTALKOFFINPUT“請(qǐng)輸入第一個(gè)數(shù):〞TOAINPUT“請(qǐng)輸入第二個(gè)數(shù):〞TOBINPUT“請(qǐng)輸入第三個(gè)數(shù):〞TOC〔2分〕IFA<BIFB<CT=AT=BA=BB=CB=TC=TENDIF〔1分〕ENDIF〔1分〕IFA<C?“最大值為“,A〔1分〕T=A?“最小值為“,C〔1分〕A=CC=TENDIF〔1分〕假設(shè)有一自由表da.dbf,字段結(jié)構(gòu)同第四大題,編程實(shí)現(xiàn)從鍵盤(pán)輸入一個(gè)編號(hào),在表中找到該記錄,判斷如果為男性顯示姓名、性別、年齡,女性那么顯示其姓名、性別、職稱(chēng)。〔8分〕SETTALKOFFUSEDA〔1分〕ACCEPT“請(qǐng)輸入編號(hào):〞TOBH〔1分〕LOCATEFOR編號(hào)=BH〔1分〕IF性別=“男〞〔1分〕DISPLAY姓名,性別,年齡〔1分〕ELSE〔1分〕DISPLAY姓名,性別,職稱(chēng)〔1分〕ENDIFUSE〔1分〕SETTALKON2、設(shè)計(jì)一個(gè)表單樣式如圖,兩個(gè)文本框的名字分別為T(mén)ext1、Text2,“顯示〞命令按鈕的名為Cmd1,“關(guān)閉〞命令按鈕的名為Cmd2,實(shí)現(xiàn)功能為在Text1中輸入一個(gè)考試成績(jī),按“確定〞按鈕后在Text2中顯示該成績(jī)的等級(jí),完成兩個(gè)命令按鈕的代碼設(shè)計(jì)。〔10分〕Cmd1代碼:N=VAL(THISFORM.TEXT1.VALUE)〔2分〕DOCASECASEN>100.OR.N<0B=“此成績(jī)不正確〞CASEN>=90B=“優(yōu)秀〞CASEN>=80B=“良好〞CASEN>=70B=“中〞CASEN>=60B=“及格〞OTHERWISEB=“不及格〞〔4分〕ENDCASETHISFORM.TEXT2.VALUE=B〔1分〕THISFORM.REFERSH〔1分〕Cmd2代碼:THISFORM.RELEASE3、從鍵盤(pán)輸入一個(gè)正整數(shù),編程求圓錐的體積〔公式為V=?лr2h,r為底圓半徑,h為高該數(shù)的階乘。〔7分〕SETTALKOFFINPUT“請(qǐng)輸入一個(gè)正整數(shù)〞TOH〔1分〕S=1〔1分〕FORV=HTO1STEP-1〔2分〕S=S*H〔2分〕ENDFOR?“該數(shù)的階乘為〞+STR(S)〔1分〕RETURN.1、退出VisualFoxPro6.0的操作方法是是〔d〕。A.從“文件〞下拉菜單中選擇“退出〞選項(xiàng)B.單擊關(guān)閉窗口按扭C.在命令窗口中輸入QUIT口令,然后按回車(chē)鍵D.以上方法都可以2、在DOWHILE…ENDDO循環(huán)結(jié)構(gòu)中,LOOP命令的作用是(B)。A.退出過(guò)程,返回程序開(kāi)始處B.轉(zhuǎn)移到DOWHILE語(yǔ)句行,開(kāi)始下一個(gè)判斷和循環(huán)C.終止循環(huán),將控制轉(zhuǎn)移到本循環(huán)結(jié)構(gòu)ENDDO后面的第一條語(yǔ)句繼續(xù)執(zhí)行D.終止程序執(zhí)行3、在VisualFoxPro中,用于建立或修改命令文件的命令是(B)。A.MODIFYFileNameB.MODIFYCOMMANDFileNameC.MODIFYPROCEDUREFileNameD.上面B.和C.都對(duì)4、報(bào)表設(shè)計(jì)器中不包含在根本帶區(qū)中的有(A)。A.標(biāo)題B.頁(yè)標(biāo)頭C.頁(yè)注腳D.細(xì)節(jié)5、以下關(guān)于視圖的表達(dá)中,正確的是(B)。A.只能由自由表創(chuàng)立視圖B.只能由數(shù)據(jù)庫(kù)表創(chuàng)立視圖C.不能由數(shù)據(jù)庫(kù)表創(chuàng)立視圖D.自由表和數(shù)據(jù)庫(kù)表都能創(chuàng)立視圖6、關(guān)于數(shù)據(jù)庫(kù)表和自由表的區(qū)別,正確的選項(xiàng)是(D)。A.可以為自由表添加標(biāo)題和注釋?zhuān)鴶?shù)據(jù)庫(kù)表不能B.可以為自由表的字段設(shè)置默認(rèn)值和輸入掩碼C.不能為數(shù)據(jù)庫(kù)表的字段設(shè)置默認(rèn)值和輸入掩碼D.可以為數(shù)據(jù)庫(kù)表設(shè)置默認(rèn)值、輸入掩碼、標(biāo)題和注釋7、下面有關(guān)索引的描述正確的是(C)。A.建立索引以后,原來(lái)的數(shù)據(jù)庫(kù)表文件中記錄的物理順序?qū)⒈桓淖傿.索引與數(shù)據(jù)庫(kù)表的數(shù)據(jù)存儲(chǔ)在一個(gè)文件中’C.創(chuàng)立索引是創(chuàng)立一個(gè)指向表文件記錄的指針構(gòu)成的文件D.使用索引并不能加快對(duì)表的查詢(xún)操作8、在下面的VisualFoxPro表達(dá)式中,不正確的是(C)。A.{^2001-05-0110:1010AM}-10B.{^2001-05-01}-DATE(.)C.{^2001-05-01)+DATE()D.[^2001-05-01]+[1000]9、函數(shù)INT(12.865)的值為(A)。10、有如下程序:INPUTTOAIFA=10S=0ENDIFS=1?S問(wèn):假定從鍵盤(pán)輸入的A的值一定是數(shù)值型,那么上面程序的執(zhí)行結(jié)果是(B)。A.0B.1C.由A的值決定D.程序出錯(cuò)1、__WAIT______命令等待用戶(hù)從鍵盤(pán)輸入一個(gè)字符,輸入字符后程序繼續(xù)運(yùn)行。2、VisualFoxPro是一種結(jié)構(gòu)化程序設(shè)計(jì)語(yǔ)言,表達(dá)了結(jié)構(gòu)化程序設(shè)計(jì)的根本特征。它的根本結(jié)構(gòu)有____順序____、__分支______和____循環(huán)____。3、在循環(huán)的次數(shù)的情況下,通常使用_______FORENDFOR__________循環(huán)語(yǔ)句。4、對(duì)于表單中的標(biāo)簽控件,假設(shè)要使該標(biāo)簽顯示指定的文字,應(yīng)對(duì)其___CAPTION_____屬性進(jìn)行設(shè)置;假設(shè)要使指定的文字自動(dòng)適應(yīng)標(biāo)簽區(qū)域的大小,那么應(yīng)將其___AUTISUZE_____屬性設(shè)置為邏輯真值。5、視圖可分為_(kāi)__本地視圖______和_____遠(yuǎn)程視圖____兩種。6、在VisualFoxPro6.0中貨幣數(shù)據(jù)的寬度固定是_4___。數(shù)據(jù)表文件JS.DBF,其字段如下:編號(hào)姓名性別出生日期職稱(chēng)工資年齡顯示表中1965年1月1日之前出生的記錄。按照職稱(chēng)字段建立結(jié)構(gòu)型復(fù)合唯一索引。根據(jù)出生日期重新求每個(gè)人的年齡,并替換到相應(yīng)的字段中。利用命令對(duì)該表求工資的最高值,結(jié)果放到達(dá)變量GZ中。求年齡的平均值結(jié)果放到變量NL中。1、USEDABROWSEFOR出生日期<{^1965/01/01}USE〔3分〕2、USEDAINDEXON職稱(chēng)TAGTBHUNIQ3、USEDAREPLACEALL年齡WITHYEAR(DATE())-YEAR(出生日期)USE〔3分〕4、USEGZCALCULATEMAX(工資)TOGZUSE〔3分〕5、USEDAAVERAGE年齡TONLUSE〔3分〕判斷以下程序運(yùn)行結(jié)果:(4分)SETTALKOFFINPUT〞請(qǐng)輸入一個(gè)正整數(shù)〞TONS=0DOWHILEN>0S=S+N%10N=INT(N/10)ENDDO?SSETTALKON程序運(yùn)行后輸入:123456789那么運(yùn)行結(jié)果為:(1)45〔2分〕SETTALKOFFY=YEAR(DATE())M=MONTH(DATE())D=DAY(DATE())?STR(Y,4,0)+〞年〞+STR(M,2,0)+〞月〞+STR(D,2,0)+〞日〞以考試當(dāng)天為例,寫(xiě)出運(yùn)行結(jié)果:(2)2023年12月05日2、編程實(shí)現(xiàn)在表單上任意輸入年月日,單擊計(jì)算按鈕后顯示出平年、閏年,幾季度,上、中、下旬〔如下圖〕。計(jì)算按鈕為command1,退出按鈕尾為command2,平年、閏年,幾季度,上、中、下旬分別用3個(gè)標(biāo)簽label1、label2、label3來(lái)顯示,請(qǐng)寫(xiě)出command1和command2的程序代碼。(10分)閏年計(jì)算規(guī)那么:能被4整除但不能被100整除,或者能被400整除的。Command1代碼:〔11分〕y=VAL(ALLTRIM(thisform.text1.value))IFy%4=0.and.y%100<>0.or.y%400=0yy="今年是閏年"ELSEyy="今年是平年"ENDIFthisform.label1.caption=yym=VAL(ALLTRIM(thisform.text2.value))〔4分〕DOcaseCASEm<=3mm="一季度"CASEm<=6mm="二季度"CASEm<=9mm="三季度"CASEm<=12mm="四季度"ENDCASEthisform.label2.caption=mmd=VAL(ALLTRIM(thisform.text3.value))〔4分〕DOcaseCASEd<=10dd="上旬"CASEd<=20dd="中旬"otherwisedd="下旬"endcasethisform.label3.caption=ddthisform.Refresh〔3分〕Command2代碼:Thisform.releaseCommand2代碼:〔2分〕Thisform.release〔2分〕3、水仙花數(shù)是指一個(gè)n(>=3)位數(shù)字的數(shù),它等于每個(gè)數(shù)字的n次冪之和,如153=13+53+33,編程顯示所有1000以?xún)?nèi)的水仙花數(shù)。〔8分〕SETTALKOFFclearFORa=0TO9〔2分〕FORb=0TO9〔2分〕FORc=1TO9〔2分〕IFa^3+b^3+c^3=a+10*b+100*c〔2分〕?a+10*b+100*cENDIFENDFORENDFORENDFORSETTALKON1、數(shù)據(jù)庫(kù)DB,數(shù)據(jù)庫(kù)系統(tǒng)DBS,數(shù)據(jù)庫(kù)管理系統(tǒng)DBMS三者之間的關(guān)系是〔A〕。A.DBS包括DB和DBMS B.DBMS包括DB和DBSC.DB包括DBS和DBMS D.DBS就是DB,也就是DBMS.2、在下面4個(gè)文件中,哪個(gè)是查詢(xún)文件(C).A.CX.PRGB.CX.BAKC.CX.QPRD.CX.PIX3、在DOWHILE….ENDDO循環(huán)結(jié)構(gòu)中,EXIT命令的作用是(C)。A〕退出過(guò)程,返回程序開(kāi)始處B〕轉(zhuǎn)移到DOWHILE語(yǔ)句行,開(kāi)始下一個(gè)判斷和循環(huán)C〕終止循環(huán),將控制轉(zhuǎn)移到本循環(huán)結(jié)構(gòu)ENDDO后面的第一條語(yǔ)句繼續(xù)執(zhí)行D〕終止程序執(zhí)行4、在VisualFoxPro中,相同關(guān)鍵字的記錄只取一條記錄的索引是(C)。A〕主索引B〕普通索引C〕惟一索引D〕排序索引5、使用命令DECLAREmm(3,9)定義的數(shù)組,包含的數(shù)組元素(下標(biāo)變量)的個(gè)數(shù)為(B)。A)3個(gè)B)27個(gè)C)9個(gè)D)12個(gè)6、查詢(xún)的默認(rèn)輸出形式是(D)。A.數(shù)據(jù)表B.圖形C.報(bào)表D.瀏覽7、VisualFoxProDBMS基于的數(shù)據(jù)模型是(B)。A〕層次型B〕關(guān)系型C〕網(wǎng)狀型D〕混合型8、關(guān)于數(shù)據(jù)庫(kù)表和自由表的區(qū)別,正確的選項(xiàng)是(D)。A.可以為自由表添加標(biāo)題和注釋?zhuān)鴶?shù)據(jù)庫(kù)表不能B.可以為自由表的字段設(shè)置默認(rèn)值和輸入掩碼C.不能為數(shù)據(jù)庫(kù)表的字段設(shè)置默認(rèn)值和輸入掩碼D.可以為數(shù)據(jù)庫(kù)表設(shè)置默認(rèn)值、輸入掩碼、標(biāo)題和注釋9、在下面的VisualFoxPro表達(dá)式中,不正確的是(C)。A.{^2001-05-0110:1010AM}-10B.{^2001-05-01}-DATE()C.{^2001-05-01)+DATE()D.[^2001-05-01]+[1000]10、有如下程序:INPUTTOXIFX>=0S=100ENDIFS=0?S問(wèn):假定從鍵盤(pán)輸入的A的值一定是數(shù)值型,那么上面程序的執(zhí)行結(jié)果是(A)。A.0B.1C.由A的值決定D.程序出錯(cuò)1、__ACCEPT______命令在程序中只接受字符型數(shù)據(jù)。2、VisualFoxPro提供了兩條實(shí)現(xiàn)分支結(jié)構(gòu)的語(yǔ)句:____DO_____語(yǔ)句和_______CASEENDCASE___________語(yǔ)句,分別稱(chēng)為簡(jiǎn)單分支語(yǔ)句和多分支語(yǔ)句。3、VisualFoxPro6.0中的常用數(shù)據(jù)類(lèi)型有__11__種,其中能用于常量和變量的有__6__種,僅用于表定義的有__5__種。4、VisualFoxPro中報(bào)表的組成包括__數(shù)據(jù)源____和___布局___。5、在VisualFoxPro6.0數(shù)據(jù)庫(kù)文件的擴(kuò)展名為_(kāi)_DBC____,數(shù)據(jù)表文件的擴(kuò)展名為_(kāi)_DBF____。數(shù)據(jù)表文件JS.DBF,其字段如下:編號(hào)姓名性別出生日期職稱(chēng)工資顯示表中男教授的記錄。按照編號(hào)字段建立非構(gòu)造型復(fù)合索引,文件名為JSSY.CDX。將所有教授工資漲30%。利用命令對(duì)該表求工資的平均值,結(jié)果放到達(dá)變量GZ中。求年齡的最大值結(jié)果放到變量NL中。1、USEDABROWSEFOR性別>=〞男〞.AND.職稱(chēng)=“教授〞USE〔3分〕2、USEDAINDEXON編號(hào)TAGTBHOFJSSYUSE〔3分〕3、USEDAREPLACEALL工資WITH工資*1.3FOR職稱(chēng)=“教授〞USE〔3分〕4、USEGZAVERAGE工資TOGZUSE〔3分〕5、USEDACALCULATEMAX(年齡)TONLUSE〔3分〕判斷以下程序運(yùn)行結(jié)果:〔6分〕SETTALKOFFINPUT〞請(qǐng)輸入年〞TOYINPUT〞請(qǐng)輸入月〞TOMINPUT〞請(qǐng)輸入日〞TODIFY%4=0.AND.Y%100<>0.OR.y%400=0YY="閏"ELSEYY="平"ENDIFDOCASECASEM<=3MM="一"CASEM<=6MM="二"CASEM<=9MM="三"CASEM<=12MM="四"ENDCASEDOCASECASED<=10DD="上旬"CASED<=20DD="中旬"OTHERWISEDD="下旬"ENDCASE?〞您輸入的日期是〞+YY+〞年〞+〞第〞+MM+〞季度〞+DDSETTALKON程序運(yùn)行后輸入:20231205那么運(yùn)行結(jié)果為:今年是平年第四季度上旬(6分)2、編程求任意兩個(gè)正整數(shù)的最小公倍數(shù)。(8分)SETTALKOFFINPUT“請(qǐng)輸入第一個(gè)正整數(shù):〞TOM(1分)INPUT“請(qǐng)輸入第二個(gè)正整數(shù):〞TON(1分)X=M(1分)DOWHILEX%N<>0(2分)X=X+M(1分)ENDDO(1分)?〞它們的最小公倍數(shù)為:〞,X(1分)SETTALKON3、設(shè)計(jì)一個(gè)表單樣式如圖,兩個(gè)文本框的名字分別為T(mén)ext1、Text2,“顯示〞命令按鈕的名為Cmd1,“關(guān)閉〞命令按鈕的名為Cmd2,實(shí)現(xiàn)功能為在Text1中輸入一個(gè)考試成績(jī),按“確定〞按鈕后在Text2中顯示該成績(jī)的等級(jí),完成兩個(gè)命令按鈕的代碼設(shè)計(jì)。〔11分〕Cmd1代碼:N=VAL(THISFORM.TEXT1.VALUE)〔2分〕DOCASECASEN>100.OR.N<0B=“此成績(jī)不正確〞CASEN>=90B=“優(yōu)秀〞CASEN>=80B=“良好〞CASEN>=70B=“中〞CASEN>=60B=“及格〞OTHERWISEB=“不及格〞〔5分〕ENDCASETHISFORM.TEXT2.VALUE=B〔1分〕THISFORM.REFERSH〔1分〕Cmd2代碼:THISFORM.RELEASE〔2分〕1、以下四個(gè)選項(xiàng)中,不屬于根本關(guān)系運(yùn)算的是〔C〕。A.連接 B.選擇C.排序 D.投影2、在下面4個(gè)文件中,哪個(gè)是報(bào)表文件(D).A.CX.PRGB.CX.BAKC.CX.QPRD.CX.FRX3、在DOWHILE….ENDDO循環(huán)結(jié)構(gòu)中,EXIT命令的作用是(C)。A.退出過(guò)程,返回程序開(kāi)始處B.轉(zhuǎn)移到DOWHILE語(yǔ)句行,開(kāi)始下一個(gè)判斷和循環(huán)C.終止循環(huán),將控制轉(zhuǎn)移到本循環(huán)結(jié)構(gòu)ENDDO后面的第一條語(yǔ)句繼續(xù)執(zhí)行D.終止程序執(zhí)行4、在VisualFoxPro中,相同關(guān)鍵字的記錄只取一條記錄的索引是(C)。A.主索引B.普通索引C.惟一索引D.排序索引5、下面哪個(gè)選項(xiàng)的方法不能退出VisualFoxPro9.0(B)。A.從“文件〞菜單下選擇“退出〞選項(xiàng)B.在命令窗口中輸入EXIT命令,然后回車(chē)C.單擊關(guān)閉窗口按鈕D.在命令窗口中輸入QUIT命令,然后回車(chē)6、執(zhí)行?SUBSTR(“沈陽(yáng)理工大學(xué)經(jīng)濟(jì)管理學(xué)院〞,5,4)的結(jié)果是(A)。A.理工B.理工大學(xué)C.大學(xué)D.大學(xué)經(jīng)濟(jì)7、在VisualFoxPro控件中,命令按鈕的缺省名字是(C)。A.labelB.textC.commandD.option8、關(guān)于數(shù)據(jù)庫(kù)表和自由表的區(qū)別,正確的選項(xiàng)是(D)。A.可以為自由表添加標(biāo)題和注釋?zhuān)鴶?shù)據(jù)庫(kù)表不能B.可以為自由表的字段設(shè)置默認(rèn)值和輸入掩碼C.不能為數(shù)據(jù)庫(kù)表的字段設(shè)置默認(rèn)值和輸入掩碼D.可以為數(shù)據(jù)庫(kù)表設(shè)置默認(rèn)值、輸入掩碼、標(biāo)題和注釋9、在下面的VisualFoxPro表達(dá)式中,不正確的是(C)。A.{^2023-05-0110:1010AM}-10B.{^2023-05-01}-DATE()C.{^2023-05-01)+DATE()D.[^2023-05-01]+[1000]10、有如下程序:INPUTTOXIFX>=0S=100ENDIFS=0?S問(wèn):假定從鍵盤(pán)輸入的A的值一定是數(shù)值型,那么上面程序的執(zhí)行結(jié)果是(A)。A.0B.1C.由A的值決定D.程序出錯(cuò)1、能唯一標(biāo)識(shí)元組且不包括多余屬性的最小屬性組合稱(chēng)為關(guān)系的___碼_____。2、視圖中的數(shù)據(jù)取自數(shù)據(jù)庫(kù)中的__表____或__圖____。3、在表中當(dāng)前記錄后插入一條空白記錄的命令是____INSERTBLANK___。4、VisualFoxPro中報(bào)表的組成包括____數(shù)據(jù)源__和___布局___。5、表達(dá)式3+3>=6.or.5*0.3>1.and.〞a〞+〞b〞=〞a〞的結(jié)果是__T____。6、與表文件不同名,但其擴(kuò)展名為.cdx的文件是與該表對(duì)應(yīng)的__非結(jié)構(gòu)型復(fù)合索引__。7、VFP9.0中的SQLSELECT語(yǔ)句中為了將查詢(xún)結(jié)果存放到臨時(shí)表中應(yīng)該使用__ITOCURSOR______短語(yǔ)。8、在VisualFoxPro中,用戶(hù)使用鼠標(biāo)左鍵單擊對(duì)象時(shí)發(fā)生的事件是__click____。學(xué)生表:STU(Sno,Sname,Ssex,Sage,Dno),其屬性分別表示學(xué)號(hào),姓名,性別,年齡,系編號(hào)。系別表:DEPT(Dno,Dname),其屬性分別表示系編號(hào),系名稱(chēng)。試完成以下各小題:1.用CREATETABLE語(yǔ)句定義根本表STU和DEPT。〔3分〕2.檢索每個(gè)系的學(xué)生人數(shù)和平均年齡。要求顯示(系編號(hào),系名稱(chēng),學(xué)生人數(shù),平均年齡)?!?分〕3.在DEPT表中,刪除人數(shù)少于5人的系。〔4分〕4、在STU表中,把所有學(xué)生的年齡增加一歲?!?分〕5.創(chuàng)立一個(gè)年齡大于20歲男性學(xué)生的視圖,屬性為(Dno,Dname,Sno,Sname,Sage)〔3分〕6.用VisualFoxPro的Index命令給STU表按照年齡降序建立一個(gè)構(gòu)造型復(fù)合索引?!?分〕1、CreattableSTU(SnoC(4),SnameC(8),SsexC(2),SageN(2,0),DnoC(3))CreattableDEPT(DnoC(3),DnameC(20))(3分)2、SelectDEPT.Dno,Dname,count(*)as人數(shù),avg(Sage)as平均年齡FromSTU,DEPTwhereSTU.Dno=DEPT.DnoorderbySTU.Dno(4分)DeletefromDEPTwhereDno=any(selectDnofromSTUorderbySTU.Dnohavingcount(*)<5)〔4分〕4、UpdateSTUsetSage=Sage+1〔3分〕5、Creatviewv_x(Dno,Dname,Sno,Sname,Sage)as(SeleteDEPT.Dno,Dname,Sno,Sname,SagefromSTU,DEPTwhereSTU.Dno=DEPT.DnoAndSage>=20andSsex=〞男〞〕(3分)6、useSTUIndexonSagetagtnldesc(3分)編程實(shí)現(xiàn)在表單上任意輸入年月日,初始運(yùn)行狀態(tài)如圖1,單擊顯示按鈕后如圖2所示。年月日分別用text1,text2,text3文本框來(lái)輸入,顯示按鈕為command1,關(guān)閉按鈕為command2,平年、閏年,幾季度,上、中、下旬,星期幾分別用4個(gè)標(biāo)簽label1、label2、label3、label4來(lái)顯示,請(qǐng)寫(xiě)出command1和command2的程序代碼。閏年計(jì)算規(guī)那么:能被4整除但不能被100整除,或者能被400整除的。(15分)圖1圖2Command1代碼:〔13分〕y=VAL(ALLTRIM(thisform.text1.value))IFy%4=0.and.y%100<>0.or.y%400=0yy="今年是閏年"ELSEyy="今年是平年"ENDIFthisform.label1.caption=yym=VAL(ALLTRIM(thisform.text2.value))〔4分〕DOcaseCASEm<=3mm="一季度"CASEm<=6mm="二季度"CASEm<=9mm="三季度"CASEm<=12mm="四季度"ENDCASEthisform.label2.caption=mmd=VAL(ALLTRIM(thisform.text3.value))〔4分〕DOcaseCASEd<=10dd="上旬"CASEd<=20dd="中旬"otherwisedd="下旬"endcasethisform.label3.caption=ddw=ALLTRIM(thisform.text1.value)+〞/〞+ALLTRIM(thisform.text2.value)+〞/〞+w=dow(ctod(w))docasecaseda=1ww=〞日〞caseda=2ww=〞一〞caseda=3ww=〞二〞caseda=4ww=〞三〞caseda=5ww=〞四〞caseda=6ww=〞五〞otherwiseww=〞六〞endcasethisform.label4.caption=wwthisform.RefreshCommand2代碼:〔2分〕Thisform.release〔2分〕2、以第四大題表STU為例,利用循環(huán)編程實(shí)現(xiàn)逐條顯示表中系編號(hào)為“A01〞的記錄,要求每顯示一條暫停,并詢(xún)問(wèn)用戶(hù)“是否繼續(xù)顯示下一條?Y/N〞,選“Y〞那么繼續(xù),選其它那么結(jié)束程序。(5分)SETTALKOFFUSESTUA=“Y〞SCANFORDno=“A01〞WHILEUPPER〔A〕=“Y〞(2分)DISPLAYWAIT“是否繼續(xù)顯示下一條?Y/N〞TOA〔2分〕ENDSCANUSE〔1分〕SETTALKON1、數(shù)據(jù)庫(kù)DB,數(shù)據(jù)庫(kù)系統(tǒng)DBS,數(shù)據(jù)庫(kù)管理系統(tǒng)DBMS三者之間的關(guān)系是〔A〕。A.DBS包括DB和DBMS B.DBMS包括DB和DBSC.DB包括DBS和DBMS D.DBS就是DB,也就是DBMS2、在下面4個(gè)文件中,哪個(gè)是表單文件(B).A.CX.PRGB.CX.SCXC.CX.QPRD.CX.FRX3、在DOWHILE….ENDDO循環(huán)結(jié)構(gòu)中,LOOP命令的作用是(B)。A.退出過(guò)程,返回程序開(kāi)始處B.轉(zhuǎn)移到DOWHILE語(yǔ)句行,開(kāi)始下一個(gè)判斷和循環(huán)C.終止
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶(hù)所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶(hù)上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶(hù)上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶(hù)因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 交通運(yùn)輸與物流行業(yè)智能調(diào)度與優(yōu)化方案
- 全新工作人員聘用合同
- 家居行業(yè)智能家居系統(tǒng)整合方案
- 臨時(shí)變壓器安裝合同
- 醫(yī)療行業(yè)質(zhì)量管理與安全指南
- 游戲電競(jìng)行業(yè)發(fā)展現(xiàn)狀及未來(lái)趨勢(shì)分析報(bào)告
- 木塑地板安裝施工方案
- 地膠凈化施工方案
- 微型鋼管樁施工方案
- 東莞清溪防水施工方案
- (一模)哈三中2025屆高三第一次模擬考試 語(yǔ)文試題(含答案)
- 2025安徽省投資集團(tuán)控股有限公司校園招聘34人筆試參考題庫(kù)附帶答案詳解
- 2025年新部編統(tǒng)編版中學(xué)七年級(jí)下冊(cè)歷史全冊(cè)分課知識(shí)點(diǎn)總結(jié)課件105張
- 2025年湖南司法警官職業(yè)學(xué)院?jiǎn)握新殬I(yè)技能測(cè)試題庫(kù)審定版
- 2025年湖南科技職業(yè)學(xué)院?jiǎn)握新殬I(yè)技能測(cè)試題庫(kù)匯編
- 節(jié)后復(fù)工復(fù)產(chǎn)應(yīng)急預(yù)案
- 語(yǔ)文-浙江省寧波市慈溪市2024學(xué)年高二第一學(xué)期期末測(cè)試試題和答案
- 2025海南三亞政府雇員人才儲(chǔ)備庫(kù)招聘300人易考易錯(cuò)模擬試題(共500題)試卷后附參考答案
- 植被重建施工方案
- 培養(yǎng)自律與自控能力主題班會(huì)
- GB/T 45027-2024液氫閥門(mén)通用規(guī)范
評(píng)論
0/150
提交評(píng)論