vfp實(shí)驗(yàn)7-16參考答案

VF實(shí)驗(yàn)7-16參考答案實(shí)驗(yàn)7檢索所有供應(yīng)商的全部信息。select*from供應(yīng)商號(hào)檢索所有員工的工號(hào)和姓名信息。select職工號(hào),姓名from職工查詢(xún)目前哪幾個(gè)倉(cāng)庫(kù)目前有員工分配（使用單表查詢(xún)）。Selectdistinct倉(cāng)庫(kù)號(hào)from職工檢索工資最高的前兩名員工姓名。Selecttop2姓名from職工orderby工資desc檢索工資大于1230元的員工姓名。select姓名from職工where工資>1230檢索不在WH1倉(cāng)庫(kù)工作的員工姓名和工資。SELECT姓名,工資from職工where倉(cāng)庫(kù)號(hào)=!"WH1"&&<>,#也可表不等于檢索生成于2001年7月的所有訂單信息。SELECT*from訂購(gòu)單where訂購(gòu)日期BETWEEN{^2010-07-01}AND{^2010-07-31}檢索2001年7月發(fā)給供應(yīng)商S4的訂單信息。SELECT*from訂購(gòu)單where供應(yīng)商號(hào)="S4"AND訂購(gòu)日期BETWEEN{^2010-07-01}AND{^2010-07-31}實(shí)驗(yàn)8檢索所有“周”姓員工的信息。Select*from職工where姓名like"周%"檢索所有訂購(gòu)單信息并將其按照訂購(gòu)日期升序排序。Select*from訂購(gòu)單orderby訂購(gòu)日期&&asc升序desc降序檢索所有訂購(gòu)單信息并將其按照訂購(gòu)日期降序排序。Select*from訂購(gòu)單orderby訂購(gòu)日期desc檢索工資最高的前三名員工姓名。Selecttop3姓名from職工orderby工資desc檢索工資水平在所有員工中排名前50%的員工姓名。Selecttop50percent姓名from職工orderby工資desc檢索職工信息并將其按所在倉(cāng)庫(kù)號(hào)降序排序，同一倉(cāng)庫(kù)的員工按工資升序排序。Select*from職工orderby倉(cāng)庫(kù)號(hào)desc,工資asc檢索訂購(gòu)單中供應(yīng)商號(hào)不為空值的訂單號(hào)。Select訂購(gòu)單號(hào)from訂購(gòu)單where供應(yīng)商號(hào)isnotnull檢索訂購(gòu)單中供應(yīng)商號(hào)和訂購(gòu)日期均為空值的訂單號(hào)。Select訂購(gòu)單號(hào)from訂購(gòu)單where供應(yīng)商號(hào)isnulland訂購(gòu)日期isnull檢索在WH1倉(cāng)庫(kù)工作的員工總數(shù)。Selectcount(職工號(hào))from職工where倉(cāng)庫(kù)號(hào)="WH1"檢索每月支付給員工的工資總數(shù)。Selectsum(工資)from職工檢索“周”姓員工工資的平均值。Selectavg(工資)from職工where姓名like"周%"檢索所有員工的最高工資。Selectmax(工資)from職工檢索WH2倉(cāng)庫(kù)員工的最低工資。Selectmin(工資)from職工where倉(cāng)庫(kù)號(hào)="WH2"統(tǒng)計(jì)各倉(cāng)庫(kù)員工的人數(shù)，以實(shí)現(xiàn)以下結(jié)果：select倉(cāng)庫(kù)號(hào),count(*)as人數(shù)from職工groupby倉(cāng)庫(kù)號(hào)統(tǒng)計(jì)各倉(cāng)庫(kù)員工的最高工資。select倉(cāng)庫(kù)號(hào),max(工資)from職工groupby倉(cāng)庫(kù)號(hào)統(tǒng)計(jì)有職工2人或2人以上的倉(cāng)庫(kù)的平均工資。select倉(cāng)庫(kù)號(hào),avg(工資)from職工groupby倉(cāng)庫(kù)號(hào)havingcount(*)>=2實(shí)驗(yàn)9統(tǒng)計(jì)各員工所在的城市（分別采用INNERJOIN和WHERE兩種形式實(shí)現(xiàn)內(nèi)連接）。select姓名,城市FROM職工innerJOIN倉(cāng)庫(kù)ON職工.倉(cāng)庫(kù)號(hào)=倉(cāng)庫(kù).倉(cāng)庫(kù)號(hào)select姓名,城市FROM職工,倉(cāng)庫(kù)where職工.倉(cāng)庫(kù)號(hào)=倉(cāng)庫(kù).倉(cāng)庫(kù)號(hào)&&如果沒(méi)有檢索答案，請(qǐng)用命令reindex重建索引后再檢索統(tǒng)計(jì)各訂購(gòu)單所對(duì)應(yīng)的供應(yīng)商名，若無(wú)供應(yīng)商名則留空。select訂購(gòu)單號(hào),供應(yīng)商名FROM訂購(gòu)單leftJoin供應(yīng)商on訂購(gòu)單.供應(yīng)商號(hào)=供應(yīng)商.供應(yīng)商號(hào)列出員工的上下級(jí)隸屬關(guān)系（自連接），以實(shí)現(xiàn)以下結(jié)果：selectS.姓名上級(jí) ,P.姓名下級(jí)from職工S,職工PWHERES.職工號(hào)=P.上級(jí)主管以連接和嵌套兩種查詢(xún)方式檢索在北京工作的員工信息。select*FROM職工Join倉(cāng)庫(kù)on職工.倉(cāng)庫(kù)號(hào)=倉(cāng)庫(kù).倉(cāng)庫(kù)號(hào)and城市="北京"select*FROM職工,倉(cāng)庫(kù)WHERE職工.倉(cāng)庫(kù)號(hào)=倉(cāng)庫(kù).倉(cāng)庫(kù)號(hào)and城市="北京"Select*from職工WHERE倉(cāng)庫(kù)號(hào)in(select倉(cāng)庫(kù)號(hào)from倉(cāng)庫(kù)where城市="北京")以連接和嵌套兩種查詢(xún)方式檢索01年6月后有接到訂單的供應(yīng)商信息。SELECT*FROM供應(yīng)商Join訂購(gòu)單on訂購(gòu)單.供應(yīng)商號(hào)=供應(yīng)商.供應(yīng)商號(hào)and訂購(gòu)日期>{^2001-6-30}SELECT*FROM供應(yīng)商,訂購(gòu)單where訂購(gòu)單.供應(yīng)商號(hào)=供應(yīng)商.供應(yīng)商號(hào)and訂購(gòu)日期>{^2001-6-30}檢索工作的倉(cāng)庫(kù)面積小于300平米的員工信息（分別利用in、any、exists三種形式查詢(xún)）。select*from職工where倉(cāng)庫(kù)號(hào)in(select倉(cāng)庫(kù)號(hào)from倉(cāng)庫(kù)where職工.倉(cāng)庫(kù)號(hào)=倉(cāng)庫(kù).倉(cāng)庫(kù)號(hào)and面積<300)select*from職工where倉(cāng)庫(kù)號(hào)=any(select倉(cāng)庫(kù)號(hào)from倉(cāng)庫(kù)where職工.倉(cāng)庫(kù)號(hào)=倉(cāng)庫(kù).倉(cāng)庫(kù)號(hào)and面積<300)select*from職工whereexists(select*from倉(cāng)庫(kù)where職工.倉(cāng)庫(kù)號(hào)=倉(cāng)庫(kù).倉(cāng)庫(kù)號(hào)and面積<300)檢索各供應(yīng)商所接到的最新訂單信息（如下圖，利用嵌套查詢(xún)）select*from訂購(gòu)單Swhere訂購(gòu)日期=(selectmax(訂購(gòu)日期)from訂購(gòu)單PwhereS.供應(yīng)商號(hào)=P.供應(yīng)商號(hào))實(shí)驗(yàn)10使用SQL語(yǔ)言復(fù)制”倉(cāng)庫(kù)”表到名為”tmp”的臨時(shí)表。select*from倉(cāng)庫(kù)intocursortemp將訂購(gòu)單信息按訂購(gòu)日期排序并輸出至“output”表。select*from訂購(gòu)單intocursoroutputorderby訂購(gòu)日期&&orderby訂購(gòu)日期intotableoutput統(tǒng)計(jì)各供應(yīng)商分別接到的訂單數(shù)量并輸出至文件D:\1.txt中。select供應(yīng)商號(hào),coun(訂購(gòu)單號(hào))from訂購(gòu)單grouby供應(yīng)商號(hào)ToFILED:\1.txt用UNION語(yǔ)句檢索哪些城市設(shè)有該公司的供應(yīng)商或倉(cāng)庫(kù)。select城市FROM倉(cāng)庫(kù)UNIONSELECT地址from供應(yīng)商使用INSERT語(yǔ)句的兩種形式，分別在職工表中添加名為”張三”和”李四”的兩條記錄，其工號(hào)為E9和E10，其余信息設(shè)為空值。Insertinto職工values("E9","張三",NULL,NULL,NULL)Insertinto職工(職工號(hào),姓名,倉(cāng)庫(kù)號(hào),工資,上級(jí)主管)values("E10","李四",NULL,NULL,NULL)將所有職工的工資增加500元。Update職工set工資=工資+500將訂單’OR91’的訂購(gòu)日期改為空值。Update訂購(gòu)單set訂購(gòu)日期=nullwhere訂購(gòu)單號(hào)=”O(jiān)R91”將職工劉勇所工作的倉(cāng)庫(kù)面積修改為300平方米。UPDATE倉(cāng)庫(kù)set面積=300where倉(cāng)庫(kù)號(hào)=(select倉(cāng)庫(kù)號(hào)from職工where姓名="劉勇")刪除北京倉(cāng)庫(kù)中姓”劉”的員工。Deletefrom職工where姓名like"劉%”"and倉(cāng)庫(kù)號(hào)=(select倉(cāng)庫(kù)號(hào)from倉(cāng)庫(kù)where城市="北京")清空供應(yīng)商表的所有記錄。Deletefrom供應(yīng)商刪除訂購(gòu)單表和供應(yīng)商表。Droptable訂購(gòu)單Droptable供應(yīng)商使用Create命令創(chuàng)建訂購(gòu)單表和供應(yīng)商表結(jié)構(gòu)和相關(guān)聯(lián)系（如下圖），無(wú)需輸入數(shù)據(jù)。createtable供應(yīng)商(供應(yīng)商號(hào)C(5)PRIMARYkey,供應(yīng)商名C(20),地址C(20))createtable訂購(gòu)單(訂購(gòu)單號(hào)N(8),職工號(hào)N(8),供應(yīng)商號(hào)N(8)PRIMARYkey,訂購(gòu)日期D,;FOREIGNKEY職工號(hào)tag職工號(hào)reference職工,;FOREIGNKEY供應(yīng)商號(hào)tag供應(yīng)商號(hào)reference供應(yīng)商)實(shí)驗(yàn)11找出借書(shū)超過(guò)2本的讀者，輸出讀者姓名及所借圖書(shū)冊(cè)數(shù)。select姓名,coun(書(shū)號(hào))from借書(shū)卡,借書(shū)記錄where借書(shū)卡.卡號(hào)=借書(shū)記錄.借書(shū)卡號(hào)grouby卡號(hào)havingcoun(書(shū)號(hào))>2查詢(xún)借閱了書(shū)號(hào)為9787020081639這本書(shū)的讀者，輸出姓名及班級(jí)。Select姓名,班級(jí)from借書(shū)卡where卡號(hào)in(select借書(shū)卡號(hào)from借書(shū)記錄where書(shū)號(hào)=9787020081639)查詢(xún)借閱了書(shū)名為《工業(yè)革命》這本書(shū)的讀者，輸出姓名及班級(jí)。Select姓名,班級(jí)from借書(shū)卡Join借書(shū)記錄on借書(shū)卡.卡號(hào)=借書(shū)記錄.借書(shū)卡號(hào)Join圖書(shū)on借書(shū)記錄.書(shū)號(hào)=圖書(shū).書(shū)號(hào)and書(shū)名=”工業(yè)革命”查詢(xún)書(shū)名包括"覺(jué)醒"關(guān)鍵詞的圖書(shū)，輸出書(shū)號(hào)、書(shū)名、作者。Select書(shū)號(hào),書(shū)名,作者from圖書(shū)where書(shū)名like“%覺(jué)醒%”查詢(xún)現(xiàn)有圖書(shū)中價(jià)格最高的圖書(shū)，輸出書(shū)名及作者。Selecttop1書(shū)名,作者from圖書(shū)orderby單價(jià)desc查詢(xún)當(dāng)前借了《工業(yè)革命》但沒(méi)有借《猜火車(chē)》的讀者，輸出其借書(shū)卡號(hào)，并按卡號(hào)降序排序輸出。Select借書(shū)卡號(hào)from借書(shū)記錄where書(shū)號(hào)in(select書(shū)號(hào)from圖書(shū)where書(shū)名="工業(yè)革命"and書(shū)名!="猜火車(chē)")orderby借書(shū)卡號(hào)desc將"法01"班同學(xué)所借圖書(shū)的還期都延長(zhǎng)一周。Update借書(shū)記錄set還書(shū)日期=還書(shū)日期+7where借書(shū)卡號(hào)in(select卡號(hào)from借書(shū)卡where班級(jí)=”法01”)從圖書(shū)表中刪除當(dāng)前無(wú)人借閱的圖書(shū)記錄。Deletefrom圖書(shū)where圖書(shū).書(shū)號(hào)notin(select書(shū)號(hào)from借書(shū)記錄);pack新增一條借書(shū)卡記錄，卡號(hào)為A090112，姓名為劉燁，班級(jí)取空值。Insertinto借書(shū)卡(卡號(hào),姓名,班級(jí))values(A090112,劉燁,.null.)若需要追加一個(gè)”書(shū)庫(kù)”表（包含書(shū)庫(kù)號(hào)、書(shū)庫(kù)名、負(fù)責(zé)人三個(gè)字段，并與圖書(shū)表存在聯(lián)系），請(qǐng)寫(xiě)出建表SQL語(yǔ)句。Createtable書(shū)庫(kù)(書(shū)庫(kù)號(hào)C(10)PRIMARYKEY,書(shū)庫(kù)名C(10),負(fù)責(zé)人C(8));Altertable圖書(shū)addFOREIGNKEY所在書(shū)庫(kù)TAG所在書(shū)庫(kù)REFERENCES書(shū)庫(kù)使用ALTER語(yǔ)句為借書(shū)卡表新增一個(gè)字段”所屬學(xué)院”，該字段允許取空值。Altertable借書(shū)卡add所屬學(xué)院null使用ALTER語(yǔ)句為圖書(shū)的庫(kù)存冊(cè)數(shù)字段加入域完整性約束，冊(cè)數(shù)必須介于0-100否則報(bào)錯(cuò)。Altertable圖書(shū)alter庫(kù)存冊(cè)數(shù)setcheck(庫(kù)存冊(cè)數(shù)>=0and庫(kù)存冊(cè)數(shù)<=100)error"庫(kù)存冊(cè)數(shù)不符!"使用ALTER語(yǔ)句刪除借書(shū)卡的班級(jí)字段。Altertable借書(shū)卡dropcolumn班級(jí)使用ALTER語(yǔ)句重命名”借書(shū)卡”表的姓名字段為”讀者姓名”。Altertable借書(shū)卡dropcolumn班級(jí)使用ALTER語(yǔ)句為當(dāng)前數(shù)據(jù)庫(kù)中的各表創(chuàng)建索引及其各表間的聯(lián)系?！鞠冗\(yùn)行“清理數(shù)據(jù)庫(kù)”】1:Altertable借書(shū)記錄alter借書(shū)卡號(hào)C(10)references借書(shū)卡2:Altertable借書(shū)記錄addFOREIGNKEY借書(shū)卡號(hào)TAG借書(shū)卡號(hào)REFERENCES借書(shū)卡3:Altertable借書(shū)記錄alter書(shū)號(hào)N(15)references圖書(shū)tag書(shū)號(hào)實(shí)驗(yàn)132、根據(jù)要求利用相應(yīng)的系統(tǒng)函數(shù)寫(xiě)出命令，并在VFP中測(cè)試運(yùn)行結(jié)果是否正確。若系統(tǒng)中已有變量r=5，需要輸出以r為半徑的圓面積，

應(yīng)使用?PI()*R*R命令。若系統(tǒng)中已有變量t=345.678，希望輸出其保留兩位小數(shù)的四舍五入值，應(yīng)使用?ROUND(t,2)命令。若需要讓計(jì)算機(jī)輸出2010年2月2日、2007年3月3日和1999年4月4日三個(gè)日期的最大值，應(yīng)使用?MAX({^2010-02-02},{^2007-03-03},{^1999-04-04})命令。系統(tǒng)中已有變量a=”select*fromdb”，若需要將變量a的字母全部轉(zhuǎn)換為大寫(xiě)并輸出，應(yīng)使用?UPPER(a)命令。輸入：A=”天行健，君子以自強(qiáng)不息”，從A中取出子串”自強(qiáng)不息”并輸出，應(yīng)使用?RIGHT(A,8)命令或?SUBSTR(A,15,8)命令。輸入：A=”MyE-Mail地址”，從A中取出子串”E-M”并輸出，應(yīng)使用?SUBSTR(A,4,3)命令。若需要輸出字母”o”在字符串”VisualFoxpro”中第二次出現(xiàn)的字符位置，應(yīng)使用?AT("o","VisualFoxpro",2)命令。若需要使用函數(shù)將字符串”VisualBasic”中的”Basic”替換為”C++”并將結(jié)果輸出，應(yīng)使用?STUFF("VisualFoxpro",8,6,"C++")命令。若需要使用函數(shù)在字符串”Foxpro”前插入”Visual”并將結(jié)果輸出，應(yīng)使用?STUFF("Foxpro",0,0,"Visual")命令。輸出當(dāng)前的系統(tǒng)時(shí)間，可使用?TIME()命令。輸出今天系統(tǒng)日期中的月份數(shù)字，可使用?MONTH(DATE())命令。輸出當(dāng)前系統(tǒng)日期中的小時(shí)數(shù)字，可使用?HOUR(DATETIME())命令。若需要讓計(jì)算機(jī)輸出明年的年份，可使用?YEAR(DATE())+1命令。若需要將當(dāng)前時(shí)間輸出為小時(shí):分鐘的形式，忽略秒數(shù)（如12:30），可使用?left(time(),5)命令。有一存儲(chǔ)學(xué)生成績(jī)的變量s，若希望成績(jī)小于60時(shí)輸出“不合格”，成績(jī)60-90時(shí)輸出“合格”，成績(jī)大于90分時(shí)輸出“優(yōu)秀”，可使用?iif(s<60,"不合格",iif(s>90,"優(yōu)秀","合格"))命令（利用IIF函數(shù)）。實(shí)驗(yàn)14根據(jù)用戶(hù)輸入的圓半徑求出圓面積。提示：1）清屏2）使用INPUT接收用戶(hù)輸入的圓半徑3）計(jì)算圓半徑并保存到一個(gè)變量4）輸出提示信息和該變量值。clearinput"請(qǐng)輸入圓的半徑"torm=pi()*r^2?"圓的面積是："+str(m)根據(jù)用戶(hù)輸入的教師出生日期查找并輸出相應(yīng)的教師信息。提示：1）清屏2）打開(kāi)教師表3）使用INPUT接收用戶(hù)輸入的日期值4）使用LOCATE定位指針到指定記錄5）使用DISPLAY輸出指針記錄信息clearuse教師input"請(qǐng)輸入出生日期："todlocatefor出生日期=ddisplay根據(jù)用戶(hù)輸入的學(xué)生姓名查找并輸出相應(yīng)的學(xué)生信息。提示：1）清屏2）打開(kāi)學(xué)生表3）使用ACCEPT接收用戶(hù)輸入文本4）使用LOCATE定位指針到指定記錄5）使用DISPLAY輸出指針記錄信息clearuse學(xué)生accept"請(qǐng)輸入學(xué)生姓名："tonlocatefor姓名=ndisplay根據(jù)用戶(hù)輸入的年份判斷該年份是否為閏年。提示：1）清屏2）使用INPUT接收用戶(hù)輸入的年份數(shù)值3）使用IF單語(yǔ)句判斷該數(shù)值是否符合閏年的條件（可被400整除，或是可被4整除但不能被100整除），如果符合輸出提示信息。clearinput"請(qǐng)輸入年份："toyify%400==0or(y%4==0andy%100!=0)?"該年是閏年"else?"該年是平年"endif根據(jù)用戶(hù)輸入的學(xué)生分?jǐn)?shù)，判斷該學(xué)生是不合格（<60分）、合格（60-90分）還是優(yōu)秀（>90分）。（分別采用IF和CASE兩種形式編寫(xiě)）clearinput"請(qǐng)輸入學(xué)生分?jǐn)?shù)："togifg<60?"該學(xué)生成績(jī)不合格"elseifg>90?"該學(xué)生成績(jī)優(yōu)秀"else?"該學(xué)生成績(jī)合格"endifendif方法二clearinput"請(qǐng)輸入學(xué)生分?jǐn)?shù)："togdocasecaseg<60?"該學(xué)生成績(jī)不合格"caseg>90?"該學(xué)生成績(jī)優(yōu)秀"otherwise?"該學(xué)生成績(jī)合格"endcase根據(jù)用戶(hù)輸入的學(xué)生姓名，輸出該學(xué)生的性別，若學(xué)生表中不存在該姓名的學(xué)生則顯示“查無(wú)此人”。提示：1）清屏2）打開(kāi)學(xué)生表3）使用ACCEPT接收用戶(hù)輸入的學(xué)生姓名4）使用LOCATE定位指針到符合條件的記錄5）使用FOUND()函數(shù)判斷是否有找到記錄，若無(wú)記錄輸出“查無(wú)此人”，若有記錄則判斷性別是否等于’男’，并輸出判斷結(jié)果。clearuse學(xué)生accept"請(qǐng)輸入學(xué)生姓名："tonlocatefor姓名=niffound()if性別='男'?"該生是男生"else?"該生是女生"endifelse?"查無(wú)此人"endif計(jì)算自然數(shù)1-100中的偶數(shù)總和并輸出（分別使用WHILE和FOR兩種循環(huán)形式）。提示：參考課本P78例子。clearsum=0i=0dowhilei<=100sum=sum+ii=i+2enddo?"自然數(shù)1-100中的偶數(shù)總和為:"+str(sum)方法二clearsum=0fori=0to100step2sum=sum+iendfor?"自然數(shù)1-100中的偶數(shù)總和為:"+str(sum)從鍵盤(pán)接收用戶(hù)輸入的5個(gè)數(shù)，輸出其中的最大值。提示：參考課本P81例子。clearinput"請(qǐng)輸入一個(gè)數(shù)："toastoreatoma,mifori=2to5input"請(qǐng)?jiān)佥斎胍粋€(gè)數(shù)："toaifma<ama=aendififmi>ami=aendifendfor?"最大值為："+str(ma)建立一個(gè)包含20個(gè)元素的數(shù)組，令數(shù)據(jù)各元素的值為該元素下標(biāo)的平方，并將該數(shù)組各元素值輸出。提示：建立數(shù)組的命令DECLAREa(20)cleardeclarea(20)fori=1to20a(i)=i^2?"a("+ltrim(str(i))+")"+"="+ltrim(str(a(i)))endfor輸出1號(hào)院系所有男生的姓名（嘗試分別使用WHILE、FOR和SCAN三種循環(huán)形式）提示：使用WHILE循環(huán)時(shí)，首先使用LOCATE定位指針到第一條符合條件的記錄，循環(huán)條件為DOWHILEFOUND()，若有找到記錄則輸出姓名字段值，并使用Continue改變循環(huán)條件。使用FOR循環(huán)時(shí)，循環(huán)條件為FORi=1toRECCOUNT()，依次判斷每條記錄的所屬院系是否為1且性別是否為男，若結(jié)果為真則輸出姓名字段值。使用SCAN循環(huán)時(shí)，循環(huán)條件為SCANALLFOR所屬院系=1and性別=’男’，每次循環(huán)輸出當(dāng)前指針?biāo)诘男彰侄沃?。方法一clearuse學(xué)生locatefor所屬院系=1and性別="男"dowhilefound()?姓名continueenddo方法二clearuse學(xué)生fori=1toRECCOUNT()gotoiif所屬院系=1and性別='男'?姓名endifendfor方法三clearuse學(xué)生scanALLFOR所屬院系=1and性別='男'?姓名endscan實(shí)驗(yàn)15學(xué)生表中學(xué)生的所屬院系為1-4，請(qǐng)根據(jù)用戶(hù)輸入的院系ID號(hào)，輸出該院系的學(xué)生總數(shù)。思路：1）清屏2）打開(kāi)學(xué)生表3）使用Input命令接受用戶(hù)輸入的ID號(hào)4）設(shè)置一個(gè)計(jì)算器變量5）并使用循環(huán)語(yǔ)句循環(huán)符合該ID號(hào)的學(xué)生記錄，每次循環(huán)使計(jì)數(shù)器值+16）循環(huán)結(jié)束后輸出計(jì)數(shù)器值，即為學(xué)生總數(shù)。clearuse學(xué)生input"請(qǐng)輸入院系ID號(hào)："toIDs=0fori=1toreccount()gotoiif所屬院系=IDs=s+1endifendfor?"學(xué)生總數(shù)為：",s根據(jù)用戶(hù)輸入的院系名稱(chēng)（非院系ID），輸出該院系中所有教師的姓名。思路：1）清屏2）使用Accept命令接收用戶(hù)輸入的院系名稱(chēng)3）使用SQL連接或嵌套查詢(xún)語(yǔ)句檢索該院系名對(duì)應(yīng)的院系教師，并將結(jié)果存入名為tmp的臨時(shí)表4）使用SELECTtmp選擇該臨時(shí)表工作區(qū)5）循環(huán)輸出tmp表中的姓名值。clearaccept"請(qǐng)輸入院系名稱(chēng)："toaselect姓名from教師,院系where所屬院系=院系idand院系名=aintocursortmpselecttmpdowhilenoteof()?姓名skipEnddo實(shí)驗(yàn)16設(shè)計(jì)一個(gè)命令行菜單，當(dāng)用戶(hù)點(diǎn)擊鍵盤(pán)上的1-4數(shù)字鍵，分別輸出信息工程系、信息管理系、電腦藝術(shù)系或影視動(dòng)漫系中教師的信息清單（輸出工號(hào)、姓名、性別、婚否、職稱(chēng)5列信息，其中婚否輸出“已婚”或“未婚”）。效果圖如下：提示：1）接收單個(gè)字符可用WAIT命令。2）使用DOCASE命令對(duì)用戶(hù)輸入進(jìn)行分支判斷，可以設(shè)置一個(gè)過(guò)程用來(lái)輸出信息，例如用戶(hù)輸入1，則執(zhí)行l(wèi)istTeacher(1)。2）若希望多列輸出排列整齊，可使用?"工號(hào)"at1,"姓名"at11…的形式。3）原始數(shù)據(jù)中的婚否字段為邏輯型，可用if語(yǔ)句轉(zhuǎn)換為字符“已婚”或“未婚”。clearUSE教師?"1.信息工程系教師清單"?"2.信息管理系教師清單"?"3.電腦藝術(shù)系教師清單"?"4.演視動(dòng)漫系教師清單"WAIT"請(qǐng)選擇(1-4)："TOAA=VAL(A)DOCASECASEA=1LISTTEACHER(1)CASEA=2LISTTEACHER(2)CASEA=3LISTTEACHER(3)CASEA=4LISTTEACHER(4)endcasePROCEDURELISTTEACHERPARAMETERSALOCATEFOR所屬院系=ADOWHILEFOUND()?"姓名","工號(hào)","性別","職稱(chēng)"?姓名,工號(hào),性別,職稱(chēng)continueenddoendproc設(shè)計(jì)一個(gè)命令行菜單，當(dāng)用戶(hù)選擇命令1時(shí)，查詢(xún)指定學(xué)號(hào)的學(xué)生記錄；當(dāng)用戶(hù)選擇命令2時(shí)，刪除指定學(xué)號(hào)的學(xué)生記錄（執(zhí)行后提示刪除是否成功）；當(dāng)用戶(hù)選